About an impact of replacing DISK from 3380 to 3390 for CA Panvalet.

Document ID : KB000093576
Last Modified Date : 07/05/2018
Show Technical Document Details
Introduction:
The customer has a plan to replace their DISK from 3380 to 3390.
Question:
Does CA Panvalet have an impact if we replace the DISK from 3380 to 3390 ?
Environment:
z/OS
Answer:
The Blocksize of the CA Panvalet library depends on the DISK type and it is different.
Please see the "Block Sizes for Initializing the Library (3375, 3380, 3390)" of "System Management Guide" for the Blocksize.
So, you have to execute the following process for reallocation.

1. PAN#2 ++ATTRIBUTE ;
//STEP01  EXEC PGM=PAN#2,PARM='OPEN=INP'
//STEPLIB  DD DSN=PANVLT.R146.CBA3LINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//PANDD1   DD DSN=User.PANLIB.OLD,DISP=SHR
//SYSIN    DD *
++ATTRIBUTE
/*
//

2. PAN#2 ++DUMP ;
//STEP01  EXEC PGM=PAN#2
//STEPLIB  DD DSN=PANVLT.R146.CBA3LINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//PANDD1   DD DSN=User.PANLIB.OLD,DISP=SHR
//PANDD2   DD DSN=User.DUMP,DISP=(,CATLG,DELETE),
//            UNIT=sysda,VOL=SER=volume,SPACE=(cyl,(n,n))
//SYSIN    DD *
++DUMP
/*
//

3. PAN#4 ++CLEAR ;
//STEP01  EXEC PGM=PAN#4
//STEPLIB  DD DSN=PANVLT.R146.CBA3LINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//PANDD1   DD DSN=User.PANLIB.NEW,DISP=(,CATLG,DELETE),
//            VOL=SER=volume,UNIT=sysda,SPACE=(cyl,nn),
//            DCB=DSORG=DA
//SYSIN    DD *
++CLEAR RECORDS=nn
/*
//

4. PAN#2 ++RESTORE ;
//STEP01  EXEC PGM=PAN#2
//STEPLIB  DD DSN=PANVLT.R146.CBA3LINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//PANDD1   DD DSN=User.PANLIB.NEW,DISP=SHR
//PANDD3   DD DSN=User.DUMP,DISP=SHR
//SYSIN    DD *
++RESTORE
/*
//