A fix is available
APAR status
Closed as program error.
Error description
A RETURN statement is executed a second time after AT END condition when using Enterprise COBOL V5
Local fix
Use COBOL V4 or check program logic to ensure RETURN is not executed a second time
Problem summary
**************************************************************** * USERS AFFECTED: Users using Enterprise COBOL compiler * * V5.1.1 or later releases with programs * * using the SORT statement. * * * **************************************************************** * PROBLEM DESCRIPTION: COBOL program abends with U4088 RC63 * * when control is inside a SORT RETURN * * statement. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** It is a programming error to invoke the RETURN statement after a previous RETURN has returned the AT END condition. There is no more sorted records to be returned. The COBOL runtime library has been changed to tolerate this user error and terminate the SORT statement properly. All sorted records have been returned; the COBOL program can continue processing normally.
Problem conclusion
= PROBLEM CONCLUSION = (max col 64 )<-| The COBOL runtime library has been changed to handle additional RETURN statements after the AT END condition.
Temporary fix
Comments
APAR Information
APAR number
PI67702
Reported component name
LE ENT COBOL LI
Reported component ID
568819812
Reported release
790
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2016-08-17
Closed date
2016-08-19
Last modified date
2016-09-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGZXLPKA
Fix information
Fixed component name
LE ENT COBOL LI
Fixed component ID
568819812
Applicable component levels
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":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SSCVR7X","label":"Runtime"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
14 December 2020