IBM Support

PH22936: INCORRECT OUTPUT: THE COMPILER INCORRECTLY FLAGS THE SIGN PARAMETER IN A PICTURE CLAUSE WITH AN IGYDS1089-S MESSAGE

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Functional changes in the V6.3 compiler allow the SIGN reserved
    word to now appear in either the PROCEDURE or DATA DIVISIONS in
    a user program.  This caused the index for the SIGN reserved
    word to change from value 03180001B20 to 02180001B20.  The
    sample alternate reserved word table IGY8RWRD needs to be in
    sync with this internal reserved word table, but was mistakenly
    not updated, for this change.
    

Local fix

  • If the use of an alternate reserved word table for the compiler
    is required, update the entry for SIGN in the alternate reserved
    word table source and change the index from 03180001B20 to
    02180001B20.  Then rebuild the alternate reserved word table.
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: All users of the Enterprise COBOL V6.3       *
    *                 compiler who try to run a compile using an   *
    *                 alternate reserved word table, based on the  *
    *                 provided sample IGY8RWRD.                    *
    ****************************************************************
    * PROBLEM DESCRIPTION: Incorrect output: the compiler          *
    *                      incorrectly flags the SIGN parameter    *
    *                      in a picture clause with an             *
    *                      IGYDS1089-S message.                    *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    ****************************************************************
    Functional changes in the V6.3 compiler allow the SIGN reserved
    word to now appear in either the PROCEDURE or DATA DIVISIONS in
    a user program. This caused the index for the SIGN reserved
    word to change from 03180001B20 to 02180001B20. The sample,
    alternate reserved word table IGY8RWRD needs to be in sync with
    this internal reserved word table, but was mistakenly not
    updated, for this change.
    

Problem conclusion

  • The sample alternate, reserved word table IGY8RWRD has been
    updated to match the default reserved word table used
    internally by the compiler.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH22936

  • 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

    2020-03-04

  • Closed date

    2020-03-26

  • Last modified date

    2020-04-02

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

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

Modules/Macros

  • IGY8RWRD 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 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 UI68641

       UP20/04/01 P F003

  • R631 PSY UI68642

       UP20/04/01 P F003

  • R632 PSY UI68643

       UP20/04/01 P F003

  • R63H PSY UI68644

       UP20/04/01 P F003

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"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"630","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
12 December 2023