A fix is available
APAR status
Closed as program error.
Error description
RC0 received in job whose main COBOL program moved a non-zero value to RETURN-CODE prior to GOBACK. Problem only occurs when RTEREUS is ON.
Local fix
Set RTEREUS(OFF). Note: RTEREUS cannot be set dynamically and a CEEUOPT, user exit needs to be used to override any defaults.
Problem summary
**************************************************************** * USERS AFFECTED: Enterprise COBOL V5 users who run programs * * called by JCL (main batch programs) with the * * runtime option RTEREUS. * * * **************************************************************** * PROBLEM DESCRIPTION: When a COBOL V5 program is run under * * the RTEREUS option, and the program is * * run directly as the main program from * * JCL, the return code of the COBOL * * program is not propagated back to the * * JCL job step at program termination. * * * **************************************************************** * RECOMMENDATION: Apply provided service. * * * **************************************************************** The COBOL runtime library was not always setting the return code correctly at termination for COBOL V5 main programs running under the RTEREUS runtime option.
Problem conclusion
The COBOL runtime library is fixed to return the COBOL program return code properly when running under the RTEREUS option.
Temporary fix
Comments
APAR Information
APAR number
PI31307
Reported component name
LE ENT COBOL LI
Reported component ID
568819812
Reported release
780
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2014-12-10
Closed date
2015-02-19
Last modified date
2015-03-03
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