APAR status
Closed as program error.
Error description
Rational Business Developer V7.5.1.5: A VisualAge Generator generated COBOL program receives an abend AZCT which is expected when the transcation times out. After migrating the program from VisualAge Generator to Rational Business Developer and regenerating the program with Rational Business Developer, an abend APCT is received instead of the expected AZCT abend. The following is the failing scenario: 1) EGL generataed COBOL program XYZ requests an exec cics handle abend program (ELAESABD). 2) When the transaction times out and receives an abend AZCT, the handle abend program ELAESABD is passed control as expected. 3) As control is being passed to ELAESABD, a commarea address of 0's and a commarea length of 4 is passed. Since the commarea address is 0's, the link to ELAESABD fails with an invalid_commarea_address. This is the cause for the APCT abend. 4) Program XYZ does not have a commarea, but it is linking to program ABC with a commarea that has a length of 4. 5) When control is returned from ABC to XYZ, the CICS EIBCALEN (EIB Commarea Length) did not return to 0, but continued to hold the value of 4.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: * **************************************************************** * PROBLEM DESCRIPTION: * **************************************************************** * RECOMMENDATION: * **************************************************************** The logic was getmaining a new EIB commarea and setting the EIBCALEN field, then called another program. When the program returned, the commarea was freed by the length was still set in EIBCALEN. This caused a problem in the abend handler routine that the customer had. We changed the logic to save/restore the previous EIBCALEN value on these calls.
Problem conclusion
Software updated. Fixtest available.
Temporary fix
Comments
APAR Information
APAR number
PM14429
Reported component name
RBD EGL FOR COB
Reported component ID
5724S5001
Reported release
751
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2010-05-13
Closed date
2010-10-13
Last modified date
2010-10-13
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
R751 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.5.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
13 October 2010