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