To create POSZLINK
To allocate and copy the target SMP/E RTCS product program library (TOSZLINK) into a new POSZLINK PDSE, you can customize the sample JCL shown in the following figure.
The text that should be customized is shown in bold. This sample JCL is contained in member OSZINJ73 in the TOSZCNTL target library.
Sample JCL to create RTCS product program library
//OSZINJ73 JOB (acct),'CREATE POSZLINK PDSE',
// MSGLEVEL=(1,1),CLASS=A,TIME=1
//*
//* acct JOB statement accounting information
//* zzzzzz VOLSER on which to allocate .POSZLINK PDSE
//* tlibprfx DSN prefix of RTCS SMP/E target libraries
//*
//ALLOC EXEC PGM=IEFBR14
//*
//* Allocate a new non-SMS-managed cataloged PDSE for
//* the RTCS Product Library. This data set may be
//* SMS-managed, but the JCL will have to be changed
//* to allocate an SMS-managed data set. There is no
//* particular need for the library to be SMS-managed.
//* This data set CAN be shared by more than one system
//* if MVS sysplex PDSE sharing requirements are met.
//*
//OSZLINK DD DSN=SYS2.RTCS.POSZLINK,
// DISP=(NEW,CATLG),
// UNIT=3390,VOL=SER=zzzzzz,
// DSNTYPE=LIBRARY,SPACE=(CYL,(35,5,01)),
// DSORG=PO,RECFM=U,LRECL=0,BLKSIZE=23476
//*
//COPY EXEC PGM=IEBCOPY,TIME=1,REGION=4M
//*
//* Copy SMP/E Target RTCS Product LIBRARY
//* to the newly-allocated 'production' PDSE.
//*
//SYSPRINT DD SYSOUT=*
//TOSZLINK DD DISP=SHR,DSN=tlibprfx.TOSZLINK
//OSZLINK DD DISP=SHR,DSN=*.ALLOC.OSZLINK
//SYSIN DD *
COPY INDD=((TOSZLINK,R)),OUTDD=OSZLINK
//*
// MSGLEVEL=(1,1),CLASS=A,TIME=1
//*
//* acct JOB statement accounting information
//* zzzzzz VOLSER on which to allocate .POSZLINK PDSE
//* tlibprfx DSN prefix of RTCS SMP/E target libraries
//*
//ALLOC EXEC PGM=IEFBR14
//*
//* Allocate a new non-SMS-managed cataloged PDSE for
//* the RTCS Product Library. This data set may be
//* SMS-managed, but the JCL will have to be changed
//* to allocate an SMS-managed data set. There is no
//* particular need for the library to be SMS-managed.
//* This data set CAN be shared by more than one system
//* if MVS sysplex PDSE sharing requirements are met.
//*
//OSZLINK DD DSN=SYS2.RTCS.POSZLINK,
// DISP=(NEW,CATLG),
// UNIT=3390,VOL=SER=zzzzzz,
// DSNTYPE=LIBRARY,SPACE=(CYL,(35,5,01)),
// DSORG=PO,RECFM=U,LRECL=0,BLKSIZE=23476
//*
//COPY EXEC PGM=IEBCOPY,TIME=1,REGION=4M
//*
//* Copy SMP/E Target RTCS Product LIBRARY
//* to the newly-allocated 'production' PDSE.
//*
//SYSPRINT DD SYSOUT=*
//TOSZLINK DD DISP=SHR,DSN=tlibprfx.TOSZLINK
//OSZLINK DD DISP=SHR,DSN=*.ALLOC.OSZLINK
//SYSIN DD *
COPY INDD=((TOSZLINK,R)),OUTDD=OSZLINK
//*
Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*