PI74540: HIGH ORDER BIT OF THE LAST ARGUMENT IN THE EXEC CICS FREEMAIN COMMAND IS NOT ON

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• After upgrading CICS region to V5, your exit program which
  stores API function and arguments starts to get abend. In
  diagnosis the problem, you find the cause is that the high
  order bit of the last argument in the parameter list of the
  EXEC CICS FREEMAIN request is not on, which makes your exit
  program pass the end of the parameter list when processing the
  arguments.
  Additional Symptom(s) Search Keyword(s): 0C4 program check ASRA
  high order bit argument EXEC CICS command parameter list UEPARG
  KIXREVCHY
  

Local fix

• No
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: All CICS users                               *
  ****************************************************************
  * PROBLEM DESCRIPTION: The last address in an EXEC CICS        *
  *                      FREEMAIN parameter list is not flagged  *
  *                      with a high-order bit.                  *
  ****************************************************************
  When an application program issues EXEC CICS FREEMAIN,
  translated code builds a list of parameters and sets on the high
  order bit in the last parameter address, to indicate that it is
  the last. DFHEISC is turning off that bit. If an XEIOUT global
  user exit is called, then it can not identify the last address
  in the parameter list because the bit is off.
  KEYWORDS: GLUE
  

Problem conclusion

• DFHEISC has been changed to stop it from setting the bit off.
  

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:

  UI44730 UI44731

Modules/Macros

• DFHEISC
  

Fix information

• Fixed component name

  CICS TS Z/OS V5

• Fixed component ID

  5655Y0400

Applicable component levels

• R000 PSY UI44731

     UP17/02/20 P F702

• R900 PSY UI44730

     UP17/02/20 P F702

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.