Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Set Relation - Skip, Skip -1
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9
Miscellaneous
Thread ID:
01054605
Message ID:
01054609
Views:
19
SKIP 0 && This is zero?
SELECT MYParentTable
SET RELATION TO Key INTO ChildTable
LOCATE
SCAN
   SKIP 0
   ? ChildTable.Key, EOF("ChildTable"), BOF("ChildTable")
ENDIF
not tested because I never used this, since I use VFP. This are my memories from CLIPPER days :o)))



>In many of our forms we have a SET RELATION from the parent to the child table. After the parent moves to a new record the code does a SKIP, SKIP-1. It seems like this is to jolt the child record pointer into moving.
>
>Anyway, the SKIP, SKIP-1 is causing me fits because we have changed the cursors to have smaller subsets of records and in some cases no records. Just looking for a nice small bit of code to replace the following two examples of code which do not work ...
>
>** example 1 - empty cursors still have a recno() = 1
>SELECT obligat
>IF RECNO() > 0
> GO RECNO()
>endif
>
>** example 2 - not work for empty cursor. empty cursor can be eof() and !bof()
>DO CASE
>CASE EOF() AND BOF()
> RETURN
>CASE EOF()
> SKIP -1
> SKIP
>OTHERWISE
> SKIP
> SKIP -1
>ENDCASE
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform