IBM VisualAge Pacbase Guide D'installation page 160

//*
//*
//* ------------------------------------------------------
//*
//BVPPE25 PROC OUT=$OUT,
//
//
//*:
//*:
//
//
//
//
//
//
//*********************************************************************
//INPUT EXEC PGM=BVPTU001
//*-----------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//
//CARTE
//PAC7MB
//
//
//VERIFY EXEC PGM=IDCAMS
//*---------------------
//*:STEPCAT DD DSN=&VSAMCAT,DISP=SHR
//*:
//SYSPRINT DD SYSOUT=&OUT
//PAC7AE
//PACGGR
//PACGGN
//PACGGY
//PACGGU
//SYSIN
//
//
//
//
//PTU920 EXEC PGM=BVPTU920
//*-----------------------
//*:STEPCAT DD DSN=&VSAMCAT,DISP=SHR
//*:
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//
//SYSOUT
//SYSOUX
//SYSPRINT DD SYSOUT=&OUT
//SYSUDUMP DD SYSOUT=&OUT
//PAC7AE
//PAC7MB
//PAC7EN
//PAC7GY
//
//
148
VisualAge Pacbase : Guide d'installation Serveur Z/OS CICS & Composants Client
RETRIEVAL OF PE FILE
INDSV='$INDSV',
INDSN='$INDSN',
VSAMCAT='$VCAT',
SYSTCAT='$SCAT',
STEPLIB='$HLQ..SBVPMBR8',
LSR='BLSR',
OUTL=$OUT,
OLDPE=,
UWK=$UWK,
SPAMB='(TRK,(100,10),RLSE)'
DD DSN=$BCOB,DISP=SHR
DD DDNAME=SYSIN
DD DSN=&&PE25MB,DISP=(,PASS),
UNIT=&UWK,SPACE=(TRK,(5,1),RLSE),
DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
DD DSN=&SYSTCAT,DISP=SHR
DD DSN=&INDSV..BVPAE,DISP=SHR
DD DSN=&INDSV..BVPGR,DISP=SHR
DD DSN=&INDSV..BVPGN,DISP=SHR
DD DSN=&INDSV..BVPGY,DISP=SHR
DD DSN=&INDSV..BVPGU,DISP=SHR
DD DSN=&INDSN..BVPSY(VERIFAE),DISP=SHR
DD DSN=&INDSN..BVPSY(VERIFGR),DISP=SHR
DD DSN=&INDSN..BVPSY(VERIFGN),DISP=SHR
DD DSN=&INDSN..BVPSY(VERIFGY),DISP=SHR
DD DSN=&INDSN..BVPSY(VERIFGU),DISP=SHR
DD DSN=&VSAMCAT,DISP=SHR
DD DSN=$BCOB,DISP=SHR
DD SYSOUT=&OUT
DD SYSOUT=&OUT
DD DSN=&INDSV..BVPAE,DISP=SHR
DD DSN=&&PE25MB,DISP=(OLD,DELETE)
DD DSN=&OLDPE,DISP=SHR
DD DSN=&&PACGY,DISP=(,PASS),UNIT=&UWK,
SPACE=(TRK,(100,20),RLSE),
DCB=(RECFM=FB,LRECL=310,BLKSIZE=3100)
OUTPUT CLASS
INDEX OF SYSTEM VSAM FILES
INDEX OF SYSTEM NON VSAM FILES
USER VSAM CATALOG
SYSTEM VSAM CATALOG
LIBRARY OF LOAD-MODULES
LSR BATCH SYSTEM NAME
OUTPUT CLASS OF REPORTS
DS NAME OF OLD PE
TRANSACTION SPACE
WORK UNIT