A fix is available
APAR status
Closed as program error.
Error description
Rational COBOL Runtime for zSeries V6.0.1: An ASRA abend occurs running a segmented COBOL program that is regenerated using Rational Business Developer Fix Pack 7.5.1.5. This program runs without problems running the COBOL program generated with Rational Business Developer Fix Pack 7.5.1.4. Additional external symptoms include -501 SQLCODEs when DB2 processing is being done after a segmented converse. Rational Business Developer Fix Pack 7.5.1.5 has additional support that is stressing one of the limits set in the Rational COBOL Runtime. This problem is caused by a memory corruption due to insufficient memory being allocated to the segmented save (restore) work area which results in numerous pointers being written past the end of the memory, and overwriting the memory beyond it. Due to the memory corruption, the results or symptoms are different for different applications. There is a way to determine in the source code, if this problem would occur. If the program is generated for ZOSCICS, is segmented, and the call to this: MOVE EZERTS-SSM-RESTORE-WS-SEP-LEN TO EZERTS-SSM-SVCS-NUM CALL "ELARSVCS" USING EZERTS-CONTROL-BLOCK has more that 250 parameters, then the corruption occurs.
Local fix
A temp fix is available from support.
Problem summary
**************************************************************** * USERS AFFECTED: USERS OF RATIONAL COBOL RUNTIME FOR ZSERIES * **************************************************************** * PROBLEM DESCRIPTION: ASRA ABEND OCCURS RUNNING SEGMENTED * * COBOL PROGRAM GENERATEDUSING RATIONAL * * BUSINESS DEVELOPER V7.5.1.5 DUE * * CORRUPTED MEMORY * **************************************************************** * RECOMMENDATION: APPLY THIS MAINTENANCE. * **************************************************************** ASRA ABEND OCCURS RUNNING SEGMENTED COBOL PROGRAM GENERATED USING RATIONAL BUSINESS DEVELOPER V7.5.1.5 DUE CORRUPTED MEMORY
Problem conclusion
THIS PROBLEM IS CAUSED BY A MEMORY CORRUPTION DUE TO INSUFFICIENT MEMORY BEING ALLOCATED TO THE SEGMENTED SAVE (RESTORE) WORK AREA WHICH RESULTS IN NUMEROUS POINTERS BEING WRITTEN PAST THE END OF THE MEMORY, AND OVERWRITING THE MEMORY BEYOND IT.
Temporary fix
Comments
APAR Information
APAR number
PM15540
Reported component name
RATL COBOL RT Z
Reported component ID
5655R2900
Reported release
601
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2010-05-28
Closed date
2010-09-17
Last modified date
2010-11-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
ELATSSSM
Fix information
Fixed component name
RATL COBOL RT Z
Fixed component ID
5655R2900
Applicable component levels
R601 PSY UK60551
UP10/10/07 P F010
Fix is available
Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSN27B","label":"Rational COBOL Runtime for zSeries"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"6.0.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"6.0.1","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
02 November 2010