Filter
Top Products
COPY CICHPREP.Z:=.PROC R=Y
COPY CICIVP1.Z:=.PROC R=Y
COPY CICIVP2.Z:=.PROC R=Y
COPY CICIVP3.Z:=.PROC R=Y
COPY CICLCLIB.Z:=.PROC R=Y
COPY CICLELIB.Z:=.PROC R=Y
COPY CICLISTC.Z:=.PROC R=Y
COPY CICLISTP.Z:=.PROC R=Y
COPY CICLISTT.Z:=.PROC R=Y
COPY CICOVSIB.Z:=.PROC R=Y
COPY CICPATH.Z:=.PROC R=Y
COPY CICPSAMP.Z:=.PROC R=Y
COPY CICRXTRY.Z:=.PROC R=Y
COPY CICSET.Z:=.PROC R=Y
COPY CICSETS.Z:=.PROC R=Y
COPY CICSPROF.Z:=.PROC R=Y
COPY CICSTART.Z:=.PROC R=Y
COPY CICTRMID.Z:=.PROC R=Y
COPY CICXPROF.Z:=.PROC R=Y
Update CICSTART.PROC
Edit CICSTART.PROC from your chosen sublibrary (for example PRD2.CONFIG) using DITTO or another
editor to update the list of authorized user ids. If you fail to do this, the filepool formatting function gives
the message:
Subcommand return code = -4
Either change the existing 'AUTHUSER RCUSER' line or add additional lines specifying the userid that will
log on to format the pools, for example 'AUTHUSER CICSUSER' if no security is active, or 'AUTHUSER
SYSA' if userid SYSA is used. Use single apostrophes to delimit the command.
Two filepools are defined in the CICSTART.PROC. Change them to match changes to the supplied
CICREXX group. You can add additional filepools at a later date:
'FILEPOOL DEFINE POOL1 RFSDIR1 RFSPOL1 (USER'
IF RC ¬= 0 THEN EXIT RC
'FILEPOOL DEFINE POOL2 RFSDIR2 RFSPOL2 (USER'
IF RC ¬= 0 THEN EXIT RC
Update CICS Initialization JCL
REXX must be able to access sublibrary-resident EXECs through the search chain of either a LIBDEF
PROC or a LIBDEF * statement. Either add a LIBDEF statement, or modify an existing one to include the
sublibrary that contains the PROCs copied in the earlier step. You may now add the sublibraries that
contain the user EXECs, for example,
// LIBDEF PROC,SEARCH=(PRD2.CONFIG)
If you fail to make your chosen sublibraries available to resolve requests for executing the
sublibrary-resident execs, any REXX transaction will give the message:
CICREX490E Error 48 running CICSTART EXEC: Failure in system service
If the DSNAME and CATNAME parameters are removed from the supplied CSD file definitions for the
RFS, appropriate DLBL statements are required in the initialization JCL.
PI Configuration
432
CICS TS for VSE/ESA: REXX Guide