rspec/rules/S3923/cobol/rule.adoc
Fred Tingaud 51369b610e
Make sure that includes are always surrounded by empty lines (#2270)
When an include is not surrounded by empty lines, its content is inlined
on the same line as the adjacent content. That can lead to broken tags
and other display issues.
This PR fixes all such includes and introduces a validation step that
forbids introducing the same problem again.
2023-06-22 10:38:01 +02:00

56 lines
1.1 KiB
Plaintext

== Why is this an issue?
Having all branches of an `EVALUATE` or `IF` chain with the same implementation indicates a problem.
In the following code:
[source,cobol]
----
EVALUATE X *> Noncompliant
WHEN 1
PERFORM SECTION1
WHEN OTHER
PERFORM SECTION1
END-EVALUATE.
IF X = 1 THEN *> Noncompliant
PERFORM SECTION1
ELSE
PERFORM SECTION1
END-IF.
----
Either there is a copy-paste error that needs fixing or an unnecessary `EVALUATE` or `IF` chain that needs removing.
=== Exceptions
This rule does not apply to `IF` chains without `ELSE`, nor to `EVALUATE` without a `WHEN OTHER` clause.
[source,cobol]
----
IF X = 1 THEN *> //no issue, this could have been done on purpose to make the code more readable
PERFORM SECTION1
ELSE-IF X = 2 THEN
PERFORM SECTION1
END-IF.
----
ifdef::env-github,rspecator-view[]
'''
== Implementation Specification
(visible only on this page)
include::../message.adoc[]
include::../highlighting.adoc[]
'''
== Comments And Links
(visible only on this page)
include::../comments-and-links.adoc[]
endif::env-github,rspecator-view[]