kHRELATI10 kREL1_TAGCREL2_TAGCC?STR(SOBJID,11).NOT. DELETED()
C7<STR(SOBJID,11)+STR(SOBJTYP,11)+STR(RELID,11)+STR(TOBJID,11)+STR(TOBJTYP,11).NOT. DELETED()          1          1          1    1314816    1315827          1    1314974          1    1314816    1315837          2    1315016