perm filename THAT.IMS[10X,AIL]3 blob sn#184472 filedate 1975-11-01 generic text, type T, neo UTF8
00100	PROD.=HEL[S,AIL]/noload/proc PTRAN,
00200	RESTAB.=PROD+FOO2/noload/proc RTRAN,
00300	IMSAIL=TENXSW.IMS+DEFJS+JSYSES+HEAD[S,AIL](LR)+DB+SAIL[S,AIL]+CC+PARSE[S,AIL]+FOO2[S,AIL]+;
00400	PROD/FORWARD+DATA+RESTAB/FORWARD+ENDDAT  ;
00500	    +SYM[S,AIL]+GEN[S,AIL]+ARRAY[S,AIL]+EXPRS[S,AIL];
00600	+STATS[S,AIL]+LEAP[S,AIL]+TOTAL[S,AIL]+PROCSS[S,AIL]+COMSER[S,AIL]