$DEFM
$AS OUT TO DEV=M9 BLOC=N
$@SYSTEM(SYSTEM)FILEMGR
USERNAME DOC
SAVEU FILE=SRNNBC1X
EXIT
$AS OUT TO DEV=M9 BLOC=N
$OPTION 5
$@SYSTEM(SYSTEM)FILEMGR
USERNAME BIN
SAVEU FILE=NBCC,NBLD,NBYACC
SAVEU FILE=C.SRT.O,C.SRTE.O,C??,FIXER,NBC??,NBCC,NBCCOM,NBLD,NBYACC
EXIT
$AS OUT TO DEV=M9 BLOC=N
$@SYSTEM(SYSTEM)FILEMGR
USERNAME CINCLUDE
SAVEU
USERNAME NBLIB
SAVEU FILE=C.SRT.O,C.SRT.S,C.SRTE.O,C.SRTE.S,CLB,CDR,FCALL.S,FPS.C
USERNAME LIB
SAVEU FILE=YACCPAR
USERNAME SAMPLE
SAVEU
EXIT
$AS OUT TO DEV=M9 BLOC=N
$@SYSTEM(SYSTEM)FILEMGR
USERNAME DOC
SAVEU
REWIND OUT
EXIT
$ENDM
