Discussion :

[AllanRoc]

Bonjour,

Je fais ceci

zone ='fnorue';
num = 0;

exec sql select :zone into :num from ppe1p where....;

ça ne fonctionne pas

Si je fais exec sql select fnorue into :num from ppe1p where....;

Là ça fonctionne

Dans le debug zone est bien identifié 'fnorue',

Une idée? Merci

[m4k-Hurrican]

Bonjour,

Tu ne peux pas paramétrer le nom du champ à lire.
Ce serait du SQL dynamique, et la façon de faire n'est donc plus la même (prepare, declare, open, fetch, close...).

La compilation passe car on peut utiliser SQL pour faire des opérations avec des valeurs. C'est très utile quand on a des fonctions complexes. On passe alors les valeurs en paramètre (donc avec une zone précédée du signe ":").

[AllanRoc]

Merci pour ta réponse, j'avais déjà essayé prepare.... Mais cela n'a pas fonctionné, je vais réessayer.

J'ai trouvé ça aussi: https://www.ibm.com/docs/en/i/7.4?to...repare-execute

Je reviens vers toi pour te tenir au courant.

[m4k-Hurrican]

Tu ne peux pas utiliser Execute, c'est une requête en lecture dont tu as besoin.
Donc :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
          clear num;;
          valeurParametre = ... ;  // valeur du paramètre ? utilisé dans la condition
          SQLStr = 'Select fnorue '
                 + 'From ppe1p '
                 + 'Where ... ta condition = ?';

          Exec SQL  Prepare S1 From :SQLStr;
          Exec SQL  Declare C1  Cursor For S1;
          Exec SQL  Open  C1 using :valeurParametre;
          if SQLCOD = 0;
             Exec SQL  Fetch  C1 into  :num;
             Exec SQL  Close  C1;
          endIf;

[AllanRoc]

Merci beaucoup, ça marche