Click above to get retro games delivered to your door ever month!

Syntax

CHECK_REL()

Purpose

Report any failure in the chain of a record's parent relations.

Arguments

None.

Setup

The array u_depend[] must be a pre-defined PRIVATE variable. This
function is usually called from within THE_USUAL (which manufactures a
u_depend array) to maintain relational integrity. However, it is also
possible to use it from without THE_USUAL if you manufacture your own
u_depend array.

Example

     PRIVATE u_depend[ 8 ]
     AFILL( u_depend, "" )
     u_depend[ 1 ] = "CUSTOMER"

     USE CUSTOMER INDEX CUSTOME3
     USE ORDERS NEW
     SET RELATION TO ACCOUNT_NO INTO CUSTOMER

     ? CHECK_REL()

Returns

.F. if any parent file is at BOF() or EOF(), else .T.

Side Effects

The public variable stlin_msg is filled with a no-related-record
message if any related table is at BOF() or EOF(), so that the next call to
STAT_LINE() can inform the user. IF stlin_msg doesn't already exist,
it is created.

Artful Calls

AEMPTY

Source File

AA_RELAT.PRG