APAR status
Closed as program error.
Error description
When editing a COBOL program in IBM Developer for z Systems V14.0.0.4, the COBOL parser errantly flags the "DEFAULT" keyword as a reserved word. But in accordance to the latest official IBM COBOL publication, the COBOL compiler does allow the keyword as an 88-level. For example, the following use of "DEFAULT" keyword is valid syntax and should not be flagged: 01 RPT1-HEADERS. 05 RPT1-HEADER1. 10 FILLER PIC X(21) VALUE SPACES. 10 FILLER PIC X(111) VALUE "REPORT OF PROJECTS AFFECTED BY RAISES". 05 RPT1-HEADER2. 10 FILLER PIC X(9) VALUE "PROJECT". 10 FILLER PIC X(10) VALUE "EMPID". 10 FILLER PIC X(35) VALUE "EMPLOYEE NAME". 10 FILLER PIC X(40) VALUE "SALARY". 88 DEFAULT VALUE "DEFLT".
Local fix
Problem summary
DEFAULT was set to be a hard keyword.
Problem conclusion
Update DEFAULT to be a soft keyword.
Temporary fix
Comments
APAR Information
APAR number
PI85796
Reported component name
DEV FOR Z SYS
Reported component ID
5724T0700
Reported release
E00
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2017-08-10
Closed date
2018-01-25
Last modified date
2018-01-25
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":"E00","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
25 January 2018