search cancel

About recovery of PV033 LIBRARY MALFUNCTION ERROR

book

Article ID: 243184

calendar_today

Updated On:

Products

Panvalet

Issue/Introduction

Please tell me how to recover the PV033 error.

Environment

Release : ALL

Component : Panvalet

Resolution

Please follow the steps below to recreate the library in which PV033 LIBRARY MALFUNCTION ERROR occurred.

1. Allocate a new library with PAN#4 ++CLEAR.

2. Copy all members to the newly allocated library with PAN#2 ++TRANSFER.
  Specify that you want to copy from the first member to the last member.
  The process is interrupted by an error member, so copy from the next member to the last member.
  If more than one error member exists in the library, this process is repeated.
  In this process, all members except the error member are copied to the newly created library.


  For example;
   ++OPTION OUTPUT                            Note-1
   ++TRANSFER Start member,9999999999         Note-2


   Note-1:
    ++OPTION OUTPUT to copy members directly from the Panvalet library specified in PANDD1 DD to the Panvalet library specified in PANDD2 DD.

   Note-2:
    The starting member name of ++TRANSFER must be a member name that exists in the library. The ending member name does not have to exist.
    To copy all members, as in the above example, specify 9999999999 as the maximum member name.

3. Restore the error member from the backup file using PAN#2 ++RESTORE.


Sample JCL:

//STEP01  EXEC PGM=PAN#4
//STEPLIB  DD  DSN=PANVLT.R146.CBA3LINK,DISP=SHR
//SYSPRINT DD  SYSOUT=*
//PANDD1   DD  DSN=PANVLT.USER.PANLIB.NEW,DISP=(NEW,CATLG,DELETE),
//         UNIT=SYSDA,SPACE=(CYL,10),VOL=SER=WORK01,
//         DCB=(DSORG=DA)
//SYSIN    DD  *
++CLEAR RECORDS=aa,DATASETS=bbbb
/*
//

//STEP02  EXEC PGM=PAN#2,REGION=4M
//STEPLIB  DD  DSN=PANVLT.R146.CBA3LINK,DISP=SHR
//SYSPRINT DD  SYSOUT=*
//PANDD1   DD  DSN=PANVLT.USER.PANLIB.OLD,DISP=SHR
//PANDD2   DD  DSN=PANVLT.USER.PANLIB.NEW,DISP=SHR
//SYSIN    DD  *
++OPTION OUTPUT
++TRANSFER aaaaaaaa,99999999
/*
//

//STEP03  EXEC PGM=PAN#2
//STEPLIB  DD  DSN=PANVLT.R146.CBA3LINK,DISP=SHR
//SYSPRINT DD  SYSOUT=*
//PANDD1   DD  DSN=PANVLT.USER.PANLIB.NEW,DISP=SHR
//PANDD3   DD  DSN=PANVLT.USER.PANLIB.BACKUP,DISP=SHR
//SYSIN    DD  * 
++RESTORE aaaaaaaa
/*
//