Control Data 3170 Installation Handbook page 294

Sample 6 deletes MSSORT. accepts input from LUN 12 until encountering an EOF.
deletes MSSMERG. and accepts MSSMERG from LUN 15.
$JOB, 4JL52, DWL, 10
$EQUIP, 01 =MT , 02 =MT
$EQUIP, 12=MT, 15=MT
$PLIBEDIT
MSSORT
MSSMERG
MSSMERG
77
88
$EOJ
DELETE/
UNIT/
DELETE/
UNIT/
ENDEDIT /
Sample 6
12
15
Sample 7 deletes COSY through to COSYRDWT, accepts input from LUN 10 (mass
storage file) until encountering an EOF, deletes SCAR, and accepts the binary image
of SCAR from LUN 12.
$JOB, 4JL52, XCL, 87!1
$FET, XCL, COSY, 960
$OPEN,10
$FET,XCLl, SCAR, 960
$OPEN,12
$PLIBEDIT
COSY
SCAR
SCAR
77
88
$EOJ
60410800 A
DELETE/
FILE/
DELETE/
FILE/
ENDEDIT/
10
12
Sample 7
COSYRDWT
III-I0- 5