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)