The following two processes to physically reorg the FILEINFO file have been successfully tested and verified.
1) Copy current FILEINFO to .NEW then Rename .NEW
This includes the following 3 steps:
STEP01 - REPRO FILEINFO TO WORKFILE (BACKUP TO TAPE)
STEP02 - DEFINE NEW FILEINFO & REPRO CURRENT TO NEW
STEP03 - DELETE CURRENT FILEINFO & RENAME THE NEW TO CURRENT
See attached the complete JCL for this method as file
'1)BACKUP+REPRO_to_NEW+RENAME_to_current.txt'
2) Backup FILEINFO and Restore back from Tape
This includes the following 3 steps:
STEP01 - REPRO FILEINFO TO WORKFILE (BACKUP TO TAPE)
STEP02 - DELETE CURRENT FILEINFO
STEP03 - DEFINE FILEINFO AND REPRO FROM TAPE
See attached the complete JCL for this method as file
'2)BACKUP+DELETE CURRENT+REPRO_from_tape.txt'
Both JCL samples will work equally well.
Note1:
You need to specify a valid Volser in the VOLUMES(vvvvvv) parameter of
the DEFINE, or remove that parameter if the allocation is done via SMS.
Note2:
As per INNOVATION DATA, the CREATE command in the USTOVRID DD
is needed to provide the IAM options when defining the file.
So please just leave that complete USTOVRID DD as it is in the provided
sample JCL:
//USTOVRID DD *
CREATE DD=FILEINFO,B=2,PE=100,VARO=YES,REL=NO,PRO=YES
ACCESS DD=&ALLDD,INDEXSPACE=64BIT
/*