A TXT2 I SST(TXT 5 3)
A**------------------------------------------------------------------------
A K TXT
A K NR
A S TXT2 RANGE('000' '999')