APAR status
Closed as program error.
Error description
IBM Developer for z/OS 14.2.3.2 zUnit -> Create/Modify testCase fails when Program contains: 004400 77 DB2-ERR-TEXT-LEN PIC S9(8) COMP VALUE +80. 004500 005700 EXEC SQL 005800 INCLUDE SQLCA 005900 END-EXEC. But SQLCA begins with 05 SQLCA. 10 SQLCAID PIC ... ... which is wrong. It should begin with 01 SQLCA or 05 SQLCA should be preceded by a Level 01. zUnit fails with emptyStackException File .log records !ENTRY com.ibm.etools.zunit.ui 4 0 2020-12-29 16:18:40.191 !MESSAGE !STACK 0 java.util.EmptyStackException at java.util.Stack.peek(Unknown Source) at java.util.Stack.pop(Unknown Source) at com.ibm.etools.zunit.ast.cobol.DataItemStructureBuilder.processN ode(Unknown Source) at com.ibm.etools.zunit.ast.cobol.DataItemStructureBuilder.visitNod e(Unknown Source) at com.ibm.etools.zunit.ast.cobol.ParameterInfoProvider.visit(Unkno wn Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.DataDescriptionEntr y1.enter(Unknown Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.DataDescriptionEntr y1.accept(Unknown Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.DataDescriptionEntr yList.enter(Unknown Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.DataDescriptionEntr yList.accept(Unknown Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.WorkingStorageSecti on.enter(Unknown Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.WorkingStorageSecti on.accept(Unknown Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.DataDivisionContent .enter(Unknown Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.DataDivisionContent .accept(Unknown Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.DataDivision.enter( Unknown Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.DataDivision.accept (Unknown Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.CobolSourceProgram. enter(Unknown Source) at com.ibm.systemz.cobol.editor.core.parser.Ast.CobolSourceProgram. accept(Unknown Source) at com.ibm.etools.zunit.ast.cobol.ParameterInfoProvider.getParamete rInfo(Unknown Source) at com.ibm.etools.zunit.batch.processing.TestCaseContainerProviderW rap.createTestCaseContainer(Unknown Source) at com.ibm.etools.zunit.batch.processing.ZUnitConfigProcess.populat eTestCaseContainer(Unknown Source) at com.ibm.etools.zunit.batch.processing.ZUnitOperationProcess.runF orPopulatingTestCaseContainer(Unknown Source) at com.ibm.etools.zunit.ui.operations.GenerateTestDataSchema.popula teTestCaseContainer(Unknown Source) at com.ibm.etools.zunit.ui.operations.GenerateTestDataSchema.run(Un known Source) at com.ibm.etools.zunit.ui.operations.EditTestEntryDataOperation.ru n(Unknown Source) at org.eclipse.jface.operation.ModalContext$ModalContextThread.run( Unknown Source) Failure is logic but message does not help to understand the error.
Local fix
Problem summary
When level number of data item is corrupted in the program under testing, IndexOutOfException message is shown.
Problem conclusion
zUnit has been corrected so that an correct error message would be shown.
Temporary fix
Comments
APAR Information
APAR number
PH33350
Reported component name
DEV FOR Z/OS
Reported component ID
5724T0700
Reported release
E20
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2021-01-13
Closed date
2021-04-22
Last modified date
2021-04-22
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Fix information
Fixed component name
DEV FOR Z/OS
Fixed component ID
5724T0700
Applicable component levels
[{"Line of Business":{"code":"LOB17","label":"Mainframe TPS"},"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SSQ2R2","label":"Rational Developer for z Systems"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"E20"}]
Document Information
Modified date:
23 April 2021