rspec/rules/S1656/cobol/rule.adoc

49 lines
786 B
Plaintext
Raw Permalink Normal View History

== Why is this an issue?
2020-06-30 12:47:33 +02:00
include::../description.adoc[]
=== Noncompliant code example
2020-06-30 12:47:33 +02:00
2022-02-04 17:28:24 +01:00
[source,cobol]
2020-06-30 12:47:33 +02:00
----
SET NAME TO NAME. *> Noncompliant
MOVE NAME TO NAME. *> Noncompliant
COMPUTE NAME = NAME. *> Noncompliant
EXEC SQL
UPDATE PERSON
SET NAME = NAME -- Noncompliant
WHERE ID = :PERSON_ID
END-EXEC.
----
=== Compliant solution
2020-06-30 12:47:33 +02:00
2022-02-04 17:28:24 +01:00
[source,cobol]
2020-06-30 12:47:33 +02:00
----
SET NAME TO NEW_NAME.
MOVE NEW_NAME TO NAME.
COMPUTE NAME = NEW_NAME.
EXEC SQL
UPDATE PERSON
SET NAME = :NEW_NAME
WHERE ID = :PERSON_ID
END-EXEC.
----
ifdef::env-github,rspecator-view[]
'''
== Implementation Specification
(visible only on this page)
include::../message.adoc[]
'''
== Comments And Links
(visible only on this page)
include::../comments-and-links.adoc[]
endif::env-github,rspecator-view[]