PH25272: The COBOL v6.3 compiler generates spurious IGYCB7315-W messages for valid reference modifications of group items

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Where possible at compile time, the COBOL v6.3 compiler verifies
  that reference modification start and length values are valid
  for the data item being addressed, and if not generates the
  message
  
          IGYCB7315-W A reference modifier with a non-positive
          value was found.
  
  There are cases where the refmod is correct but the compiler
  still generates the message.
  

Local fix

• The message can safely be ignored if the refmod is found to be
  valid.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V6.3 compiling     *
  *                 programs that contain reference              *
  *                 modifications.                               *
  ****************************************************************
  * PROBLEM DESCRIPTION: The compiler incorrectly issues message *
  *                      MSGIGYCB7315-W 'A reference modifier    *
  *                      with a non-positive value was found.'   *
  *                      when the reference modifier is          *
  *                      positive.                               *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  When computing the start position for a reference modification
  in order to display the message, the compiler was sometimes
  omitting the offset of a reference-modified data item relative
  to the start of its group, causing the start offset to
  incorrectly appear to be negative.
  

Problem conclusion

• The compiler was fixed to correctly compute the start position
  for a reference modification.
  

Temporary fix

Comments

APAR Information

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

• 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 IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1 IGYCLVL2
  IGYCLVL3 IGYCLVL8 IGYCMALL 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  IGYQCBE  IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6 IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R630 PSY UI69624

     UP20/05/27 P F005

• R631 PSY UI69625

     UP20/05/27 P F005

• R632 PSY UI69626

     UP20/05/27 P F005

• R63H PSY UI69627

     UP20/05/27 P F005

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.