Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Cascading 1-many form
Message
General information
Forum:
Visual FoxPro
Category:
CodeMine
Miscellaneous
Thread ID:
01049589
Message ID:
01049691
Views:
13
Hi, Gary;

I lashed this up but now have the following problem:


Trying to create an additional 1-M data entry form, on an existing "child" form created from the formmodaldatachild class Upon running the button, the new child form comes up, and allows data to be entered, however, I then get an error message:
=======================================
Visual FoxPro 09.00.0000.2412 for Windows [Dec 13 2004 11:21:37] Product ID 76683-335-3957236-18390 CodeMine 8.0.B3 Error #1924 in Click line 9 "m.lStatus=m.oDialog.ReturnValue()"
ODIALOG is not an object.

Call Stack:
2 Frmcgoal.Cmdnewdtl.Click (source\appforms.vct)
1 Frmperson001.Pgfperson.Page6.Cmdeditdtl.Click (source\frmperson.sct)

======================================

Since the calling form is itself a child form, I'm wondering if the variables are stomping on each other, Based on the error message; oDialog does get instantiated, but then for some reason seems to be changed to .null.


Here is the code in the [new] button which generates the above error

PRIVATE oCallingForm
m.oCallingForm=THISFORM

LOCAL oDialog

THISFORM.cmDataManager.New('lrnObjective')
m.oDialog = CREATEOBJECT('frmclrno', THISFORM)
m.oDialog.SHOW()
m.lStatus=m.oDialog.ReturnValue()

IF m.lStatus=.F. && User didn't want to add this record after all
THISFORM.cmDataManager.Delete('lrnObjective')

ENDIF

-- Larry Keyes
Remember only You can prevent Gray Goo. Never release nanobot assembers without replication limiting code.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform