Discussion :

[Miflon]

Bonjour à toutes et à tous. Je fais encore appel à vos connaissances.
Renseignements : base de données Postgresql(9.1), Lazarus(1.0.8), Windows XP(SP3)
J'ai écris un petit programme pour insérer des données dans une base Postgresql. Tout le préalable fonctionne, connexion, récupération de données pour remplir des ComboBox, etc. Pour me lancer plus avant vers mon objectif, je réalise quelques tests préalables, dont celui-ci.
La requête suivante fonctionne lancée depuis PgAdminIII :

Code :

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

INSERT INTO s_ucr.t_j_etre_licencies_elc (elc_id, adh_id, elc_numero, fed_id) VALUES (45,55,780841,2);

Avec le code suivant dans Lazarus, aucune erreur n'est relevée, mais aucune donnée n'est insérée dans la table :

Code :

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

1
2
3
4
     RequeteSQL.Close;
     RequeteSQL.SQL.Text:='INSERT INTO s_ucr.t_j_etre_licencies_elc (elc_id, adh_id, elc_numero, fed_id) VALUES (45,55,780841,2);';
     RequeteSQL.ExecSQL;
     RequeteSQL.Close;

Je sollicite votre expertise pour m'aider à résoudre ce problème et vous en remercie par avance.
Michel.

[alanglet]

Bonjour,

Je ne connais pas spécialement Postgresql, mais un peu mieux le SQL, aussi il me semble que les modifications faites dans une transaction doivent être "commitées" en fin de transaction pour être effectives.

André

[Miflon]

Dimanche pluvieux et même neigeux, dimanche studieux.
Voici le code, grâce à alanglet, qui fonctionne :

Code :

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

1
2
3
4
5
     RequeteSQL.Close;
     RequeteSQL.SQL.Text:='INSERT INTO s_ucr.t_j_etre_licencies_elc (elc_id, adh_id, elc_numero, fed_id) VALUES (45,55,780841,2);';
     RequeteSQL.ExecSQL;
     TransactionSQL.Commit;
     RequeteSQL.Close;

Il ne me reste plus qu'à paramétrer la requête.
Merci alanglet, Michel.