A fix is available
APAR status
Closed as program error.
Error description
IGZXCKP is called when the RERUN I/O clause has been specified. The Wcode op of 'CUP' to rerun routine IGZXCKP has parms=1 and should have parms=2. This results in the following errors: "Error: Stack should be empty but has 1 value." Assertion failed at WCode/WCodeIlGenerator.cpp:1302: _stack.size() == (_blk_stack.isEmpty() ? 0 : _blk_stack.top()->_size) Stack is not empty after branch
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL Version 5.1 using * * RERUN EVERY n RECORDS clause in the * * I-O CONTROL paragraph. * * * **************************************************************** * PROBLEM DESCRIPTION: When compiling a program that has a * * RERUN EVERY n RECORDS clause in it, the * * compiler aborts with the following * * termination message: * * IGYCB7104-U Internal error while * * while compiling function PROG1. Failed * * assertion on WCode/WCodeIlGenerator. * * cpp:1149.Compilation terminated. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** For the RERUN clause the compiler generates code to call a runtime library routine with one parameter, but the runtime routine expects two parameters.
Problem conclusion
The compiler was modified to pass the two parameters that the runtime routine is expecting.
Temporary fix
Comments
APAR Information
APAR number
PI12998
Reported component name
ENT COBOL FOR Z
Reported component ID
5655W3200
Reported release
510
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2014-03-04
Closed date
2014-05-16
Last modified date
2014-06-03
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI18055
Modules/Macros
IGYPIOCM IGYPTEXT
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R510 PSY UI18055
UP14/05/21 P F405
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":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"5.1","Edition":"","Line of Business":{"code":"LOB17","label":"Mainframe TPS"}},{"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":"5.1","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
03 June 2014