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

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 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