JCL d'exécution
//$PRFJ.I20 JOB ($CCPT),'PAC I05GDG',CLASS=$CLASSJ,
// MSGCLASS=$MSGCL
//*********************************************************************
//* VISUALAGE PACBASE
//*
//*
- IMPACT ANALYSIS -
//*
INSTALLATION - I05GDG
//*
BUILDING OF INDEX DATA-GROUP FOR "FH" "FO" "FQ" "FR" FILES
//*
//* ->NOTE
//*
----
//*
IF "SMS" IS INSTALLED DELETE //GDGMOD DD STATEMENTS
//*********************************************************************
//BVPGDG
PROC BASE=$BASE,
//
USER=TEST,
//
INDUN='$INDUN',
//*:
VSAMCAT='$VCAT',
//*:
SYSTCAT='$SCAT',
//
STEPLIB='$HLQ..SBVPMBR8',
//
OUT=$OUT,
//
DSCB='$DSCB',
//
VOLS='SER=$VOLUN',
//
UNITS=$UNITUN,
//
UWK=$UWK
//*********************************************************************
//INIFO1 EXEC PGM=BVPRMSYS,PARM='&INDUN..&USER..&BASE'
//*---------------------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//
DD DSN=$BCOB,DISP=SHR
//SYSOUT
DD SYSOUT=&OUT
//SYSABOUT DD SYSOUT=&OUT
//PACRIN DD DDNAME=SYSIN
//PACROU DD DSN=&&DFFO,DISP=(,PASS),UNIT=&UWK,SPACE=(TRK,1),
//
DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
//INIFO2 EXEC PGM=IDCAMS
//*----------------------
//*:STEPCAT DD DSN=&VCAT,DISP=SHR
//GDGMOD
DD DSN=&INDUN..&USER..&BASE.FO,
//
DISP=(,KEEP,DELETE),
//
UNIT=&UNITS,
//
VOL=&VOLS,
//
SPACE=(TRK,0),
//
DCB=(&DSCB,RECFM=FB,LRECL=266,BLKSIZE=26600)
//SYSPRINT DD SYSOUT=&OUT
//SYSIN
DD DSN=&&DFFO,DISP=(OLD,DELETE)
//INIFO3 EXEC PGM=IEBGENER
//*------------------------
//SYSIN
DD DUMMY
//SYSPRINT DD DUMMY
//SYSUT1
DD DUMMY,DCB=(RECFM=FB,LRECL=266,BLKSIZE=266)
//SYSUT2
DD DSN=&INDUN..&USER..&BASE.FO(+1),
//
DISP=(,CATLG,DELETE),
//
UNIT=&UNITS,
//
VOL=&VOLS,
CODE OF VAPAC DATABASE
PACKAGE CODE FOR IMPACT ANALYSIS
INDEX OF NON-VSAM USER FILES
USER VSAM CATALOG
SYSTEM VSAM CATALOG
LIBRARY OF LOAD-MODULES
DSCB MODEL FILE
RESULTS FILE VOLUME
RESULTS FILE UNIT
Chapitre 3. Installation de la partie Serveur
*
*
*
*
*
*
*
*
*
OUTPUT CLASS
WORK UNIT
103