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