Afficher le nombre d’enregistrements affectés par une instruction DELETE, UPDATE, … ?
c/exec sql
C+ UPDATE SET NUMCTL = 1 FROM PERSPHY WHERE NUMCTL = 0
c/end-exec
c*
c/exec sql
c+ GET DIAGNOSTICS :wNbre=ROW_COUNT
c/end-exec
/free
dsply %char(wNbre) ;
*inlr = *on ;
/end-free