PH66089: I/O CALL FAILS IN DFH$XSR WHEN GROUP_LIST CREATES 1,000 OUTPUT LINES

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The outputgroups procedure in DFH$XSR doesn't have a "class"
  variable in it. When calls are made to the out procedure from
  the outputgroups procedure, everything is fine as long as the
  "OUT" variable doesn't go over a length of 1,000. However, if
  the length hits 1,000, then the out procedure will issue an
  EXECIO call and reset the "OUT" variable.
  .
  'EXECIO' OUT.0 'DISKW' class '(STEM OUT.'
  .
  The out procedure is defined with "class" as an exposed
  variable, but the outputgroups procedure has no knowledge of
  this variable, so it is never initialized. Thus, when the
  aforementioned EXECIO call is made, the "class" variable
  defaults to value 'CLASS', and DFH$XSR attempts to write to a DD
  card CLASS which doesn't exist.
  .
  This causes IRX0555E and IRX0670E messages like below, as well
  as a truncated output of RACF commands from the job.
  
  IRX0555E The input or output file CLASS is not allocated. It
  cannot be opened for I/O.
  IRX0670E EXECIO error while trying to GET or PUT a record.
  
  Additional Keyword(s): KIXREVACC
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All CICS Users.                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Running DFHSM2R JCL with over 1000      *
  *                      users causes IRX0555E and IRX0670E.     *
  ****************************************************************
  DFHSM2R JCL is run to create RACF commands from security
  metadata typically generated from DFHR2SM. This invokes DFH$XSR
  which processes the given metadata to produce RACF commands to
  reproduce the RACF definitions. When a group has over 1000 lines
  of users, DFH$XSR attempts to output the 1000 lines, and then
  reset what it is currently storing. This fails due to an
  uninitialized variable which leads to us attempting to write to
  a DD card called 'CLASS' which does not exist. This leads to the
  1000 lines being discarded without being output and the
  following errors occur:
  
  IRX0555E The input or output file CLASS is not allocated. It
  cannot be opened for I/O.
  IRX0670E EXECIO error while trying to GET or PUT a record.
  

Problem conclusion

• CICS has been updated to process RACF groups with over 1000
  users correctly to prevent errors IRX0670E and IRX0555E.
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

Modules/Macros

• DFH$XSR
  

Fix information

• Fixed component name

  CICS TS Z/OS V6

• Fixed component ID

  5655YA100

Applicable component levels

• R400 PSY UO03344

     UP25/05/24 P F505

• R500 PSY UO03343

     UP25/06/04 P F506  

Fix is available

• Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.