//PAC7AY
//GNLSR
//PACGGN
//GRLSR
//PACGGR
//GYLSR
//PACGGY
//GULSR
//PACGGU
//PAC7DC
//PAC7IE
//PAC7IF
//PAC7ME
//PAC7MV
//PAC7RB
//PAC7RY
//SYSUDUMP DD SYSOUT=&OUT
Reprise commandes d'édition-génération (PG25)
PG25 - Présentation générale
Principe
La procédure PG25 permet de reprendre le fichier PG image séquentielle des
commandes d'édition-génération de la version 2.5 au nouveau format.
Elle met à jour la Base de Développement avec les commandes
d'édition-génération, et la Base Administration avec les lignes de JCL
(présentes sur l'écran GP visualisé en option C4 version 2.5).
Condition d'exécution
Les fichiers de la Base Administration et de la Base de Développement
doivent être fermés dans le transactionnel.
Edition obtenue
Cette procédure édite un compte-rendu signalant les anomalies rencontrées.
Remarques
La mise à jour rejettera tout mouvement à insérer dans une bibliothèque ou
une session inexistante dans la nouvelle base. Le fichier PG peut contenir des
commandes spécifiques à une bibliothèque ou une session purgée
ultérieurement.
DD SUBSYS=(&LSR,'DDNAME=AYLSR','BUFND=10')
DD DSN=&INDSV..BVPGN,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=GNLSR','BUFND=10','BUFNI=10')
DD DSN=&INDSV..BVPGR,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=GRLSR','BUFND=10')
DD DSN=&INDSV..BVPGY,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=GYLSR','BUFND=10')
DD DSN=&INDSV..BVPGU,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=GULSR','BUFND=10','BUFNI=10')
DD DUMMY
DD SYSOUT=&OUTL
DD SYSOUT=&OUTL
DD DSN=&&PAC7ME,DISP=(OLD,DELETE)
DD DSN=&&PAC7MV,DISP=(OLD,DELETE)
DD DUMMY
DD DUMMY
Chapitre 7. Reprises et échanges entre bases 2.n et 3.n
171