PH70878: NEW RULES SUB-OPTION (NOLAXINDEX) TO GENERATE COMPILER WARNING WHEN WRONG INDEX IS USED

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• New rules sub-option NOLAXINDEX causes the compiler to issue
  warning messages when an index-name associated with a table
  containing fixed length elements is used to subscript another
  table containing fixed length elements of different length.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.5 compiling      *
  *                 programs that contain usage of an index-name *
  *                 associated with a table containing fixed     *
  *                 length elements subscripting another table   *
  *                 containing fixed length elements of a        *
  *                 different length.                            *
  ****************************************************************
  * PROBLEM DESCRIPTION: New function: New RULES sub-option      *
  *                      (LAXINDEX | NOLAXINDEX). Specifying     *
  *                      NOLAXINDEX causes the compiler to issue *
  *                      a warning message when an index-name    *
  *                      associated with a table containing      *
  *                      fixed length elements is used to        *
  *                      subscript another table containing      *
  *                      fixed length elements of a different    *
  *                      length.                                 *
  ****************************************************************
  * RECOMMENDATION: Apply the IBM-provided PTF.                  *
  ****************************************************************
  Using an index-name associated with a table containing fixed
  length elements to subscript another table containing fixed
  length elements of a different length may result in accessing a
  different element which may result in a runtime error.
  

Problem conclusion

Temporary fix

Comments

• The compiler was updated with a new RULES sub-option (LAXINDEX |
  NOLAXINDEX). Specifying NOLAXINDEX causes the compiler to issue
  a warning message (IGYPA3483-W) when an index-name associated
  with a table containing fixed length elements is used to
  subscript another table containing fixed length elements of a
  different length.
  
  For a description of changes related to the support of new
  RULES sub-option (LAXINDEX | NOLAXINDEX), please refer to the
  following sections in the Enterprise COBOL for z/OS 6.5 IBM
  Documentation online:
  
  1. Programming guide -> Appendixes -> COBOL SYSADATA file
     contents -> Options record: X'0010'
  
  2. Programming guide -> Compiling and debugging your program
     -> COBOL compiler and runtime options -> COBOL compiler
     options -> RULES
  
  3. 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:

  UO07832 UO07833 UO07834 UO07835

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 IGYCJGEN IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1
  IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOB2  IGYCOB2E 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

• R650 PSY UO07832

     UP26/05/22 P F605  

• R651 PSY UO07833

     UP26/05/22 P F605  

• R652 PSY UO07834

     UP26/05/22 P F605  

• R65H PSY UO07835

     UP26/05/22 P F605  

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.