PI75017: IMS CONNECT HWSN1925E/ABENDS0C4 WITH CBL V5.2 WHILE OKAY IN CBL V4.2

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• An IMS Connect Userexit is written in COBOL and has an
  assembler stub that initializes a LE runtime environment for
  subroutines (function code 3) when called by IMS CONNECT with
  the 'INIT' function code, calls the COBOL routine when called
  with any function code and terminates the LE enclave when
  called with 'TERM'.
  
  This works fine with COBOL V4, but COBOL V5 gets a S0C4 ABEND.
  

Local fix

• As a temporary workaround, if none of the LE programs running
  in the CEEPIPI environment is AMODE(24), user can add the
  ALL31(ON) runtime option to the CEEPIPI INIT_SUB call to bypass
  the problem.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Enterprise COBOL V5+ users running under     *
  *                 IMS with ALL31(OFF).                         *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Runtime ABEND0C4. Enterprise COBOL V5+  *
  *                      programs running under IMS with the     *
  *                      ALL31(OFF) runtime option may           *
  *                      encounter an 0C4 ABEND during LE        *
  *                      enclave initialization                  *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  During LE enclave initialization, the Enterprise COBOL V5+
  runtime unconditionally switched the PSW key when the
  ALL31(OFF) runtime option is in effect. The key switching is
  only necessary under CICS, and normally benign under batch.
  

Problem conclusion

• The Enterprise COBOL V5+ runtime is corrected to only switch
  the PSW key when running under CICS.
  

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

• IGZXLPKA
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7A0 PSY UI44109

     UP17/01/27 P F701

• R790 PSY UI44110

     UP17/01/27 P F701

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.