rspec/rules/S1283/cobol/rule.adoc
2022-02-04 16:28:24 +00:00

14 lines
374 B
Plaintext

You should avoid opening a cursor inside a ``++PERFORM++`` statement because doing so could impact performance, or lead to unexpected behavior if the the closing of the cursor is not defined in the same loop.
== Noncompliant Code Example
[source,cobol]
----
PERFORM UNTIL (NOT DA-OK) OR (Y00CIA-CD-RET-PGM = ZERO)
EXEC SQL OPEN C2
END-EXEC
END-PERFORM.
----