.NOOPERATOR .COP FOR05.DAT=CDR:A .REN BMDX85.F4=BMDX85.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 BMDX85.F4 /W .DIS /R FAILSA RUN:: .COP BMDX85.F4=BMDX85.F4[113,113],FILE.F4 .AS DSK 5 .AS DSK 6 .EX BMDX85,APLIB[460,460]/LIB,NGLIB[210,210]/LIB .DEL BMDX85.F4 .R PIP LPT:=FOR06.DAT/P