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