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

Obtain the fix for this APAR.

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.4 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

APAR Information

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

  PH49715

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

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 IGYCJBLD IGYCJGEN IGYCLIBR IGYCLSTR IGYCLVL0
  IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOPI  IGYCOPT
  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

• R640 PSY UI82930

     UP22/10/28 P F210

• R641 PSY UI82931

     UP22/10/28 P F210

• R642 PSY UI82932

     UP22/10/28 P F210

• R64H PSY UI82933

     UP22/10/28 P F210

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.