kHATTRIB10 kIDA1_TAGCIDA2_TAGCC?STR(IDA,11).NOT. DELETED()
C$STR(IDA,11)+STR(AttriID,11).NOT. DELETED()          1          1          1          1          2          2          2          1       4098          1       4101          1       4102          1     111473          2       4098          2       4101          2       4102