IBM VisualAge Pacbase Guide D'installation page 92

Table des Matières

Publicité

//SYSUT4
//SYSUT5
//SYSUT6
//SYSUT7
//SYSIN
//SYSLIN
//
//
//SYSPRINT DD SYSOUT=&OUT
//*
//LKED
//**
//SYSLIB
//
//SYSLIN
//
//SYSLMOD DD DSN=&LOADTEST,DISP=SHR,FOOTPRNT=CREATE
//SYSUT1
//SYSPRINT DD SYSOUT=&OUT
//*
//TRS00
//
//
//
//TRS02A
//
//
//TRS02B
//
//
//TRS03A
//
//
//TRS04A
//
//
//TRS04B
//
//
//*
//TRS01
//
//
//
//
//
//
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//PAC7PU
//PAC7TR
//
//
//*
//TRS02
80
VisualAge Pacbase : Guide d'installation Serveur Z/OS CICS & Composants Client
DD UNIT=SYSDA,SPACE=(CYL,(1,1)),DISP=(,DELETE)
DD UNIT=SYSDA,SPACE=(CYL,(1,1)),DISP=(,DELETE)
DD UNIT=SYSDA,SPACE=(CYL,(1,1)),DISP=(,DELETE)
DD UNIT=SYSDA,SPACE=(CYL,(1,1)),DISP=(,DELETE)
DD DSN=&&ELMSRC,DISP=(OLD,DELETE)
DD DSN=&&LOADSET,UNIT=SYSDA,DISP=(MOD,PASS),
SPACE=(400,(500,200)),
DCB=(RECFM=FB,LRECL=80,BLKSIZE=80)
EXEC PGM=HEWL,PARM=(LIST,LET,XREF),MAXRC=04
COND=(4,LT,COB)
DD DSNAME=CEE.SCEELKED,DISP=SHR
DD DSN=&LOADTEST,DISP=SHR
DD DSNAME=&&LOADSET,DISP=(OLD,DELETE)
DD *,DCB=BLKSIZE=80
NAME &C1ELEMENT(R)
DD UNIT=SYSDA,SPACE=(1024,(50,20))
EXEC PGM=BC1PDSIN,MAXRC=0,
EXECIF=((&C1ACTION(1,3),NE,'ADD'),
(&C1ACTION(1,4),NE,'MOVE'),
(&C1ACTION(1,6),NE,'UPDATE'))
DD DSN=&&SYSOUT1,DISP=(,PASS,DELETE),UNIT=SYSDA,
DCB=(RECFM=FBA,LRECL=121,BLKSIZE=6171),
SPACE=(TRK,(5,5),RLSE)
DD DSN=&&SYSDMP1,DISP=(,PASS,DELETE),UNIT=SYSDA,
DCB=(RECFM=FBA,LRECL=121,BLKSIZE=6171),
SPACE=(TRK,(5,5),RLSE)
DD DSN=&&SYSOUT2,DISP=(,PASS,DELETE),UNIT=SYSDA,
DCB=(RECFM=FBA,LRECL=121,BLKSIZE=6171),
SPACE=(TRK,(5,5),RLSE)
DD DSN=&&SYSOUT3,DISP=(,PASS,DELETE),UNIT=SYSDA,
DCB=(RECFM=FBA,LRECL=121,BLKSIZE=6171),
SPACE=(TRK,(5,5),RLSE)
DD DSN=&&SYSDMP3,DISP=(,PASS,DELETE),UNIT=SYSDA,
DCB=(RECFM=FBA,LRECL=121,BLKSIZE=6171),
SPACE=(TRK,(5,5),RLSE)
EXEC PGM=&ROOTPGM.PNTRAN,
EXECIF=((&C1ACTION(1,3),NE,'ADD'),
(&C1ACTION(1,4),NE,'MOVE'),
(&C1ACTION(1,6),NE,'UPDATE')),
PARM=(&C1ACTION(1,8,_),&C1ENVMNT(1,8,_),
&C1SYSTEM(1,8,_)&C1SUBSYS(1,8,_)&C1ELTYPE(1,8,_),
&C1ELEMENT(1,10,_)&C1STGNUM(1,1,_)&C1CCID(1,12,_)G)
DD DSN=&UP,DISP=SHR
DD DSN=&&PAC7TR,DISP=(,PASS),UNIT=SYSDA,
DCB=(RECFM=FB,LRECL=58,BLKSIZE=58),
SPACE=(TRK,(01,01),RLSE)
EXEC PGM=&ROOTPGM.PNPR10,

Publicité

Table des Matières
loading

Table des Matières