PI43452: NEW MESSAGES TO SUPPORT COBOL V5 ZONECHECK COMPILER OPTION

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• Add messages IGZ0275S and IGZ0276W to the COBOL runtime message
  modules.
  
  FIXCAT keyword:  ZOS0202T/K  COB0501T/K   COB0502T/K
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL Version 5 with     *
  *                 invalid data in zoned decimal (numeric USAGE *
  *                 DISPLAY) data items and want to use the new  *
  *                 ZONECHECK compiler option.                   *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: This is new function in the compiler    *
  *                      which requires new run time messages    *
  *                      to be added by this APAR.               *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  This is to support a new feature for COBOL Version 5 and above
  where the compiler can test data items for valid contents.
  New options ZONECHECK(MSG) and ZONECHECK(ABD) are added.
  Two new messages are added to diagnose this condition at
  application run time.
  

Problem conclusion

Temporary fix

Comments

• Change the COBOL run-time library to support COBOL Version 5
  compiler options ZONECHECK(MSG) and ZONECHECK(ABD).
  If the data item is tested to be invalid and the program was
  compiled with the new ZONECHECK(ABD) compiler option, then
  run time message IGZ0275S will be issued and the program
  will terminate.
  If the data item is tested to be invalid and ZONECHECK(MSG) was
  used to compile the program, then run time message IGZ0276W will
  be issued and the program execution continues.
  

APAR Information

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

  PI37323

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

  UI30128 UI30129

Modules/Macros

•    IGZBALCT IGZCMGEN IGZCMGJA IGZCMGUE IGZEDCCT
  IGZIBMCT IGZIGZCT
  

Fix information

• Fixed component name

  LE COBOL LIB

• Fixed component ID

  568819802

Applicable component levels

• R7AJ PSY UI30129

     UP15/08/18 P F508

• R7A0 PSY UI30128

     UP15/08/15 P F508

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.