2023-05-03 11:06:20 +02:00
== Why is this an issue?
2021-04-28 16:49:39 +02:00
To ensure future code portability, obsolete keywords should not be used. The following keywords were declared obsolete in the COBOL ANSI-85 standard and removed in the ISO/IEC 1989:2002 standard:
* Paragraphs: ``++AUTHOR++``, ``++INSTALLATION++``, ``++DATE-WRITTEN++``, ``++DATE-COMPILED++``, ``++SECURITY++``
* Clauses: ``++DATA RECORD(S)++``, ``++LABEL RECORD(S)++``, ``++MEMORY SIZE++``, ``++MULTIPLE FILE (TAPE)++``, ``++RERUN++``, ``++VALUE OF++``, ``++CODE SEGMENT-LIMIT++``
* Statements: ``++ALTER++``, ``++ENTER++``, ``++STOP++`` _literal_, ``++GO TO++`` without an argument
* Phrases: ``++REVERSED++`` phrase of the ``++OPEN++`` statement
* Special registers: ``++DEBUG-ITEM++``
* Sections: Debugging sections
* Declarative: ``++USE FOR DEBUGGING++``
The following keywords were declared obsolete in the ISO/IEC 1989:2002 standard:
* Phrase: ``++DEBUGGING MODE++``
* Clause: ``++PADDING CHARACTER++``
2021-04-28 18:08:03 +02:00
2023-05-03 11:06:20 +02:00
=== Noncompliant code example
2021-04-28 16:49:39 +02:00
2022-02-04 17:28:24 +01:00
[source,cobol]
2021-04-28 16:49:39 +02:00
----
IDENTIFICATION DIVISION.
PROGRAM-ID. AcceptAndDisplay.
AUTHOR. Michael Coughlan. *> Noncompliant
----
2021-04-28 18:08:03 +02:00
2023-05-03 11:06:20 +02:00
=== Compliant solution
2021-04-28 16:49:39 +02:00
2022-02-04 17:28:24 +01:00
[source,cobol]
2021-04-28 16:49:39 +02:00
----
IDENTIFICATION DIVISION.
PROGRAM-ID. AcceptAndDisplay.
----
2021-04-28 18:08:03 +02:00
2021-06-02 20:44:38 +02:00
2021-06-03 09:05:38 +02:00
ifdef::env-github,rspecator-view[]
2021-09-20 15:38:42 +02:00
'''
== Implementation Specification
(visible only on this page)
include::message.adoc[]
2021-06-08 15:52:13 +02:00
'''
2021-06-02 20:44:38 +02:00
== Comments And Links
(visible only on this page)
include::comments-and-links.adoc[]
2021-06-03 09:05:38 +02:00
endif::env-github,rspecator-view[]