If you are currently licensed for Librarian, why not contact CA Librarian
Support for this issue.  I think some might depend on the version of Librarian
you are running.

Second, there is a Librarian community on Communities.CA.Com.  You can join and
ask there as well.

I am not sure you will be able to get PDS Stats for this process.  Librarian
uses (I think) a different process that may not be compatible with PDS Stats (It
has been a while since I worked with Librarian or Panvalet).

Does Librarian support member names greater than 8 characters?  If so, you may
need to look at a naming convention for this conversion.

Lizette

> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:[email protected]] On
> Behalf Of Brenton, Ren
> Sent: Wednesday, May 11, 2016 6:17 AM
> To: [email protected]
> Subject: LIBRARIAN to PDS
> 
> I'm trying to UNLOAD a Librarian Master to a PDS(E) using the following JCL.
> It works fine except:
> 
> 
> 1)  It requires UPDATE authority to the LIBR master, (which is, IMHO, stupid
> for a copy, and limits usability),
> 
> 2)  It does not update the PDS stats.
> 
> 
> Reading an old post from John McKown (2005), to get around the RACF problem,
> he says to try: // LABEL=(,,,IN), on the LIBR DD, MASTER.  I did and it
> doesn't.  Any help will be appreciated:
> 
> 
> 
> //LIBR2PDS PROC LIBRIN='',    LIBRARIAN DATASET NAME
> 
> //             PDSOUT=''      PDS OUT NAME
> 
> //*
> 
> //LIBR     EXEC PGM=AFOLIBR2,PARM='NRJS,NJTA'
> 
> //MASTER   DD DISP=SHR,DSN=&LIBRIN
> 
> //OSJOB    DD DSN=&&OSJOB1,DISP=(,PASS),
> 
> //            UNIT=SYSDA,
> 
> //            SPACE=(CYL,(5,2),RLSE),
> 
> //            DCB=(LRECL=80,RECFM=FB,DSORG=PS,BLKSIZE=6080)
> 
> //SYSPRINT DD SYSOUT=*,DCB=RECFM=FBA
> 
> //SYSIN    DD DUMMY,BLKSIZE=80
> 
> //*
> 
> //UNLOAD   EXEC PGM=AFOLIBR2,PARM='NRJS,NJTA',REGION=0M
> 
> //LIST     DD DUMMY
> 
> //MASTER   DD DISP=SHR,DSN=&LIBRIN,LABEL=(,,,IN)
> 
> //OSJOB    DD DSN=&PDSOUT,DISP=SHR
> 
> //SYSPRINT DD SYSOUT=*,DCB=RECFM=FBA
> 
> //SYSIN    DD DSN=&&OSJOB1,DISP=(OLD,PASS)
> 
> //*
> 
> //  PEND
> 
> //*
> 
> //LIBR2PDS  EXEC LIBR2PDS,
> 
> //    LIBRIN='my.libr.master',
> 
> //    PDSOUT='my.preallcated.pdse'
> 
> //LIBR.SYSIN    DD *
> 
> -OPT GPO
> 
> -SEL NAME=,EXEC(R),TEMP,COPYDDOFF,CCOPYOFF
> 
> -EDIT /-INC/=INC/
> 
> -END
> 
> Someone else said to use the -EXTRACT function as opposed to the -SEL.  I
> substituted -EXTRACT for -SEL and got other errors:
> 
> GPO HAS READ THE FOLLOWING RECORD(S):
> 
> -EXTRACT NAME=,EXEC(R),TEMP,COPYDDOFF,CCOPYOFF
> *** ERROR ***          INVALID GPO SYNTAX NEAR POSITION  16
> 
> Thanks for your anticipated help.
> 
> Ren Brenton
> Black Knight Financial Services
> 601 Riverside Ave.,
> Jacksonville, FL 32204
> The information contained in this message is proprietary and/or confidential.
> If you are not the intended recipient, please: (i) delete the message and all
> copies; (ii) do not disclose, distribute or use the message in any manner; and
> (iii) notify the sender immediately. In addition, please be aware that any
> message addressed to our domain is subject to archiving and review by persons
> other than the intended recipient. Thank you.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to