//
//SYSOUT DD SYSOUT=&OUT
//PACRIN DD DSN=&INDSN..BVPSY(DLOUTFIL),DISP=SHR
//PACROU DD DSN=&&DLFIL2,DISP=(,PASS),SPACE=(TRK,1),
//
//
//DELFIL2 EXEC PGM=IDCAMS,COND=(4,EQ,LISFIL2)
//*----------------------------------------
//*:STEPCAT DD DSN=&VSAMCAT,DISP=SHR
//SYSPRINT DD SYSOUT=&OUT
//SYSIN
//PACA10 EXEC PGM=BVPACA10
//*-----------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//
//*
//ANLSR
//PAC7AN
//ARLSR
//PAC7AR
//AYLSR
//PAC7AY
//PAC7AJ
//PAC7AE
//GNLSR
//PACGGN
//GRLSR
//PACGGR
//GULSR
//PACGGU
//PAC7ME
//PAC7MG
//
//
//
//PAC7MV
//
//
//
//SORTLIB DD DSN=&SORTLIB,DISP=SHR
//SORTWK01 DD UNIT=&UWK,SPACE=(CYL,2,,CONTIG)
//SORTWK02 DD UNIT=&UWK,SPACE=(CYL,2,,CONTIG)
//SORTWK03 DD UNIT=&UWK,SPACE=(CYL,2,,CONTIG)
//SYSPRINT DD SYSOUT=&OUT
//SYSOUT
//SYSUDUMP DD SYSOUT=&OUT
//PACA20 EXEC PGM=BVPACA20,COND=(4,LT,PACA10)
//*------------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//
//*
//ANLSR
//PAC7AN
//ARLSR
//PAC7AR
328
VisualAge Pacbase : Guide d'installation Serveur Z/OS CICS & Composants Client
DD DSN=$BCOB,DISP=SHR
UNIT=&UWK,
DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
DD DSN=&&DLFIL2,DISP=(OLD,DELETE)
DD DSN=$BCOB,DISP=SHR
DD DSN=$DFHEXC,DISP=SHR
DD DSN=&INDUV..&BASE.AN,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=ANLSR','BUFND=40','BUFNI=30')
DD DSN=&INDUV..&BASE.AR,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=ARLSR','BUFND=40')
DD DSN=&INDUV..&BASE.AY,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=AYLSR','BUFND=40')
DD DUMMY
DD DSN=&INDSV..BVPAE,DISP=SHR
DD DSN=&INDSV..BVPGN,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=GNLSR','BUFND=10','BUFNI=10')
DD DSN=&INDSV..BVPGR,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=GRLSR','BUFND=10')
DD DSN=&INDSV..BVPGU,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=GULSR','BUFND=10','BUFNI=10')
DD DSN=&&MIA3MB,DISP=(OLD,PASS)
DD DSN=&&PAC7MG,DISP=(,PASS),
UNIT=&UNITS,VOL=&VOLS,
SPACE=&SPAWK,
DCB=(RECFM=FB,LRECL=153,BLKSIZE=15300)
DD DSN=&&PAC7MV,DISP=(,PASS),
UNIT=&UNITS,VOL=&VOLS,
SPACE=&SPAWK,
DCB=(RECFM=FB,LRECL=170,BLKSIZE=17000)
DD SYSOUT=&OUT
DD DSN=$BCOB,DISP=SHR
DD DSN=$DFHEXC,DISP=SHR
DD DSN=&INDUV..&BASE.AN,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=ANLSR','BUFND=40','BUFNI=30')
DD DSN=&INDUV..&BASE.AR,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=ARLSR','BUFND=40')