book
Article ID: 145013
calendar_today
Updated On:
Issue/Introduction
Need a batch way to update the Language of about 800 members of a Librarian Master file
Resolution
Use the following GPO job to create an OSJOB file.
1) In the NAME=/xx/ to a prefix such as DB for all members that start with DB or PL1 for all member that start iwth PL1
2) In the -LANG card, specify the new 3 character Language value
3) Validate the contents of OSJOB.
4) Once the contents is validated, run the second job.
//***********************************************************
//* THIS JOB WILL USE THE GROUP PROCESSING OPTION (GPO)
//* TO CHANGE THE LANGUAGE TYPE OF ALL MEMBERS TO NEW LANG
//***********************************************************
//STEPDEL EXEC PGM=IEFBR14
//DELOSJOB DD DSN=hlq.mlq.LIBR.OSJOB,
// DISP=(MOD,DELETE,DELETE),
// UNIT=SYSDA,SPACE=(TRK,1)
/*
//STEP1 EXEC PGM=AFOLIBR,PARM='NJTA,NRJS'
//SYSPRINT DD SYSOUT=*
//MASTER DD DISP=SHR,DSN=your.librarian.master.file
//OSJOB DD DSN=hlq.mlq.LIBR.OSJOB,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(10,1),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=80),
// VOL=SER=(vvvvvv)
//SYSIN DD *
-OPT GPO
-SEL NAME=/xx/,EXEC(R),LIST
-LANG xxx
-EMOD
-END
/*
//
Job 2
//STEP2 EXEC PGM=AFOLIBR,PARM='NJTA,NRJS'
//MASTER DD DISP=SHR,DSN=your.librarian.master.file
//LIST DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//OSJOB DD DUMMY
//SYSIN DD DISP=SHR,DSN=hlq.mlq.LIBR.OSJOB
/*