APAR status
Closed as program error.
Error description
IBM Developer for z Systems - IDz - v14 When generating test data for a COBOL program that contains a literal value greater than 32 the generated code does not correctly create a continuation. The subsequent program fails to compile. The following compiler errors may be seen in the COBOL listing: 00411 3 EXPECT-DS-MSG-LEN PIC S9(9) COMP-5 VALUE 30. 00412 3 LIST-TITLE-MSG. 00413 5 PIC X(33) DISPLAY VALUE '****** FILE: MSNGDESC-FILE 00414 ******'. Will cause these errors: 00414 IGYGR1056-E "VALUE" literal "'****** FILE: MSNGDESC-FILE '" exceeded the length specified in the "PICTURE" definition. The literal was truncated to the "PICTURE" definition length. 000414 ******'. 000414 IGYDS0007-E An alphanumeric literal was not properly continued. The end of the literal was assumed on the last source line.
Local fix
None available
Problem summary
When generating test data for a COBOL program that contains a literal value greater than 32 the generated code does not correctly create a continuation.
Problem conclusion
If the statement to be output is divided into continuation lines long in the middle of a literal, literal processing is performed, but if division is performed not in the middle of a literal, division is performed in units of tokens and output. It was not checked if it was a literal. Fix is to check whether it is a literal or not.
Temporary fix
Comments
APAR Information
APAR number
PH12947
Reported component name
DEV FOR Z SYS
Reported component ID
5724T0700
Reported release
E10
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2019-06-05
Closed date
2019-06-14
Last modified date
2019-06-14
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 SYS
Fixed component ID
5724T0700
Applicable component levels
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSJK49","label":"IBM Developer for z Systems"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"E10","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
27 October 2020