IBM Support

PH02242: ADD RUN-TIME SUPPORT FOR NUMVAL-F, TEST-NUMVAL, TEST-NUMVAL-C, TEST-NUMVAL-F, HEX-TO-CHAR AND BIT-TO-CHAR INTRINSIC FUNCTIONS

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as new function.

Error description

  • Add run-time support for NUMVAL-F, TEST-NUMVAL, TEST-NUMVAL-C,
    TEST-NUMVAL-F, HEX-TO-CHAR and BIT-TO-CHAR intrinsic functions
    

Local fix

  • N/A
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL V6.2 who would     *
    *                 like to use new intrinsic functions          *
    *                 NUMVAL-F, TEST-NUMVAL, TEST-NUMVAL-C,        *
    *                 TEST-NUMVAL-F, HEX-TO-CHAR and BIT-TO-CHAR.  *
    *                                                              *
    ****************************************************************
    * PROBLEM DESCRIPTION: New Function: Customers need the        *
    *                      ability to process floating point       *
    *                      numbers with exponent fields using an   *
    *                      intrinsic function the same way fixed   *
    *                      point numbers are processed using the   *
    *                      NUMVAL intrinsic function. Customers    *
    *                      need the ability to validate inputs to  *
    *                      intrinsic functions NUMVAL and          *
    *                      NUMVAL-C before processing is done.     *
    *                      Customers need the ability to process   *
    *                      HEX and BINARY inputs into              *
    *                      alphanumeric data items in COBOL. This  *
    *                      APAR provides support for intrinsic     *
    *                      functions NUMVAL-F, TEST-NUMVAL, TEST-  *
    *                      NUMVAL-C, TEST-NUMVAL-F, HEX-TO-CHAR    *
    *                      and BIT-TO-CHAR for processing          *
    *                      floating point numbers with exponent    *
    *                      fields, validating input to intrinsic   *
    *                      functions NUMVAL, NUMVAL-C and          *
    *                      NUMVAL-F and processing HEX and BINARY  *
    *                      inputs into alphanumeric data items in  *
    *                      COBOL.                                  *
    *                                                              *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF to use the new        *
    *                 intrinsic functions NUMVAL-F, TEST-NUMVAL,   *
    *                 TEST-NUMVAL-C, TEST-NUMVAL-F, HEX-TO-CHAR    *
    *                 and BIT-TO-CHAR.                             *
    *                                                              *
    ****************************************************************
    Customers currently don't have a way to to process floating
    point numbers with exponent fields using an intrinsic function
    the same way fixed point numbers are processed using the NUMVAL
    intrinsic function, customers find that they need to
    create their own user COBOL libraries if they want to validate
    inputs to intrinsic functions NUMVAL and NUMVAL-C before
    processing is done and customers don't have a way to process
    HEX and BINARY inputs into alphanumeric data items in COBOL.
    This APAR provides support for intrinsic functions NUMVAL-F,
    TEST-NUMVAL, TEST-NUMVAL-C, TEST-NUMVAL-F, HEX-TO-CHAR and BIT-
    TO-CHAR for processing floating point numbers with exponent
    fields, validating inputs to intrinsic functions NUMVAL,
    NUMVAL-C and NUMVAL-F and processing HEX and BINARY inputs into
    alphanumeric data items in COBOL.
    

Problem conclusion

Temporary fix

Comments

  • The runtime was changed to add support for processing floating
    point numbers with exponent fields with intrinsic function
    NUMVAL-F, validating inputs to intrinsic functions NUMVAL,
    NUMVAL-C and NUMVAL-F with intrinsic functions TEST-NUMVAL,
    TEST-NUMVAL-C and TEST-NUMVAL-F and processing HEX and BINARY
    inputs into alphanumeric data items in COBOL with intrinsic
    functions HEX-TO-CHAR and BIT-TO-CHAR.
    

APAR Information

  • APAR number

    PH02242

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655EC600

  • Reported release

    790

  • Status

    CLOSED UR1

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2018-08-28

  • Closed date

    2018-09-19

  • Last modified date

    2018-10-02

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

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

    PH02800

Modules/Macros

  •    IGZXLPKA
    

Fix information

  • Fixed component name

    LE ENT COBOL LI

  • Fixed component ID

    568819812

Applicable component levels

  • R7A0 PSY UI58595

       UP18/09/27 P F809

  • R790 PSY UI58596

       UP18/09/27 P F809

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.

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"790","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
12 December 2023