Allocate ROSLIBS

Document ID : KB000056045
Last Modified Date : 14/02/2018
Show Technical Document Details

The RO60ALRU procedure to allocate the ROSLIBS, shown below, is found the CA-ROSCOE SAMPJCL file.

There are several things to watch when allocating the ROSLIBS

  1. That ULIVOL= points to a relatively inactive volume
  2. It should not be the same volume as the one the AWS pointer file resides on.
  3. Be sure to change the STEPLIB DD for the second step in the PROC and add any additional data libraries before execution.

//*--------------------------------------------------------------------*
//*                                                                    *
//*    PROCEDURE:  RO60ALRU                                            *
//*                                                                    *
//*    ALLOCATE AND FORMAT CA-ROSCOE USER LIBRARIES                    *
//*                                                                    *
//*    MODIFICATIONS NEEDED:                                           *
//*                                                                    *
//*    1. SPECIFY INDEX AND DATA FILE SPACE BASED ON YOUR              *
//*       SPACE CALCULATIONS FROM THE INSTALL GUIDE.                   *
//*                                                                    *
//*    2. SPECIFY YOUR POINTER AND DATA VOLSERS.  SEE NOTES IN         *
//*       INSTALL GUIDE ON ADDING ADDITIONAL DATA FILES AND ON FILE    *
//*       PLACEMENT.                                                   *
//*                                                                    *
//*    COPYRIGHT (C) 1992 - COMPUTER ASSOCIATES INTERNATIONAL, INC.    *
//*                                                                    *
//*--------------------------------------------------------------------*
//RO60ALRU PROC CAI='CAI.',    /* COMMON HI-LEVEL QUALIFIER
//         SYSOUT='*',         /* GENERIC SYSOUT CLASS
//         UNIT=DISK,          /* GENERIC UNIT NAME
//         ULBLK='2560',       /* USERLIB  BLKSIZE
//         ULISPC='3000',      /* USERLIB INDEX SPACE IN BLOCKS
//         ULDSPC='5000',      /* USERLIB DATA SPACE IN BLOCKS
//         ULIVOL='DUMSER',    /* USERLIB INDEX VOLSER
//         ULDVOL1='DUMSER',   /* USERLIB DATA1 VOLSER
//         ULDVOL2='DUMSER'    /* USERLIB DATA2 VOLSER
//*        ULDVOLX='DUMSER'    /* USERLIB DATAX VOLSER
//*--------------------------------------------------------------------*
//*        ALLOCATE CA-ROSCOE USER LIBRARY
//*--------------------------------------------------------------------*
//RO60ALRU EXEC PGM=IEFBR14
//ROSLIB00 DD  DSN=&CAI.ROSLIB00,DISP=(NEW,CATLG,DELETE),
//             UNIT=&UNIT,VOL=SER=&ULIVOL,
//             SPACE=(&ULBLK,&ULISPC,,CONTIG,ROUND),
//             SPACE=(&ULBLK,&ULISPC,,CONTIG,ROUND),
//             DCB=(DSORG=DA,BLKSIZE=&ULBLK)
//ROSLIB01 DD  DSN=&CAI.ROSLIB01,DISP=(NEW,CATLG,DELETE),
//             UNIT=&UNIT,VOL=SER=&ULDVOL1,
//             SPACE=(&ULBLK,&ULDSPC,,CONTIG,ROUND),
//             DCB=(DSORG=DA,BLKSIZE=&ULBLK)
//ROSLIB02 DD  DSN=&CAI.ROSLIB02,DISP=(NEW,CATLG,DELETE),
//             UNIT=&UNIT,VOL=SER=&ULDVOL2,
//             SPACE=(&ULBLK,&ULDSPC,,CONTIG,ROUND),
//             DCB=(DSORG=DA,BLKSIZE=&ULBLK)
//* ROSLIB0X  DD  DSN=&CAI.ROSLIB0X,DISP=(NEW,CATLG,DELETE),
//*            UNIT=&UNITP,VOL=SER=&ULDVOLX,
//*            SPACE=(&ULBLK,&ULDSPC,,CONTIG,ROUND),
//*            DCB=(DSORG=DA,BLKSIZE=&ULBLK)
//*--------------------------------------------------------------------*
//*        FORMAT CA-ROSCOE USER LIBRARY
//*--------------------------------------------------------------------*
//RO60FMRU EXEC PGM=LIBUTIL,PARM='FORMAT'
//STEPLIB  DD  DSN=&CAI.RO60LIB,DISP=SHR
//SYSPRINT DD  SYSOUT=&SYSOUT
//ROSLIB00 DD  DSN=&CAI.ROSLIB00,DISP=OLD
//ROSLIB01 DD  DSN=&CAI.ROSLIB01,DISP=OLD
//ROSLIB02 DD  DSN=&CAI.ROSLIB02,DISP=OLD
//* ROSLIB0X DD  DSN=&CAI.ROSLIB0X,DISP=OLD
//*--------------------------------------------------------------------*
//RO60ALRU  PEND
//*--------------------------------------------------------------------*
//RO60ALRU  EXEC RO60ALRU