Chargement Du Pds Des Paramètres Du Système - IBM VisualAge Pacbase Guide D'installation

Step Programme
STEP01 IMASPZAP
JCL d'exécution
//$PRFJ.XIT JOB ($CCPT),'ZAP EXIT USER',CLASS=$CLASSJ,
// MSGCLASS=$MSGCL
//****************************************************
//* --- ZAP 'C1UEXT02' EXIT USER ---
//****************************************************
//*
//*--------------------------------------------------*
//*
//*
//* IT IS NOT NECESSARY TO EXECUTE THIS JOB
//* IF THE SUFFIX OF THE PACBASE USER MESSAGES
//* MEMBER OF ENDEVOR 'ISPMLIB' LIBRARY CONTAINS *
//* THE VALUE '50' (CHECK 'MSGSX' PARAMETER).
//* IF THE SUFFIX IS MODIFIED, THIS STEP MUST BE
//* EXECUTED. IN ORDER TO DO SO, THE 'MSGSHX'
//* MUST BE CODED WITH THE CORRESPONDING HEXA-
//* DECIMAL VALUE OF THE NEW SUFFIX.
//* FOR INST: IF THE NEW SUFFIX IS: MSGSX='89', *
//*
//*
//*--------------------------------------------------*
//*
//STEP01 EXEC PGM=IMASPZAP
//SYSLIB DD DSN=$HLQ..SBVPMBR8,DISP=SHR
//SYSPRINT DD SYSOUT=$OUT
NAME C1UEXT02 C1UEXT02
VER 0303 F5F0
REP 0303 $MSGSXH
//*
//
Chargement du PDS des paramètres du système
Module D12SY : job '$PRFJ.SY'
Ce job comprend un IEBUPDTE des membres suivants :
Les entrées destinées aux utilitaires de TRI.
v
Les définitions (DELETE/DEFINE), les vérifications (VERIFY) et les
v
REPRO des fichiers VSAM.
Commentaires
ZAP de l'EXIST2. Il concerne le nom membre de
la bibliothèque 'ISPMLIB' des messages VA
Pacbase Endevor. A n'exécuter que si la valeur
choisie pour le paramètre $MSGSXH n'est pas
'50'.
I M P O R T A N T
-----------
THE 'MSGSXH' PARAMETER MUST BE
CODED: MSGSXH='F8F9'.
Chapitre 3. Installation de la partie Serveur
*
*
*
*
*
*
*
*
*
*
*
*
71