I am using MVS Symbolic Substitution in the CAISEC00 parmlib member. Can I use a one character &SYSCLONE and concatenate a character to it to process a specific CAISECxx member?

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

Description

Yes, the &SYSCLONE and System symbol can be defined in the SYS1.PARMLIB member IEASYMxx as a one character symbol concatenated to another character in the ACF2 CAISEC00 SYS1.PARMLIB member.

Solution

The &SYSCLONE symbolic, can be used in the SYS1.PARMLIB member IEASYMxx to specify specific characters to be used from the MVS system ID as the symbol. The SYSDEF SYSCLONE statement in IEASYMxx specifies the starting postion and length of the MVS system ID &SYSNAME, syntax: "SYSDEF SYSCLONE(&SYSNAME(start:length))". For example, if the MVS system ID is SYS3, the &SYSCLONE can be set to the character "3" of SYS3 (i.e. the 4th character) as follows:

  EDIT       SYS1.PARMLIB(IEASYM00) - 01.01                  Columns 00001 00072 
  Command ===>                                                  Scroll ===> CSR 
  ****** ***************************** Top of Data ****************************** 
  000001 SYSDEF  SYSCLONE(&SYSNAME(4:1))                                         
  ****** **************************** Bottom of Data **************************** 

Once &SYSCLONE is defined in IEASYMxx it can be used in the ACF2 CAISEC00 member and be concatenated with another character to point to other ACF2 CAISECxx, CAIACFxx or CAITRCxx members.

For example:

MVS system ID: SYS3
&SYSCLONE defined as: SYSDEF SYSCLONE(&SYSNAME(4:1))

     CAISEC00 entry          Points to 
  -----------------------    --------- 
  ACF2(&SYSCLONE.0 START)     CAIACF30 
  ACF2(&SYSCLONE.9 START)     CAIACF39 
  TRCE(&SYSCLONE.5 START)     CAITRC35 
  SEC(ACF2(&SYSCLONE.1 )      CAISEC11 

The following is a complete example of IEASYMxx, CAISEC00, CAIACFxx and CAITRCxx members using a MVS system ID of SYS3.

  EDIT       SYS1.PARMLIB(IEASYM00) - 01.01                  Columns 00001 00072 
  Command ===>                                                  Scroll ===> CSR 
  ****** ***************************** Top of Data ****************************** 
  000001 SYSDEF  SYSCLONE(&SYSNAME(4:1))                                         
  ****** **************************** Bottom of Data **************************** 
  EDIT       SYS1.PARMLIB(CAISEC00) - 01.31                  Columns 00001 00072 
  Command ===>                                                  Scroll ===> CSR 
  ****** ***************************** Top of Data ****************************** 
  000001 ACF2(&SYSCLONE.0 START)                                                  
  000002 TRCE(&SYSCLONE.6 START)                                                 
  ****** **************************** Bottom of Data **************************** 
  EDIT       SYS1.PARMLIB(CAIACF30) - 01.01                  Columns 00001 00072 
  Command ===>                                                  Scroll ===> CSR 
  ************************ TOP OF DATA ************************* 
  00000001 BACKUP 
  00000002 TRACEGSO(CONSOLE) 
  *********************** BOTTOM OF DATA *********************** 
  EDIT       SYS1.PARMLIB(CAITRC36) - 01.01                  Columns 00001 00072 
  Command ===>                                                  Scroll ===> CSR 
  ****** ***************************** Top of Data ******************************
  000001 SECTRACE SET,ID=TEST2, +                                                
  000002 ENABLE,FORMAT=DUMP,DEST=CONSOLE,TRACE=BEFORE, +                         
  000003 JOBNAME=USER01,END                                                      
  ****** **************************** Bottom of Data **************************** 

For details on ACF2 CAISECxx, CAIACFxx, CAITRCxx and symbolic substitution see the ACF2 Security for z/OS

Installation Guide, Chapter 3: Installing CA ACF2, section: "Step 11: CA ACF2 System Initialization".

For details on System symbols in PARMLIB see the IBM z/OS System Installation and Management manual, section "System symbols in PARMLIB".