IBM Support

PH49715: REQUEST TO HAVE NUMCHECK(ZON(LAX)) IGNORE NUMERIC TO ALPHANUMERIC MOVES

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as new function.

Error description

  • This is a request to have NUMCHECK(ZON(LAX)) ignore numeric to
    alphanumeric MOVEs.  Note that a group data item is considered
    to be an alphanumeric data item, so in a numeric MOVE to a group
    data item, the sender's data would not be checked for validity
    under NUMCHECK(ZON(LAX)).
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL 6.3 compiling and  *
    *                 running programs compiled with the           *
    *                 NUMCHECK(...,ZON(LAX)) option in effect and  *
    *                 where the programs contain a MOVE statement  *
    *                 with a zoned decimal sender containing       *
    *                 invalid data and an alphanumeric receiver.   *
    ****************************************************************
    * PROBLEM DESCRIPTION: Runtime abend or message due to         *
    *                      NUMCHECK violation.                     *
    ****************************************************************
    * RECOMMENDATION: Apply the IBM-provided PTF.                  *
    ****************************************************************
    The NUMCHECK(...,ZON(LAX)) option is intended to provide more
    relaxed checking of zoned decimal senders where it is safe to do
    so. Since moving a zoned decimal data item to an alphanumeric
    data item is not a numeric operation, the checking should be
    relaxed when ZON(LAX) is in effect because such an operation is
    a common pattern in some user code (e.g., moving a zoned decimal
    data item initialized with LOW-VALUES to an alphanumeric
    receiver).
    

Problem conclusion

  • The compiler was updated to avoid generating runtime checking
    code of zoned decimal senders in MOVE statements when the
    receiver is an alphanumeric data item and NUMCHECK(...,ZON(LAX))
    is in effect.
    

Temporary fix

Comments

  • ×**** PE22/12/26 FIX IN ERROR. SEE APAR PH51642  FOR DESCRIPTION
    

APAR Information

  • APAR number

    PH49715

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655EC600

  • Reported release

    630

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2022-09-21

  • Closed date

    2022-11-23

  • Last modified date

    2023-01-19

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

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

    PH50295 PH50301 UI83433 UI83434 UI83435

Modules/Macros

  • IGY8RWTU 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 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 IGYMSGE  IGYMSGK  IGYMSGT
    IGYQCBE  IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6 IGYZQJPN
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655EC600

Applicable component levels

  • R630 PSY UI83433

       UP22/12/01 P F211

  • R631 PSY UI83434

       UP22/12/01 P F211

  • R632 PSY UI83435

       UP22/12/01 P F211

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":"630","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
12 December 2023