IBM VisualAge Pacbase Guide D'installation page 107

//* INITIAL ALLOCATION OF THE PARAMETERS PDS OF ONE
//* DEVELOPMENT DATABASE
//* .STEP1 : DELETE
//* .STEP2 : ALLOCATION
//*********************************************************************
//*
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=$OUT
//SYSIN DD *
DELETE ($INDUN..$BASE.SY)
//*
//STEP2 EXEC PGM=IEFBR14
//SY DD DSN=$INDUN..$BASE.SY,DISP=(,CATLG,DELETE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6080),
// UNIT=$UNITUN,
// VOL=SER=$VOLUN,
// SPACE=(6080,(100,,10))
//
Module I02SY : Job '$prfj.I2'
Attention : Changer :/ en ./ avant de soumettre le job.
Step Programme
STEP1 IEBUPDTE
JCL d'exécution
===FRM TYPE=DATA
//$PRFJ.I2 JOB ($CCPT),'PAC I02SY',CLASS=$CLASSJ,
// MSGCLASS=$MSGCL
//*********************************************************************
//* VISUALAGE PACBASE
//*
//*
//* LOADING OF THE PARAMETER PDS
//* .STEP1 : LOADING PARAMETERS FOR ONE DEVELOPMENT DATABASE
//* ->NOTE 1
//* ------
//* REPLACE :/ BY ./ BEFORE SUBMITTING THE JOB
//* ->NOTE 2
//* ------
//* THIS JOB CONTAINS THE SYSIN'S FOR ALLOCATING THE FILES
//* THAT MAKING UP THE DEVELOPMENT DATA BASE :
//* ADAPT THE SIZES SPECIFIED IN THE 'DEFINE' STATEMENTS
//* TO YOUR REQUIREMENTS.
//*********************************************************************
//*
//STEP1 EXEC PGM=IEBUPDTE,PARM=NEW
//SYSPRINT DD SYSOUT=$OUT
//SYSUT2 DD DSN=$INDUN..$BASE.SY,DISP=SHR
//SYSIN DD DATA,DLM='PP'
:/ ADD NAME=DF$BASE.AN
Commentaires
Chargement
INSTALLATION - I02SY
Chapitre 3. Installation de la partie Serveur
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
95