Recently getting module too large to process messages and the member has reached the 255 block limit. It has been decided that the blocksize needs to be increased.
What is the easiest way to increase the blocksize of Librarian Master files?
Librarian V4.4
1. Using the sample JCL below the master file is backed up to a temporary master file with the new block size specified in the DCB parameter.
//MSTRBKUP EXEC PGM=AFOLIBR,PARM='NRJS,NJTA'
//SYSPRINT DD SYSOUT=*
//OSJOB DD DUMMY
//LIST DD SYSOUT=*
//INDEX DD SYSOUT=*
//MASTER DD DSN=your.librarian.master.file
,DISP=SHR
//BACKUP DD DSN=your.temp.master,DISP=(,CATLG),
// DCB=(BLKSIZE=nnnnn,DSORG=DA),
// SPACE=(CYL,(nnn)),VOL=SER=nnnnnn,UNIT=SYSDA
//SYSIN DD *
-OPT BKUPDISK,INDEX
/*
2. Rename the original master file in ISPF to .OLD
3. Rename the temporary master file to the original name.
4. Run a Master Index Management report against the new master file:
//INDEXM EXEC PGM=AFOLIBR,PARM='NRJS,NJTA'
//SYSPRINT DD SYSOUT=*
//INDEX DD SYSOUT=*
//MASTER DD DISP=SHR,DSN=your.librarian.master.file
//OSJOB DD DUMMY
//SYSIN DD *
-OPT INDEX(M)
-END
//*
Note:
The reason to run the Master Index Management report is change the name of the master file stored internally. Some Librarian processing (security, for example) uses the internal name.
Once the file master has been successfully increased, the original master file that was renamed to your.librarian.master.file.OLD in step 2 can be deleted.
For more information see the Librarian TechDocs article Disk Master File Copy