Microsoft KB Archive/135751

= PRB: "Record is out of Range" w/ Form from One-to-Many Wizard =

Article ID: 135751

Article Last Modified on 2/15/2000

-

APPLIES TO


 * Microsoft Visual FoxPro 3.0 Standard Edition

-



This article was previously published under Q135751



SYMPTOMS
When using a form created with the One-to-Many Wizard, you may receive the error "Record out of Range." This error occurs if a new record is added to both the parent and child tables.



CAUSE
The error occurs because the record pointer in the child table does appear to be in the correct location when the command THISFORM.REFRESH is executed.



RESOLUTION
Refresh the form before adding the record in the second table by adding this line of code: * Add record to parent table IF INLIST(oAddRec.AddOption,OPT_ADD_PARENT,OPT_ADD_BOTH) IF EMPTY(m.cPapaKey) APPEND BLANK IN (m.cPapaAlias) ELSE INSERT INTO (m.cPapaAlias) ((oAddRec.KeyField)) ; VALUES(oAddRec.KeyValue) ENDIF ENDIF

THISFORM.REFRESH && <  Add this line to fix the problem

* Add child record IF INLIST(oAddRec.AddOption,OPT_ADD_CHILD,OPT_ADD_BOTH) * Need to check IF EMPTY(m.cChildKey) OR TYPE(m.cChildKey)#TYPE('oAddRec.KeyValue') APPEND BLANK IN (m.cChildAlias) ELSE INSERT INTO (m.cChildAlias) ((m.cChildKey)) ; VALUES(oAddRec.KeyValue) ENDIF ENDIF



STATUS
Microsoft is researching this behavior and will post new information here in the Microsoft Knowledge Base as it becomes available.



MORE INFORMATION
The error message may also be received when using a form not created by the Form Wizard but the workaround is the same.

Steps to Reproduce Behavior
 Create a one-to-many form using the Form Wizard. Add the parent table and select all the fields. Add the child table and select all the fields. Click the Finish button. Save the form.</li> Run the form you just created.</li> Click the Add button.</li> Click the Add record to both button.</li> Enter a key value.</li> Click the Add button.</li> A message box containing the following message appears:

THISFORM.Refresh

Error: 5

Record is out of Range

Method: navrefresh

Line: 91

</li></ol>

Additional query words: 3.00 VFoxWin one to many one-to-many

Keywords: KB135751

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.