PH38923: DISPLAY of NATIONAL item fails CEE0813S insufficient storage if UTF-16 character has low order SO or SI byte for AMODE64

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When attempting to DISPLAY a USAGE NATIONAL (UTF-16) item, the
  runtime misinterprets a shift-out (x'0E') or shift-in (x'0F') in
  the low order byte of a UTF-16 character, allocating an ever
  larger output buffer until storage exhaustion takes place.
  

Local fix

• DISPLAY FUNCTION HEX-OF(national-item) can be used as a
  work-around.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V5 and later       *
  *                 releases running programs compiled with the  *
  *                 LP(64), DBCS                                 *
  *                 NSYMBOL(NATIONAL) options, and contain       *
  *                 DISPLAY statements                           *
  *                 of NATIONAL data items with hex value 0E or  *
  *                 0F in the second                             *
  *                 byte of a NATIONAL character, for example    *
  *                 U+5C0F.                                      *
  ****************************************************************
  * PROBLEM DESCRIPTION: The program either fails with           *
  *                      CEE0813S Insufficient storage or        *
  *                      produces incorrect                      *
  *                      output when executing a DISPLAY         *
  *                      statement to display NATIONAL           *
  *                      data item with hex value 0E or 0F as    *
  *                      the second byte of the                  *
  *                      NATIONAL character. The program is      *
  *                      compiled with the LP(64),               *
  *                      DBCS and NSYMBOL(NATIONAL) options.     *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  In programs compiled with the LP(64), DBCS
  and NSYMBOL(NATIONAL) options, the COBOL Runtime had a logic
  error in the DISPLAY routine when processing NATIONAL data
  items with hex value 0E or 0F as the second byte of the
  NATIONAL
  character. These hex values coincide with the single byte
  Shift-Out
  and Shift-In characters. This resulted in either an excessive
  internal
  buffer request causing CEE0813S Insufficient storage or
  incorrect
  output from DISPLAY.
  
  COB0501T/K COB0502T/K COB0601T/K COB0602T/K COB0603T/K
  

Problem conclusion

• The Runtime was fixed to correctly process NATIONAL
  data items that contain hex value 0E and 0F as the second byte
  of the
  NATIONAL character, in programs compiled with the LP(64), DBCS
  and NSYMBOL(NATIONAL) options.
  

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:

  UI76457 UI76458

Modules/Macros

• CELQSG04 CELQV004 IGZQAPI  IGZQCDA  IGZQINPL
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7B0 PSY UI76457

     UP21/07/30 P F107

• R7C0 PSY UI76458

     UP21/07/30 P F107

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.