IBM Support

PM16643: IGYPS2121-S received compiling EGL generated COBOL programs when more than 4 save areas are used on VGLIB.VGTDLI calls

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Rational Business Developer V7.1.0.5:
    
    IGYPS2121-S messages received compiling EGL generated COBOL
    programs when more than four save areas are used on
    VGLIB.VGTDLI calls.
    
    These programs when generated using VisualAge Generator compiled
    without problems.
    
    The following is an example of one of these compiler errors and
    the line that is pointed to.
    
    
      002838                    SET EZEPGM-P-4 TO ADDRESS OF
    WCG-CHKP-ID-39 IN WWV-31 IN
    
    ==002838==> IGYPS2121-S "EZEPGM-P-4" was not defined as a
                data-name.  The statement was discarded.
    

Local fix

  • A tempfix is available from support.
    
    Or, a possible workaround for this is to define a new group
    level containing the different different save area's.  For
    example:
    
       01 global-save-area
          03 save-area1
          03 save-area2
          03 save-area3
          03 save-area4
          03 save-area5
          03 save-area6
    
    This new group level 'global-save-area' is then passed as one
    save area to vglib.vgtdli.
    
    Before calling vglib.vgtdli, move the different save area's to
    the corresponding zone in the new group level.
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED:                                              *
    ****************************************************************
    * PROBLEM DESCRIPTION:                                         *
    ****************************************************************
    * RECOMMENDATION:                                              *
    ****************************************************************
    The problem occurred when there were more than 12 arguments.
    It was a simple typing mistake in the logic. It was trying
    to copy the 14th argument over, instead of the 13th. This
    caused an exception, which was caught, which triggered the
    invalid logic to try to access a system library. That in
    turn caused the compiler error.
    

Problem conclusion

  • Software updated. Fixtest available.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PM16643

  • Reported component name

    RBD EGL FOR COB

  • Reported component ID

    5724S5001

  • Reported release

    710

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2010-06-16

  • Closed date

    2011-08-10

  • Last modified date

    2011-08-10

  • 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

    RBD EGL FOR COB

  • Fixed component ID

    5724S5001

Applicable component levels

  • R710 PSN

       UP

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

Document Information

Modified date:
10 August 2011