rspec/rules/S1627/rpg/rule.adoc
Fred Tingaud 16f6c0aecf
Inline adoc when include has no additional value (#1940)
Inline adoc files when they are included exactly once.

Also fix language tags because this inlining gives us better information
on what language the code is written in.
2023-05-25 14:18:12 +02:00

49 lines
1.1 KiB
Plaintext

== Why is this an issue?
When using a ``++PRINTER++`` defined file, an ``++INFDS++`` keyword should be used to read the file's line count from ``++*PSSR++`` positions 367-368.
=== Noncompliant code example
[source,rpg]
----
FCSO602R1 O E PRINTER USROPN
or ...
FCSO602R1 O E PRINTER USROPN
F INFDS(WSFD01)
F INFSR(*PSSR)
D WSFD01 DS
D W1ST01 *STATUS
D W1SPNO 123 124B 0
----
=== Compliant solution
[source,rpg]
----
FCSO602R1 O E PRINTER USROPN
F INFDS(WSFD01)
F INFSR(*PSSR)
D WSFD01 DS
D W1ST01 *STATUS
D W1SPNO 123 124B 0
D W1LNCT 367 368B 0
D W1PGNO 369 372B 0
----
ifdef::env-github,rspecator-view[]
'''
== Implementation Specification
(visible only on this page)
=== Message
Include an ``++INFDS++`` keyword with a reference to position 367-368.
endif::env-github,rspecator-view[]