IBM Support

PI72494: GENERATED COBOL RELATED TO A SET EMPTY ENTRY THROWS COMPILATIONERROR IGYPS2145-E

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • In RBD 9.5.1 its observed that where the EGL source includes a
    Set empty statement eg:
    SET arcSerWkArea.xatRecInOut empty;
    
    Then the generated COBOL throws a compilation error ie
    IGYPS2145-E A PERIOD WAS REQUIRED.  A PERIOD WAS ASSUMED BEFORE
    "IN" associated with the section name where this entry is
    initialized.
    
    This has been identified as a defect by development.
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED:                                              *
    * Users that use the set statement against an embedded         *
    * structured record within a flex record.                      *
    ****************************************************************
    * PROBLEM DESCRIPTION:                                         *
    * A cobol compiler error can occur is trying to set an         *
    * embedded structured record within a flex record is done.     *
    * This mismatch of record types caused the name of the routine *
    * to be invalid.                                               *
    ****************************************************************
    * RECOMMENDATION:                                              *
    ****************************************************************
    

Problem conclusion

  • A workaround is to keep structured records within structured
    records and not within flex records. However, the software has
    been updated.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PI72494

  • Reported component name

    RATL BUS DEV

  • Reported component ID

    5724S5000

  • Reported release

    950

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2016-11-17

  • Closed date

    2019-01-17

  • Last modified date

    2019-01-17

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

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

Fix information

  • Fixed component name

    RATL BUS DEV

  • Fixed component ID

    5724S5000

Applicable component levels

  • R901 PSY

       UP

  • R911 PSY

       UP

  • R950 PSY

       UP

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSMQ79","label":"Rational Business Developer"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"950","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
19 October 2021