What is the best way to migrate the Panvalet PANLIB libraries from a VSE system to z/OS?
Panvalet z/VSE V14.4
Panvalet z/OS V14.6
Two options are available depending on if there are tape units shared between the z/VSE and z/OS systems or if there is Shared DASD between the two systems.
Option 1 - Tape Backup and Restore
For each Panvalet PANLIB, create a tape Protection file / backup on the z/VSE system and Restore it on the z/OS system:
1) Create a Panvalet Protection file using PAN#2 ++DUMP on the VSE system -
* $$ JOB
// JOB
/*
// OPTION LOG
// LIBDEF PHASE,SEARCH=lib.sublib
/* this is the input Panvalet PANLIB
// ASSGN SYS006,DISK,VOL=volser,SHR
// DLBL PANDD1,'vse.Panvalet.PANLIB',,DA
// EXTENT SYS006,volser,1,0,reltrk,ntrks
/* this is the Panvalet Protection (Backup) file
// ASSGN SYS005,CUU
// TLBL PANDD2,'PANLIB.PROTECT.TAPE'
// EXEC PAN#2,SIZE=AUTO
++DUMP
++PRINT 6-UP
/*
/&
* $$ EOJ
2) Create a PANLIB on the z/OS system using the PAN#4 ++CLEAR utility and Restore the members from the Protection file:
//jobname JOB .. .. ..
//********************************************************************
//* THIS JOB WILL RESTORE ALL MEMBERS ON A PANVALET PROTECTION *
//* (BACKUP) FILE TO A NEW PANLIB. *
//********************************************************************
//CLRPVLIB EXEC PGM=PAN#4,REGION=0M
//STEPLIB DD DISP=SHR,DSN=Panvalet.CBA3LINK
//PANDD1 DD DSN=hlq.mlq.Panvalet.PANLIB,
// DISP=(NEW,CATLG,DELETE),
// DCB=(DSORG=DA,BLKSIZE=nnnn),
// SPACE=(CYL,nnn),
// UNIT=unit,
// VOL=SER=zosvolser
//SYSPRINT DD SYSOUT=*
//INDEX DD SYSOUT=*
//OSJOB DD DUMMY
//SYSIN DD *
++CLEAR
/*
//PVRESTR EXEC PGM=PAN#2,REGION=0M
//STEPLIB DD DISP=SHR,DSN=Panvalet.CBA3LINK
//SYSPRINT DD SYSOUT=*
//PANDD1 DD DISP=SHR,DSN=hlq.mlq.Panvalet.PANLIB
//PANDD2 DD DUMMY
//PANDD3 DD DSN=PANLIB.PROTECT.TAPE,
// DISP=(OLD,KEEP),
// UNIT=tape-unit,
// VOL=SER=volser
//SYSIN DD *
++RESTORE
/*
//
Option 2 - Shared DASD Disk-to-Disk Copy
1) Create a Panvalet Protection file / backup using PAN#2 ++DUMP on the VSE system -
* $$ JOB
// JOB
/*
// OPTION LOG
// LIBDEF PHASE,SEARCH=lib.sublib
/* this is the input Panvalet PANLIB
// ASSGN SYS006,DISK,VOL=volser,SHR
// DLBL PANDD1,'vse.Panvalet.PANLIB',,DA
// EXTENT SYS006,volser,1,0,reltrk,ntrks
/* this is the Panvalet Protection (Backup) file
// ASSGN SYS005,DISK,VOL=shared-dasd-volser,SHR
// DLBL PANDD2,'PANLIB.PROTECT.FILE'
// EXTENT SYS005,volser,1,0,reltrk,ntrks
// EXEC PAN#2,SIZE=AUTO
++DUMP
++PRINT 6-UP
/*
/&
* $$ EOJ
2) Create a PANLIB on the z/OS system using the PAN#4 ++CLEAR utility and Restore the members from the Protection file:
//jobname JOB .. .. ..
//********************************************************************
//* THIS JOB WILL RESTORE ALL MEMBERS ON A PANVALET PROTECTION *
//* (BACKUP) FILE TO A NEW PANLIB. *
//********************************************************************
//CLRPVLIB EXEC PGM=PAN#4,REGION=0M
//STEPLIB DD DISP=SHR,DSN=Panvalet.CBA3LINK
//PANDD1 DD DSN=hlq.mlq.Panvalet.PANLIB,
// DISP=(NEW,CATLG,DELETE),
// DCB=(DSORG=DA,BLKSIZE=nnnn),
// SPACE=(CYL,nnn),
// UNIT=unit,
// VOL=SER=zosvolser
//SYSPRINT DD SYSOUT=*
//INDEX DD SYSOUT=*
//OSJOB DD DUMMY
//SYSIN DD *
++CLEAR
/*
//PVRESTR EXEC PGM=PAN#2,REGION=0M
//STEPLIB DD DISP=SHR,DSN=Panvalet.CBA3LINK
//SYSPRINT DD SYSOUT=*
//PANDD1 DD DISP=SHR,DSN=hlq.mlq.Panvalet.PANLIB
//PANDD2 DD DUMMY
//PANDD3 DD DISP=SHR,DSN=PANLIB.PROTECT.FILE
//SYSIN DD *
++RESTORE
/*
//