Discussion :

[looping]

bonjour,

je fais de l'import de données depuis des tables paradox et je voulais assigner un générateur depuis une variable "compteur" comme indiqué ci dessous:

Code :

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

1
2
3
4
5
6
7
 
ibsql1.Close;
ibsql1.SQL.Clear;
ibsql1.SQL.Add('set generator GEN_L_BONREC_ID to :gen');
ibsql1.ParamByName('gen').AsInteger:=compteur;
ibsql1.ExecQuery;
ibtransaction1.Commit;

mais cela ne fonctionne pas, j'ai l'impression qu'une requête paramétrée ne fonctionne pas avec la commande "set generator to .."

est ce qu'il y a une autre solution ?

merci

[seabs]

Bonjour,

Pour obtenir une valeur du générateur, la requête doit être :

Code :

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

SELECT GEN_ID(GEN_L_BONREC_ID, 1) as pIndex FROM RDB$DATABASE

La modification de votre code peut se faire ainsi :

Code :

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

1
2
3
4
5
6
ibsql1.Close;
ibsql1.SQL.Clear;
ibsql1.SQL.ADD('SELECT GEN_ID(GEN_L_BONREC_ID, 1) as pIndex FROM RDB$DATABASE');
ibsql1.Open;
VariableRecupération := ibsql1.FieldByName('pPkIndex').AsInteger;
ibsql1.Close

Tout ceci peut s'intégrer dans une fonction.

A+