Bonjour,

Mon code est le suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
for (;;) 
{ 
     EXEC SQL FETCH C_CALENDRIER INTO :P_CALENDRIER;
     P_CALENDRIER++;
}
J'alimente simplement le contenu de la structure P_CALENDRIER avec celui du curseur, celui-ci ayant "reçu" le résultat de ma commande SQL.

Le pb c'est que j'obtiens une boucle infinie à cet endroit ...

J'ai ensuite ajouté la ligne :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
EXEC SQL WHENEVER SQLERROR STOP;
Mon programme stoppe bien, et le message d'erreur est :

Execution error : file 'mfini'
error code: 119, pc=0, call=1, seg=0
119 Name is not unique (binding symbol 'mfini')
Help !

Merci d'avance.