.NOOPERATOR .COP FOR05.DAT=CDR:A .REN BMDX94.F4=BMDX94.F4[113,113] .IF(NOERROR).GOTO RUN .MOU MTA FAILSA /WL /VID:185-OR-MD35 /REELID:DUMMY .IF(ERROR).REQUEUE .R FAILSA /W/G113,113 /O113,113 /8 BMDX94.F4 /W .DIS /R FAILSA RUN:: .COP BMDX94.F4=BMDX94.F4[113,113],FILE.F4 .AS DSK 2 .AS DSK 5 .AS DSK 6 .EX BMDX94.F4,APLIB[460,460]/LIB .DEL BMDX94.F4 .R PIP LPT:=FOR06.DAT/P