using following code...
LOCATE FOR ObjectType = 'Table' AND ObjectName = a4Scan(i,2)
IF FOUND()
nObjectID = ObjectID
LOCATE FOR ObjectType = 'Relation' AND ;
'parcel_id'$Property AND ;
'main'$Property AND ;
'parcel_id'$Property AND ;
ParentID = nObjectID
IF FOUND()
REPLACE RiInfo WITH 'ICI '
ELSE
DisplayStatus("Could not set Referential Integrity for file "+ a4Scan(i,2))
ENDIF
ENDIF
(modification of code out of GENDBC) ... when I subsequently Open the DBC it insists on CLEANUP DBC in which I lose the Cascade deletes (I think). What am doing wrong / what's an easy way to set Cascade deletes within a program ?