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          1          1          1          1          2          3          3          3          1    1314969          3         23    1122305	          1    1314969         10          2    1331713
          1    1314969         10          3    1331714          1    1314969    1315816          3    1314972          1    1314969    1315818          1    1314974          1    1314969    1315824          1    1314971          1    1314969    1315838          1    1315559          1    1314969    1315846          2    1315075          2    1315075    1315847          1    1314969          3    1314972    1315817          1    1314969          3    1314972    1315820          2    1315016          3    1314972    1315829          1    1315559