Mius - Migration Utilisateurs; Mius - Présentation Générale - IBM VisualAge Pacbase Guide D'installation

//
//PAC7MX
//
//
//PAC7TD
//
//
//PAC7GY
//
//
//PAC7UE
//
//
//SYSUDUMP DD SYSOUT=&OUT
//*
//PRMSYS EXEC PGM=BVPRMSYS,PARM='&USER,&INDUV',COND=EVEN
//*-----------------------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//
//SYSOUT DD SYSOUT=&OUT
//PACRIN DD DSN=&INDSN..BVPSY(DLSYSEXT),DISP=SHR
//PACROU DD DSN=&&DLSYSEXT,DISP=(,PASS),SPACE=(TRK,1),
//
//
//DELETE EXEC PGM=IDCAMS,COND=EVEN
//*-------------------------------
//*:STEPCAT DD DSN=&VSAMCAT,DISP=SHR
//SYSPRINT DD SYSOUT=&OUT
//SYSIN
//PACTH1 EXEC PGM=BVPACTH1,COND=(4,LT,PACX)
//*----------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//*:STEPCAT DD DSN=&SYSTCAT,DISP=SHR
//*:
//PAC7GY
//PAC7RQ
//
//
//
//SYSPRINT DD SYSOUT=&OUT
//SYSOUT
//SYSUDUMP DD SYSOUT=&OUT

MIUS - Migration Utilisateurs

MIUS - Présentation générale
Principe
Transformation des users en create user.
Cette procédure est l'utilitaire qui permet de transformer des Users en Create
users. Suite à l'extraction des utilisateurs déclarés dans l'administration, un
294
VisualAge Pacbase : Guide d'installation Serveur Z/OS CICS & Composants Client
DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
DD DSN=&&MX,DISP=(,PASS),UNIT=&UWK,
SPACE=&SPAMB,
DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
DD DSN=&&TD,DISP=(,PASS),UNIT=&UWK,
SPACE=&SPATD,
DCB=(RECFM=FB,LRECL=286,BLKSIZE=6292)
DD DSN=&&GY,DISP=(,PASS),UNIT=&UWK,
SPACE=&SPAGY,
DCB=(RECFM=FB,LRECL=310,BLKSIZE=6200)
DD DSN=&&UE,DISP=(,PASS),UNIT=&UWK,
SPACE=&SPAMV,
DCB=(RECFM=FB,LRECL=230,BLKSIZE=6440)
DD DSN=$BCOB,DISP=SHR
UNIT=&UWK,
DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
DD DSN=&&DLSYSEXT,DISP=(OLD,DELETE)
DD DSN=&VSAMCAT,DISP=SHR
DD DSN=&&GY,DISP=(OLD,PASS)
DD DSN=&OUTFILE,DISP=(,CATLG),
UNIT=&UNITS,VOL=&VOLS,
SPACE=&SPAOT,
DCB=(RECFM=FB,BLKSIZE=11000,LRECL=110)
DD SYSOUT=&OUT