1
//OLDRWEB JOB MSGLEVEL=1,CLASS=A,MSGCLASS=S
2
//JOBCAT DD DSN=ICFCAT.ESAWK2,DISP=SHR
3
/*ROUTE PRINT xxxxxx.xxxxxxx
4
/*ROUTE PUNCH xxxxxx.xxxxxxx
5
//TLDR EXEC PGM=TPFLDRCA,REGION=8M,
6
// PARM='OLDR,SYS=ACP,CLMSIZE=8000000'
7
//STEPLIB DD DSN=ACP.LINK.RLSE46.WEB,DISP=SHR
8
// DD DSN=ACP.LINK.RLSE40.BSS,DISP=SHR
9
// DD DSN=VIS0000.DEVP.TEST.LK,DISP=SHR
10
// DD DSN=SYS1.CEE.SCEERUN,DISP=SHR
11
//SALTB DD DSN=ACP.SALTBL.RLSE46.WEB,DISP=SHR
12
// DD DSN=ACP.SALTBL.INTG46.WEB,DISP=SHR
13
//OBJLIB DD DSN=FSE0000.DEVP.TEST.OB,DISP=SHR
14
// DD DSN=APA0000.DEVP.TEST.OB,DISP=SHR
15
// DD DSN=ACP.DRVE.TEST.OB,DISP=SHR
16
// DD DSN=ACP.OBJ.RLSE46.WEB,DISP=SHR
17
// DD DSN=ACP.OBJ.INTG36.DRV,DISP=SHR
18
// DD DSN=ACP.OBJ.INTG46.WEB,DISP=SHR
19
// DD DSN=ACP.OBJ.INTG40.BSS,DISP=SHR
20
//LOADMOD DD DSN=FSE0000.DEVP.TEST.LK,DISP=SHR
21
// DD DSN=APA0000.DEVP.TEST.LK,DISP=SHR
22
// DD DSN=CWEISS.LINK,DISP=SHR
23
// DD DSN=ACP.DRVE.TEST.LK,DISP=SHR
24
// DD DSN=ACP.LINK.RLSE46.WEB,DISP=SHR
25
// DD DSN=ACP.LINK.INTG98.NBS,DISP=SHR
26
// DD DSN=ACP.LINK.INTG46.WEB,DISP=SHR
27
// DD DSN=ACP.LINK.INTG36.DRV,DISP=SHR
28
// DD DSN=ACP.LINK.INTG40.BSS,DISP=SHR
29
//LOADSUM DD DSN=&&LOADSUM,DISP=(NEW,PASS),UNIT=SYSDA,
30
// LRECL=133,SPACE=(TRK,(10,10)),RECFM=FBA
31
//CPRTEMP DD UNIT=SYSDA,
32
// DSN=&&CPRTEMP,SPACE=(TRK,(100,20)),
33
// DCB=(RECFM=FB,BLKSIZE=4095,LRECL=4095),
35
//PROGTEMP DD UNIT=SYSDA,
36
// DSN=&&PRTEMP,SPACE=(TRK,(100,20)),
37
// DCB=(RECFM=FB,BLKSIZE=4095,LRECL=4095),
39
//OUTPUT DD DSN=&&VRDROUT,DISP=(NEW,PASS),UNIT=SYSDA,
40
// DCB=(RECFM=F,BLKSIZE=4095,LRECL=4095)
44
//SYSPRINT DD SYSOUT=A
51
LOADER LOADSET lllllll
52
LOADER CALL PROG ppppvv
54
//TRANSMIT EXEC PGM=IKJEFT01,
55
// PARM='TRANSMIT xxxxxx.xxxxxx DDNAME(SYSTSIN) NOLOG NONOTIFY SEQ'
56
//SYSTSIN DD UNIT=SYSDA,
57
// DSN=&&VRDROUT,DISP=(OLD,DELETE)