Here is my Init code for a child form:
LPARAMETER lcdistid,lcdistrict,lcsiteid,lcall
*!* gasb_lusite_form.init()
LOCAL lnFileStatus
lnFileStatus = dodefault()
IF EMPTY(lcall)
vp_cdistid = lcdistid
thisform.lblDist.caption = ALLTRIM(lcdistrict)
thisform.abo_district.cdistid = lcdistid
vp_csiteid=lcsiteid
thisform.abo_site.csiteid = lcsiteid
thisform.anavbuttons.visible=.F.
requery('v_site_dist_ro')
thisform.abo_site.requery()
thisform.refresh()
ELSE
thisform.anavbuttons.visible=.T.
vp_cdistid = lcdistid
thisform.lblDist.caption = ALLTRIM(lcdistrict)
thisform.abo_district.cdistid = lcdistid
requery('v_site_dist_ro')
thisform.requery()
thisform.refresh()
ENDIF
The IF EMPTY(lcall) code works perfectly. It calls up the record selected from the combo box.
The ELSE code has these problems:
It asks for vp_csiteid identity (and I don't want a SINGLE record, I want the set of records for the parent key -- vp_cdistid)
when you press enter, you get all records in the child table (site) not just the records filtered for the selected parent district. -- So I must be requerying the child table incorrectly?
My code in Init to select a single child record works fine.
HELP!
<i><font color="#663300">Hi Lynette!
I don't understand very well, The bizobj object is to control de cursor with methods or events like next, prior, save, cancel, ... to navigate into it.
To Display, you have visual controls as textbox, editbox, combobox, grids.
Do you want to know how link the controls with the data? or maybe how link the grid events with the bizobj events?
Could you do again your question?
<i><font color="#663300">
...
Still need answer to:
Another question, since my search forms all use SQL and have cursor's defined, shouldn't I be able to display the record from the temporary cursor with a BIZOBJ???? that attempt gave me control source errors...
Thanks!
</font></i>
</font></i>
Lynette
ltillner At yahoo DOT com
©2002 Lynette Tillner |
