A fix is available
APAR status
Closed as program error.
Error description
User is running RBD 7.5 genenerated CICS Cobol programs which do segmented converse. In some cases the display is erratic and message "ERROR: INDEX FOR PROGRAM NOT FOUND" is seen after some PTFs are applied to update the runtime to version 9.5. The problem does not happen if the same egl program is generated using RBD 8.5 or later
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: ALL USERS OF RATIONAL BUSINESS DEVELOPERZ/OS * * COBOL RUNTIME * **************************************************************** * PROBLEM DESCRIPTION: IT IS POSSIBLE, IF THE SEGMENTED * * CONVERSE IS PERFORMED IN MORE * * THAN 1 PLACE IN THE APPLICATION * * PROGRAM, FOR IT TO DISPLAY ERROR * * MESSAGES ON THE SYSLOG FILE INDICATING * * ERROR: INDEX FOR PROGRAM NOTFOUND * * THIS HAPPENS BECAUSETHE SEGMENTED * * SAVE MODULE, ELASSM WASRELEASING * * STORAGE TOO SOON. IT WASPOSSIBLE * * THAT A 2ND SEGMENTED CONVERSE, * * IN THE SAME PROGRAM BUT FROM A * * DIFFERENT LOCATION,COULD BE DONE. * * IN THAT CASE, THE MEMORY FOR THE RETURN * * PATH WAS LOST, SO SUBSEQUENT * * INVOCATIONS OF THE PROGRAM WOULD * * RECEIVE THE ERRORS. * * * **************************************************************** * RECOMMENDATION: APPLY THIS MAINTENANCE * **************************************************************** IT IS POSSIBLE, IF THE SEGMENTED CONVERSE IS PERFORMED IN MORE THAN 1 PLACE IN THE APPLICATION PROGRAM, FOR IT TO DISPLAY ERROR MESSAGES ON THE SYSLOG FILE INDICATING ERROR: INDEX FOR PROGRAM NOT FOUND. THIS HAPPENS BECAUSE THE SEGMENTED SAVE MODULE, ELASSM WAS RELEASING STORAGE TOO SOON. IT WAS POSSIBLE THAT A 2ND SEGMENTED CONVERSE, IN THE SAME PROGRAM BUT FROM A DIFFERENT LOCATION, COULD BE DONE. IN THAT CASE, THE MEMORY FOR THE RETURN PATH WAS LOST, SO SUBSEQUENT INVOCATIONS OF THE PROGRAM WOULD RECEIVE THE ERRORS.
Problem conclusion
Temporary fix
Comments
APAR Information
APAR number
PI64954
Reported component name
RATL COBOL RT Z
Reported component ID
5655R2900
Reported release
601
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2016-06-27
Closed date
2016-08-26
Last modified date
2016-10-03
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PI65729 UI40406
Modules/Macros
ELASMDES ELASMMAN ELASMRES ELASMSAV ELASMSER
Fix information
Fixed component name
RATL COBOL RT Z
Fixed component ID
5655R2900
Applicable component levels
R601 PSY UI40406
UP16/09/09 P F609
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:
03 October 2016