ACCESS,DN=NA,ID=WMCO.
ACCESS,DN=NUMLIB,ID=CC.
ACCESS,DN=BEGIN,ID=EHG.
CFT,ON=Z,L=CFTOUT.
COPYF,I=BEGIN.
LDR,LIB=NA:NUMLIB,MAP=PART,L=LDRMAP.
DISPOSE,DN=FT30,MF=XB,DC=ST,TEXT='|/b2/c1127/ehg/bin/rks astro/swift /tmp/mv'.
EXIT.
DUMPJOB.
DEBUG,BLOCKS,PAGES=20.
REWIND,DN=CFTOUT.
COPYF,I=CFTOUT.
REWIND,DN=LDRMAP.
COPYF,I=LDRMAP.
