PI87521: S0C1 ABEND FOR DLL CALL

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• S0C1 abend for DLL call.
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.1 compiling and  *
  *                 running programs that contain a CALL         *
  *                 statement where:                             *
  *                 1. The CALL statement is under the scope of  *
  *                 a CALLINTERFACE DYNAMIC directive.           *
  *                 2. The subject of the CALL statement is a    *
  *                 function or procedure pointer.               *
  *                 3. The DLL compiler option is in effect.     *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Runtime abend (S0C1).                   *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  When the subject of the CALL statement is a function or
  procedure pointer, the compiler was failing to take into
  account any active CALLINTERFACE DYNAMIC directives, resulting
  in incorrect code generation for the CALL statement whenever
  the DLL option was in effect.
  

Problem conclusion

• The compiler was updated to properly take into account the
  CALLINTERFACE DYNAMIC directive when generating code for a CALL
  statement involving a function or procedure pointer.
  

Temporary fix

Comments

APAR Information

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

  PI87136

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

  UI50386 UI50387 UI50388

Modules/Macros

•    IGYCCBE  IGYCCICS IGYCCSRV IGYCDGEN IGYCDIAG
  IGYCDMAP IGYCEN$D IGYCEN$R IGYCEN$0 IGYCEN$1 IGYCEN$2 IGYCEN$3
  IGYCEN$4 IGYCEN$5 IGYCEN$8 IGYCFGEN IGYCFREE IGYCINIT IGYCJA$D
  IGYCJA$R IGYCJA$0 IGYCJA$1 IGYCJA$2 IGYCJA$3 IGYCJA$4 IGYCJA$5
  IGYCJA$8 IGYCLIBH IGYCLIBO IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1
  IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOSCN IGYCPGEN IGYCRCTL
  IGYCRDPR IGYCRDSC IGYCREAL IGYCRWT  IGYCSCAN IGYCSIMD IGYCUE$D
  IGYCUE$R IGYCUE$0 IGYCUE$1 IGYCUE$2 IGYCUE$3 IGYCUE$4 IGYCUE$5
  IGYCUE$8 IGYCXREF IGYDRV   IGYZQDRV IGY8RWTU
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R610 PSY UI50386

     UP17/09/23 P F709

• R611 PSY UI50387

     UP17/09/23 P F709

• R612 PSY UI50388

     UP17/09/23 P F709

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.