Link-Edit Des Exits Dans Bibliothèque Autorisée - IBM VisualAge Pacbase Guide D'installation

LINK-EDIT des EXITS dans bibliothèque autorisée
Module D14EXIT : job '$PRFJ.EXT.
Le système VA Pacbase Endevor est constitué de deux EXITS (EXIT2 et EXIT3)
lesquels doivent être linkés avec le DRIVER d'Endevor 'EPC1UEXT'.
Pour ce faire, le job '$PRFJ.EXT' contient les deux étapes suivantes (à adapter
suivant les sites) :
Step Programme
ET010 IEWL
ET020 IEWL
Important : à l'issue de ce job, ne pas oublier de définir les EXITS dans
Endevor par l'ajout de ceux-ci via les lignes de macro à C1UEXIT du jcl
Endevor 'BC1JXITS'.
JCL d'exécution
//$PRFJ.EXT JOB ($CCPT),'EXIT2-EXIT3',CLASS=$CLASSJ,
// MSGCLASS=$MSGCL
//********************************************************************
//*
//* LINK-EDIT EXITS IN AN AUTHORIZED LINKLIST LIBRARY
//*
//*
//*
//* IMPORTANT: YOU MUST DEFINED EXIT PROGRAMS TO ENDEVOR BY ADDING
//* THEM TO THE àC1UEXIT MACRO IN THE ENDEVOR JCL
//* 'BC1JXITS'.
//*
//********************************************************************
//ET010 EXEC PGM=IEWL,PARM='LIST,XREF,LET'
//SYSUT1 DD UNIT=SYSDA,SPACE=(1024,(300,100))
//SYSLIB DD DSN='$HLQ..SBVPMBR8',DISP=SHR
// DD DSN=$LDLIB,DISP=SHR
// DD DSN=$CONLIB,DISP=SHR
//SYSLMOD DD DSN=$LDLIB,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSLIN DD *
INCLUDE SYSLIB(EPC1UEXT)
INCLUDE SYSLIB(C1UEXT02)
ENTRY EPC1UEXT
NAME C1UEXT02(R)
/*
//*
//ET020 EXEC PGM=IEWL,PARM='LIST,XREF,LET'
//SYSUT1 DD UNIT=SYSDA,SPACE=(1024,(300,100))
//SYSLIB DD DSN='$HLQ..SBVPMBR8',DISP=SHR
// DD DSN=$LDLIB,DISP=SHR
Commentaires
Link de l'EXIT2
Link de l'EXIT3
----------------
Chapitre 3. Installation de la partie Serveur
*
*
*
*
*
*
*
*
*
89