Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
A way to call a third form to capture info.
Message
From
07/11/2001 08:03:33
Rex Mahel
Realm Software, Llc
Ohio, United States
 
 
To
07/11/2001 07:19:43
General information
Forum:
Visual FoxPro
Category:
The Mere Mortals Framework
Miscellaneous
Thread ID:
00577638
Message ID:
00578428
Views:
24
Allen,

If the form is a cListObjEditForm, use the full calling line:

llRetVal = DoForm(This.Parent.cEditForm, .T.,ThisForm,This.Parent.oBizObj)

Where:

This.Parent.cListObjEditForm = The form class name
.T. = Is this form in Add mode
ThisForm = Calling form reference
ThisForm.Parent.oBizObj = Calling form primary business object reference

Note: If you are using another business object in your cListObjEditForm that needs to be related to your calling form's primary business object, you will need to call the Calling form primary business object.RegisterChildBizObj method from the cListObjEditForm.Init method and UnRegisterChildBizObj from the cListObjEditForm.Destroy method.

HTH

Rex


>Hello Rex
>I have done as you suggested and it just about works :-) The record is added to the file ok, but after clicking the OK button I get an error:
>
>error# 1925
>Message: Unknown member OCALLINGFORMLISTOBJ.
>LINE 68
>CODE; lcSelect = CREATEOBJECT('CSelect',ThidForm.oCallingFormListObj.GetAlias())
>
>method: click
>Object: propdetail.cmdok
>
>I used the code similar to that used in the cmdadd.Click from the clistobjedit class in the cmdAdd button on my form:
>
>llRetVal = DoForm('PropDetail',This.Parent.Bizobj)
>
>I think this is where the problem is as it is obviously not stoing the calling forms bizobj. I am confused as the the correct number of arguments to send to the called form and what the information should be?
>Allan Godney
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform