rspec/rules/S1733/cobol/rule.adoc

50 lines
1.5 KiB
Plaintext
Raw Normal View History

Afin de ne pas perturber via la programmation, les paramètres positionnés sur les BIND PACKAGE pour des environnements de type 24/24 7/7, il est important de vérifier que les ordres de SELECT simples ou dans les DECLARE CURSOR que les mots clés WITH RR, WITH RS er WITH CS ne soient pas positionnés. Le seul mot clé accepté est WITH UR.
Sassurer que sur les ordres de SELECT (simple ou mis dans des DECLARE CURSOR) que les mots clés WITH RR, WITH RS er WITH CS ne soient pas positionnés.
== Noncompliant Code Example
----
EXEC SQL DECLARE CLEC_0 CURSOR WITH HOLD
FOR SELECT C_BQ
,C_CARNT_ORDREB
,N_REF_ORDREB…..
FROM S1ORDCOU
WHERE
( C_BQ >= :TORD-C-BQ ) AND NOT
( C_BQ = :TORD-C-BQ AND…..
ORDER BY C_BQ,C_CARNT_ORDREB,N_REF_ORDREB
FOR FETCH ONLY
WITH RR
END-EXEC.
----
== Compliant Solution
----
EXEC SQL DECLARE CLEC_0 CURSOR WITH HOLD
FOR SELECT C_BQ
,C_CARNT_ORDREB
,N_REF_ORDREB…..
FROM S1ORDCOU
WHERE
( C_BQ >= :TORD-C-BQ ) AND NOT
( C_BQ = :TORD-C-BQ AND…..
ORDER BY C_BQ,C_CARNT_ORDREB,N_REF_ORDREB
FOR FETCH ONLY
WITH UR ou RIEN
END-EXEC.
----
ifdef::env-github,rspecator-view[]
== Comments And Links
(visible only on this page)
include::comments-and-links.adoc[]
endif::env-github,rspecator-view[]