Echange Mouvements Gy Entre Base 2.N Et 3.N (Gy25); Gy25 - Présentation Générale - IBM VisualAge Pacbase Guide D'installation

//PACGGN
//GRLSR
//PACGGR
//GULSR
//PACGGU
//PAC7MB
//PAC7MV
//
//
//PAC7ME
//
//
//PAC7EF
//PAC7DD

Echange mouvements GY entre base 2.n et 3.n (GY25)

GY25 - Présentation générale
Principe
Cette procédure permet de reprendre des mouvements de format UPDP de la
version 2.0 ou 2.5 vers la nouvelle version.
Limites
Les Entités utilisateur, Relations, Manuels de type 'U' ne sont pas traités.
Les appels de Format-guides sont traités comme des commentaires.
Les types de Format-guides changent entre la 2.n et la 3.n : pour permettre
l'échange de mouvements entre ces versions, il faut exécuter en 2.n la
procédure UTFG qui attribue les types de la 3.n.
Condition d'exécution
Aucune.
Edition obtenue
Cette procédure édite un compte-rendu signalant les anomalies rencontrées.
Résultat obtenu
Cette procédure génère un fichier mouvement à destination de la procédure
UPDP de la nouvelle version ainsi qu'un fichier des mouvements rejetés.
204
VisualAge Pacbase : Guide d'installation Serveur Z/OS CICS & Composants Client
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..BVPGU,DISP=SHR
DD SUBSYS=(&LSR,'DDNAME=GULSR','BUFND=10','BUFNI=10')
DD DSN=&OLDMB,DISP=SHR
DD DSN=&&PACMV,DISP=(,PASS),UNIT=&UWK,
SPACE=(TRK,(100,20),RLSE),
DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
DD DSN=&&PACME,DISP=(,PASS),UNIT=&UWK,
SPACE=(TRK,(100,20),RLSE),
DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
DD SYSOUT=&OUT
DD SYSOUT=&OUT