.PROC,DST180.
REWIND,NOSVETP,CMDFILE,CMDS3.
ACCFILE.
DSMDST.
REWIND(NOSVETP)
DISPLAY(R2)
DISPLAY(R1G)
DISPLAY(EFG)
RUN180.
REVERT.
EXIT.
DMD.
DMD,0,200000.
DAYFILE,OUTPUT.
ROUTE,OUTPUT,DC=PR.
RETURN(NOSVETP)
REVERT.
/EOR
