PH33122: NEW RULES SUBOPTIONS LAXREDEF|NOLAXREDEF

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• When RULES(NOLAXREDEF) is in effect, the compiler will produce
  messages IGYDS1154-W and IGYDS1073-I for 01-level items
  whenever there is a length mismatch between redefined and
  redefining items. Normally these messages are only produced for
  non-01 level items.
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.3 compiling      *
  *                 programs that contain an 01-level item that  *
  *                 is redefined by another 01-level item with   *
  *                 a different length and who want to receive   *
  *                 messages IGYDS1154-W and IGYDS1073-I to      *
  *                 inform them of the mismatch.                 *
  ****************************************************************
  * PROBLEM DESCRIPTION: New function: Users need a way to make  *
  *                      the RULES option inform them of all     *
  *                      cases where an item is redefined by an  *
  *                      item of a different length, even for    *
  *                      01-level items.                         *
  *                                                              *
  *                      New sub-options LAXREDEF|NOLAXREDEF     *
  *                      have been added to the RULES compiler   *
  *                      option for this purpose.  When          *
  *                      RULES(...,NOLAXREDEF,...) is in         *
  *                      effect, messages IGYDS1154-W and        *
  *                      IGYDS1073-I are produced whenever       *
  *                      there is a length mismatch for a        *
  *                      redefined item, even for 01-level data  *
  *                      items.                                  *
  *                                                              *
  *                      The default is                          *
  *                      RULES(...,LAXREDEF,...), which          *
  *                      produces the standard behaviour where   *
  *                      IGYDS1154-W and IGYDS1073-I are only    *
  *                      produced to warn about length           *
  *                      mismatches in non-01 level redefined    *
  *                      items.                                  *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  Currently messages IGYDS1154-W and IGYDS1073-I, which inform
  users about length mismatches for redefined items, are only
  produced for non-01 level data items.
  

Problem conclusion

Temporary fix

Comments

• The compiler was updated to add new suboptions
  LAXREDEF|NOLAXREDEF to the RULES option.  These options provide
  users with extra flexibility in controlling when messages
  IGYDS1154-W and IGYDS1073-I are received to inform users of
  redefined items with mismatched lengths.
  
  For a description of changes related to the addition of these
  new suboptions, please refer to the following sections in the
  Enterprise COBOL for z/OS 6.x Knowledge Center online:
  
  1) Programming Guide -> Compiling and debugging your program
       -> Compiler Options -> RULES
  
  2) Customization Guide -> Enterprise COBOL compiler options
       -> RULES
  

APAR Information

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

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

  PH36688

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
  IGYMSGXT IGYQCBE  IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6 IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R630 PSY UI73593

     UP21/01/28 P F101

• R631 PSY UI73594

     UP21/01/28 P F101

• R632 PSY UI73595

     UP21/01/28 P F101

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.