Pour des traitements effectuant des COMMITs réguliers et afin de conserver la position du CURSOR lors de lecture ou de mises à jour, il est impératif que les DECLARE CURSOR soient codés avec l’option WITH HOLD
== Compliant Solution
[source,cobol]
----
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
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[]
