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          1          2          2          2          2          2	          1    1314974    1315819          1    1314969          1    1314974    1315822          2    1315016	          1    1314974    1315826          1    1314816          1    1314974    1315826          1    1315559          2    1315016    1315821          3    1314972          2    1315016    1315823          1    1314974          2    1315016    1315836          1    1314816          2    1315016    1315836          1    1315303          2    1315016    1315836          1    1315559