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]