Téléchargement des produits


Version anglaise


 

 

ADELIA

VADELIA

SADELIA

WADELIA

MADELIA

(I/B)

(I/B) (S)

(B) (S)

(I/B) (S)

(I) (S)

 

Attention : dans le cas des programmes de type ADELIA, cet ordre est uniquement compatible avec le générateur RPG.

 

Paragraphe d'utilisation

Tous

 

Syntaxe

FERMER_SQL_C NomCurseur

 

Description

Cet ordre ferme le curseur NomCurseur.

 

Il faut fermer un curseur après l'avoir lu complètement.

 

Après exécution de l'ordre, il est possible de tester le code retour SQL à l'aide du mot réservé *SQLCODE.

 

Par exemple

* Déclaration d'un curseur sur l'entité CONTRAT dans un paragraphe DECL PGM en syntaxe Visual Adélia :

CURSEUR CURS_CON_NOMASS CONTRAT *COND(CNOM_ASS = :ZANOM_ASS)

 

...

 

Ou

* Déclaration d'un curseur sur l'entité CONTRAT en syntaxe ADELIA :

DECL CURSEUR CURS_CON_NOMASS CONTRAT *COND (CNOM_ASS = :ZANOM_ASS)

 

* Ce bloc ouvre le curseur et lit tous ses éléments, puis le ferme

OUVRIR_SQL_C CURS_CON_NOMASS

LIRE_AV_SQL_C CURS_CON_NOMASS

TANT_QUE *SQLCODE = *NORMAL

TRAITER_CHG RUPT_AVENANT

PRESENTER CONTRAT

LIRE_AV_SQL_C CURS_CON_NOMASS

TRAITER_TOTAL RUPT_AVENANT

REFAIRE

FERMER_SQL_C CURS_CON_NOMASS

 

↑ Haut de page


  • Aucune étiquette