2021-04-28 16:49:39 +02:00
|
|
|
The use of ``++options( *nopass )++`` on a parameter makes it optional, so it should always be checked before use.
|
|
|
|
|
2021-04-28 18:08:03 +02:00
|
|
|
|
2021-04-28 16:49:39 +02:00
|
|
|
== Noncompliant Code Example
|
|
|
|
|
2022-02-04 17:28:24 +01:00
|
|
|
[source,rpg]
|
2021-04-28 16:49:39 +02:00
|
|
|
----
|
|
|
|
DCL-PR VIOLATION1 EXTPGM;
|
|
|
|
LASTNAME Char(10);
|
|
|
|
FIRSTNAME Char(10) OPTIONS(*NOPASS:*OMIT);
|
|
|
|
END-PR;
|
|
|
|
|
|
|
|
DCL-PI VIOLATION1;
|
|
|
|
LASTNAME Char(10);
|
|
|
|
FIRSTNAME Char(10) OPTIONS(*NOPASS:*OMIT);
|
|
|
|
END-PI;
|
|
|
|
|
|
|
|
dsply FIRSTNAME;
|
|
|
|
dsply LASTNAME; // Noncompliant; LASTNAME is optional
|
|
|
|
*inlr = *on;
|
|
|
|
----
|
|
|
|
|
2021-04-28 18:08:03 +02:00
|
|
|
|
2021-04-28 16:49:39 +02:00
|
|
|
== Compliant Solution
|
|
|
|
|
2022-02-04 17:28:24 +01:00
|
|
|
[source,rpg]
|
2021-04-28 16:49:39 +02:00
|
|
|
----
|
|
|
|
DCL-PR VIOLATION1 EXTPGM;
|
|
|
|
LASTNAME Char(10);
|
|
|
|
FIRSTNAME Char(10) OPTIONS(*NOPASS:*OMIT);
|
|
|
|
END-PR;
|
|
|
|
|
|
|
|
DCL-PI VIOLATION1;
|
|
|
|
LASTNAME Char(10);
|
|
|
|
FIRSTNAME Char(10) OPTIONS(*NOPASS:*OMIT);
|
|
|
|
END-PI;
|
|
|
|
|
|
|
|
dsply FIRSTNAME;
|
|
|
|
IF %PARMS > 1;
|
|
|
|
dsply LASTNAME;
|
|
|
|
EndIf;
|
|
|
|
*inlr = *on;
|
|
|
|
----
|
2021-04-28 18:08:03 +02:00
|
|
|
|
2021-06-02 20:44:38 +02:00
|
|
|
|
2021-06-03 09:05:38 +02:00
|
|
|
ifdef::env-github,rspecator-view[]
|
2021-09-20 15:38:42 +02:00
|
|
|
|
|
|
|
'''
|
|
|
|
== Implementation Specification
|
|
|
|
(visible only on this page)
|
|
|
|
|
|
|
|
include::message.adoc[]
|
|
|
|
|
|
|
|
include::highlighting.adoc[]
|
|
|
|
|
2021-06-08 15:52:13 +02:00
|
|
|
'''
|
2021-06-02 20:44:38 +02:00
|
|
|
== Comments And Links
|
|
|
|
(visible only on this page)
|
|
|
|
|
|
|
|
include::comments-and-links.adoc[]
|
2021-06-03 09:05:38 +02:00
|
|
|
endif::env-github,rspecator-view[]
|