65 lines
1.4 KiB
Plaintext
65 lines
1.4 KiB
Plaintext
include::../description.adoc[]
|
|
|
|
== Noncompliant Code Example
|
|
|
|
With the default threshold of 3:
|
|
|
|
----
|
|
C MOVEL 'CLEAR' W1CLR Noncompliant
|
|
C MOVEL '*DECOD' W1DCDE
|
|
C MOVEL '*ERROR' W1ERR
|
|
C MOVEL '*EXIT ' W1EXIT
|
|
C MOVEL 'CLEAR' W1FIRT
|
|
C MOVEL 'CLEAR' W1HELP
|
|
----
|
|
|
|
----
|
|
/free
|
|
W1CLR = 'CLEAR'; // Noncompliant
|
|
W1FIRT = 'CLEAR';
|
|
W1HELP = 'CLEAR';
|
|
/end-free
|
|
----
|
|
|
|
== Compliant Solution
|
|
|
|
----
|
|
D W0Clr C CONST('CLEAR')
|
|
C MOVEL W0Clr W1CLR
|
|
C MOVEL '*DECOD' W1DCDE
|
|
C MOVEL '*ERROR' W1ERR
|
|
C MOVEL '*EXIT ' W1EXIT
|
|
C MOVEL W0Clr W1FIRT
|
|
C MOVEL W0Clr W1HELP
|
|
----
|
|
|
|
----
|
|
D W0Clr C CONST('CLEAR')
|
|
/free
|
|
W1CLR = W0Clr;
|
|
W1FIRT = W0Clr;
|
|
W1HELP = W0Clr;
|
|
/end-free
|
|
----
|
|
|
|
include::../exceptions.adoc[]
|
|
|
|
ifdef::env-github,rspecator-view[]
|
|
|
|
'''
|
|
== Implementation Specification
|
|
(visible only on this page)
|
|
|
|
include::../message.adoc[]
|
|
|
|
include::../parameters.adoc[]
|
|
|
|
include::../highlighting.adoc[]
|
|
|
|
'''
|
|
== Comments And Links
|
|
(visible only on this page)
|
|
|
|
include::../comments-and-links.adoc[]
|
|
endif::env-github,rspecator-view[]
|