rspec/rules/S1563/cobol/rule.adoc

12 lines
305 B
Plaintext
Raw Normal View History

2021-04-28 16:49:39 +02:00
Using the ``++OPEN++`` file statement is costly, and therefore be avoided inside loops. Instead, the file can be saved into a buffer to increase performance.
2021-04-28 16:49:39 +02:00
== Noncompliant Code Example
----
PERFORM UNTIL (NOT DA-OK) OR (Y00CIA-CD-RET-PGM = ZERO)
OPEN INPUT inventory-file
END-PERFORM.
----