Procédure SQL : Boucle sur CURSEUR

[Yakaldir]

J’aimerais connaître une méthode simple pour lire tous les rangs d’un curseur du premier au dernier en utilisant la gestion des erreurs NOT FOUND ou SQLCODE par exemple.

D’avance merci

[Mercure]

Avec quel langage ?

[Yakaldir]

Désolée, mais je suis débutante sur cet environnement ... Je dirais que c'est l'équivalent du PL/SQL sous ORACLE afin d'écrire des procédures, fonctions ou packages stockés.

[Mercure]

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
WHENEVER SQLERROR GOTO erreur2;
 
Declare C1 cursor FOR
SELECT col1, col2, col3, ... FROM MaTable
WHERE ...
...
 
Open C1;
IF SQLCODE < 0   -- erreur1
...
end IF:
 
WHENEVER NOT FOUND GO TO fini;
MaBoucle: 
 Loop        
  Fetch C1 INTO var1, var2, var3, ...
 
IF ... Then     -- Pour quitter la boucle avant que le fetch atteigne EOF
   Leave MaBoucle;         
End IF;          
 
End Loop MaBoucle;    
 
Close C1;      
 
fini: 
...
RETURN;
 
erreur2:
...
RETURN;

[Yakaldir]

J'avais essayé quelquechose d'équivalent mais en fait je bloque sur le SQLCODE qui semble avoir toujours la valeur 0 même en fin de curseur !
Je vais essayer cette solution, merci.

[Mercure]

En fin de curseur, il me semble bien que SQLCODE = 100.