PI94522: IMPROVE COBOL 6 IPCS DUMP FORMATTING

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• Programmers have a hard time locating Working Storage in dumps w
  ithout proper assistance from IPCS verb exits.
   .
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V5+ compiling and  *
  *                 running programs that produce system dumps   *
  *                 and using IPCS to read the dumps.            *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: New function APAR.  Enhancement to      *
  *                      COBOL IPCS VERB EXIT for assisting      *
  *                      COBOL V5+ Working Storage dump          *
  *                      analysis.                               *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  New function APAR.  COBOL V5+ IPCS VERB EXIT has been improved
  to give address information about COBOL V5+ Working Storage.
  

Problem conclusion

Temporary fix

Comments

• Support has been added to IPCS VERB EXIT to provide information
  about COBOL V5+ Working Storage in the dump.
  
  For example the following information is provided by the EXIT,
  
    COBOL version: 050200. Compiled Date and Time: ...
    STATIC MAP(RENT): 26A4A058 144(X'90') bytes.
    WSA24 MAP: 26A4A138 618(X'26A') bytes.
    COBOL Working-Storage resides in the WSA24 MAP ...
  

APAR Information

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

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

  PI95113

Modules/Macros

• IGZXLPKA
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7A0 PSY UI54468

     UP18/03/29 P F803

• R790 PSY UI54469

     UP18/03/28 P F803

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.