PH57329: An exception in a CALL "Java..." without ON EXCEPTION handler defaults to performing a STOP RUN without setting a RETURN-CODE

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• If an exception occurs in a CALL "Java..." but there's no ON
  EXCEPTION clause, the cjbuild generated code will do a STOP RUN,
  but fail to set the RETURN-CODE first. Because STOP RUN is a
  "normal" form of completion rather than an exception, the local
  RETURN-CODE, which is likely to be zero, becomes the condition
  code returned from the enclave/step, obscuring the underlying
  failure.
  

Local fix

• Modify the generated code to set the RETURN-CODE before STOP RUN
  statements.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.4 compiling and  *
  *                 running programs that make calls to static   *
  *                 Java methods using the CALL statement but    *
  *                 don't use the ON EXCEPTION phase of the CALL *
  *                 statement.                                   *
  ****************************************************************
  * PROBLEM DESCRIPTION: When an exception is encountered during *
  *                      a call to Java using the CALL           *
  *                      statement, the run unit is stopped as   *
  *                      expected, but the RETURN-CODE special   *
  *                      register is not set to 16 to indicate a *
  *                      non-recoverable error.                  *
  ****************************************************************
  * RECOMMENDATION: Apply the IBM-provided PTF                   *
  ****************************************************************
  The stub program generated for calls from COBOL to Java was not
  setting the RETURN-CODE special register to 16 before issuing
  STOP RUN in the case where an exception is detected during the
  CALL and the ON EXCEPTION phrase of the CALL statement was not
  specified.
  

Problem conclusion

• The compiler was updated to ensure that the RETURN-CODE special
  register is set to 16 before issuing a STOP RUN in a stub
  program for a call from COBOL to Java.
  

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

• IGY8RWTU IGYCASMB IGYCCBE  IGYCCCRT IGYCCICS IGYCCSRV IGYCDGEN
  IGYCDIAG IGYCDMAP IGYCEN$0 IGYCEN$1 IGYCEN$2 IGYCEN$3 IGYCEN$4
  IGYCEN$5 IGYCEN$8 IGYCEN$D IGYCEN$R IGYCFGEN IGYCFREE IGYCINIT
  IGYCJA$0 IGYCJA$1 IGYCJA$2 IGYCJA$3 IGYCJA$4 IGYCJA$5 IGYCJA$8
  IGYCJA$D IGYCJA$R IGYCJGEN IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1
  IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOSCN IGYCPGEN IGYCRCTL
  IGYCRDPR IGYCRDSC IGYCREAL IGYCRWT  IGYCSCAN IGYCSIMD IGYCUE$0
  IGYCUE$1 IGYCUE$2 IGYCUE$3 IGYCUE$4 IGYCUE$5 IGYCUE$8 IGYCUE$D
  IGYCUE$R IGYCXREF IGYDRV   IGYEQCWI IGYMSGE  IGYMSGK  IGYMSGT
  IGYQCBE  IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6 IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R640 PSY UI94116

     UP23/11/01 P F310

• R641 PSY UI94117

     UP23/11/01 P F310

• R642 PSY UI94118

     UP23/11/01 P F310

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.