PH48251: ENHANCEMENTS TO ALLOW DYNAMIC LENGTH ELEMENTARY ITEMS AS PROGRAMAND FUNCTION PARAMETERS

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• Enhancements to allow dynamic length elementary items as program
  and function parameters.
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.4 who use        *
  *                 dynamic-length elementary items.             *
  ****************************************************************
  * PROBLEM DESCRIPTION: Dynamic-length elementary items could   *
  *                      not be passed to subprograms as         *
  *                      arguments.                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  Dynamic-length elementary items could not be passed to
  subprograms as arguments.
  

Problem conclusion

• The compiler was improved to allow dyamic-length elementary
  items on the PROCEDURE DIVISION USING phrase of programs and
  user-defined functions as BY REFERENCE parameters, with the
  matching ability to specify dynamic-length elementary items on
  the USING phrase of the CALL statement and on function
  invocations as call/invocation arguments.
  

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 IGYADXIT 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 IGYCJBLD IGYCJBLS IGYCJDM1 IGYCJDM2
  IGYCJDM3 IGYCJDM4 IGYCJDM5 IGYCJDM6 IGYCJDMB IGYCJDMR IGYCJGEN
  IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8
  IGYCMALL IGYCOPI  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 IGYISMKD IGYMSGE  IGYMSGK  IGYMSGT  IGYMSGXT
  IGYQC    IGYQCB   IGYQCBE  IGYQCBG  IGYQSPLT IGYWACPT IGYWALOC
  IGYWAPLY IGYWC    IGYWCL   IGYWCLG  IGYWDDEF IGYWDOPT IGYWIVP1
  IGYWIVP2 IGYWRECV IGYWRWD  IGYWSMPE IGYWUOPT IGYWZFS  IGYZQEN6
  IGYZQENU IGYZQJP6 IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R640 PSY UI81994

     UP22/10/03 P F209

• R641 PSY UI81995

     UP22/10/03 P F209

• R642 PSY UI81996

     UP22/10/03 P F209

• R64H PSY UI81997

     UP22/10/03 P F209

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.