How to select multiple systems in AFOLIBR -SEL statement

rabiswas · New User Joined: 15 Oct 2008 Posts: 11 Location: India

Hi,

Im trying to unload selected components from Librarian to a PDS. Below is my JCL that works for 'MANU' HLQ only..

//*=====================================================================
//* UNLOAD MODULES FROM LIBRARIAN TO PDS
//*====================================================================*
//* 1. GENERATE LIBRARIAN -SEL STATEMENTS WITH LIBRARIAN GPO
//* INTO TEMP. DATA SET (DDNAME=OSJOB)
//*--------------------------------------------------------------------*
//SELGPO EXEC PGM=AFOLIBR,PARM='NRJS,NJTA'
//MASTER DD DISP=SHR,DSN=SYSA.LIBRARY.TEST
//*SJOB DD DISP=(,CATLG,DELETE),DSN=BISWRX2.OSJOB1,
//OSJOB DD DISP=SHR,DSN=BISWRX2.OSJOB1,
// UNIT=SYSDA,SPACE=(TRK,(25,10),RLSE),
// DCB=(LRECL=80,BLKSIZE=6080,RECFM=FB)
//SYSPRINT DD SYSOUT=*,DCB=RECFM=FBA
//SYSIN DD *
-OPT GPO
-OPT TEMPS
-SEL NAME=/MANU/,EXEC
-END
/*
//*

====================
Now I want to have multiple HLQ-ed systems coming at 1 shot.. Ive tried the below combinations & some more.. they either failed or the 2nd line simply took a textual interpretation -

# -SEL NAME=/MANU/ & -SEL NAME=/ACPY/,EXEC

# -SEL NAME=/MANU/,EXEC
-SEL NAME=/ACPY/,EXEC

# -SEL NAME=/MANU/ & NAME=/ACPY/,EXEC

====================

Any suggestions on how to get this done, without repeating the entire step for multiple HLQs.. ofcourse : )

Thx,
Ranadhir

Robert Sample · Posted: Sat Feb 14, 2015 4:23 am

My reading of the CA-Librarian System Services manual indicates that this syntax should work, but I don't have access to a LIBRARIAN system at this time to try it:

rabiswas · New User Joined: 15 Oct 2008 Posts: 11 Location: India

Robert - I tried the syntax you suggested.. didnt really work -

GPO HAS READ THE FOLLOWING RECORD(S):

-OPT TEMPS
-SEL (NAME=/MANU/,NAME=/ACPY/),EXEC

GPO HAS INTERPRETED THE BOOLEAN LOGIC IN THE FOLLOWING FORMAT: (1&2)

END OF GPO. NO MODULE(S) PASSED SELECTION CRITERIA

-----
For HLQ.. agreed & noted.

Thx,
Ranadhir

Robert Sample · Posted: Sun Feb 15, 2015 8:32 pm

Try using a VBAR instead of the comma before the second NAME -- I misread the manual to indicate comma was an OR but it is actually AND. However, it is encouraging that GPO interpreted that syntax and processed it -- hence the VBAR most likely will work.

rabiswas · New User Joined: 15 Oct 2008 Posts: 11 Location: India

OK.. the vbar finally worked.. although the key on mf wasnt the same on windows. below is my final jcl -

//*--------------------------------------------------------------------*
//* 1. GENERATE LIBRARIAN -SEL STATEMENTS WITH LIBRARIAN GPO
//* INTO TEMP. DATA SET (DDNAME=OSJOB)
//*--------------------------------------------------------------------*
//SELGPO EXEC PGM=AFOLIBR,PARM='NRJS,NJTA'
//MASTER DD DISP=SHR,DSN=SYSA.LIBRARY.TEST
//*SJOB DD DISP=(,CATLG,DELETE),DSN=BISWRX2.OSJOB1,
//OSJOB DD DISP=SHR,DSN=BISWRX2.OSJOB1,
// UNIT=SYSDA,SPACE=(TRK,(25,10),RLSE),
// DCB=(LRECL=80,BLKSIZE=6080,RECFM=FB)
//SYSPRINT DD SYSOUT=*,DCB=RECFM=FBA
//SYSIN DD *
-OPT GPO
-OPT TEMPS
-SEL (NAME=/MANU/|NAME=/ACPY/|NAME=/GRRA/),EXEC
-END
/*
//*
//*--------------------------------------------------------------------*
//* 2. UNLOAD ALL MEMBERS SPECIFIED IN SYSIN FILE
//* FROM LIBRARIAN TO PDS (DDNAME=OSJOB)
//*--------------------------------------------------------------------*
//UNLOAD EXEC PGM=AFOLIBR,PARM='NRJS,NJTA'
//MASTER DD DISP=SHR,DSN=SYSA.LIBRARY.TEST
//OSJOB DD DISP=OLD,DSN=DN108750.SHRMANU.AMAPS.LIBDUMP
//SYSPRINT DD SYSOUT=* DCB=RECFM=FBA
//SYSIN DD DISP=SHR,DSN=BISWRX2.OSJOB1
//**

Thanks !
Ranadhir

Robert Sample · Posted: Tue Feb 17, 2015 4:10 am

Good to hear!

rabiswas · New User Joined: 15 Oct 2008 Posts: 11 Location: India

Robert.. few more bends to this stuff -

1. MUST HAVE - Ive been trying all this for a test librarian region. However for the prod region, the UNLOAD now fails with access issue -

IGD103I SMS ALLOCATED TO DDNAME SYSIN
ICH408I USER(BISWRX2 ) GROUP($IT ) NAME(BISWAS,RANADHIR )
SYSA.LIBRARY.PROD CL(DATASET ) VOL(ROS017)
INSUFFICIENT ACCESS AUTHORITY
FROM SYSA.LIBRARY.PROD (G)
ACCESS INTENT(UPDATE ) ACCESS ALLOWED(READ )
IEF142I TLIBDUMP UNLOAD - STEP WAS EXECUTED - COND CODE 0008

I couldnt identify anything in the UNLOAD step that would trigger an UPDATE intent.. if thats the case, then such code will not work for any prod setup. It may not be really 'updating' anything, but even an exclusive access wont be allowed.

Any pointers here ?

2. NICE TO HAVE - As an extension of the selective include of system components, would there be a way to selective exclude some as well ? Hope I could clarify

Thanks,
Ranadhir

enrico-sorichetti · Posted: Thu Mar 12, 2015 11:11 pm

please do not color your posts,

to provide better readability
for the jcl/code snippets and the messages use the CODE tags

Robert Sample · Posted: Fri Mar 13, 2015 12:17 am

You would need to talk to the vendor about the RACF authority required to do what you are trying -- they can provide precise answers where I would have to guess. They -- or the manuals -- would also tell you about how to exclude members (and how the inclusion / exclusion rules work together).