insertion à Partir d'un dbgrid

**znathan** · 28/11/2011, 12h12

Bonjour!je précise mon idée avant de poser mes questions.Je dispose d'un dbgrid à partir duquel je voudrais saisir des informations dans une base de donnée.Ayez un peu d’indulgence envers moi.Donc sur mon Form y a un sqlconnection, un sqlquery, un datasetprovider, un clientdataset et une datasource.Je fais les liaisons nécessaires, et dans le sqlquery, à la propriété sql, j'écris INSERT INTO CR (CODEP, LIBELLEP, ANNEE1, ANNEE2) VALUES(:CODEP,:LIBELLEP, :ANNEE1, :ANNEE2 ) le remplis aussi la propriété params avec soin et quand je tente de mettre Active à true, j'ai l'erreur ---------------------------
Erreur
---------------------------
ORA-01400: impossible d'insérer NULL dans ("TP"."CR"."CODEP").
---------------------------
OK
---------------------------
Vous l'aurez compris, je travaille sur oracle!
Ma question est alors là!pourquoi l'erreur puisque je ne tente même pas une insertion!suis toujours en mode conception!(à moins que quelques choses m'échappent avec les TSQLQuery).
Et une autre question; pensez-vous que mon idée d'utiliser le dbgrid est bonne?Merci

**Ph. B.** · 28/11/2011, 12h52

Bonjour,

Envoyé par znathan

sur mon Form y a un sqlconnection, un sqlquery, un datasetprovider, un clientdataset et une datasource.Je fais les liaisons nécessaires, et dans le sqlquery, à la propriété sql, j'écris INSERT INTO CR (CODEP, LIBELLEP, ANNEE1, ANNEE2) VALUES(:CODEP,:LIBELLEP, :ANNEE1, :ANNEE2 ) le remplis aussi la propriété params avec soin et quand je tente de mettre Active à true, j'ai l'erreur...

Rendre active le SqlQuery revient à exécuter la requête à savoir une insertion.
Aucune valeur de paramètre n'étant défini, on obtient l'erreur dont vous faites part. CQFD !
Vu les composants mis en jeu, je mettrais dans le Query la requête suivante:

Code sql :

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

SELECT CODEP, LIBELLEP, ANNEE1, ANNEE2 FROM CR

Je réaliserais les opérations d'insertion, de modification et de suppression depuis le clientdataset (commandes edit, insert, post, delete ...) puis je renverrais à un moment choisi les modifications à la base de données en appelant ApplyUpdates sur le clientdataset ou dans la foulée (en appelant la commande dans l'évènement AfterPost, AfterDelete).
Pour les détails, je vous renvoie à l'aide de Delphi.
--
Philippe.

**znathan** · 28/11/2011, 16h07

Ok!merci de m'avoir répondu!Mais avec le code select, mon dbgrid sera rempli avec les enregistrement de la table; y a t-il un moyen d'éviter cela ou je dois passer par exemple par les StringGrid?

**Ph. B.** · 28/11/2011, 17h07

S'il s'agit exclusivement d'ajouter de nouveaux enregistrements, une solution est d'utiliser le clientdataset en mémoire, cad sans liaison à une table ou un query mais dont il faudra définir les colonnes (type, taille) en reprenant celles de la table de la base de données à alimenter. Ce clientdataset est relié à la DBGrid via un datasource.

2 manières de gérer les ajouts :
1) En fin de traitement, le clientdataset est parcouru et chaque ligne est insérée dans la table via le query (passage des paramètres, appel à ExecSql). Il faudra utiliser un query avec la requête d'insertion dans la table de la base.

2) A chaque insertion, sur l'évènement AfterPost, la ligne est insérée via le query.
Attention en cas de mise à jour il faudra utiliser un query avec une requête

Code sql :

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

UPDATE CR SET... WHERE....

Il faudra utiliser les évènements AfterEdit, AfterInsert pour préalablement mémoriser l'opération en cours (insertion ou mise à jour) et le prendre en compte dans l'évènement AfterPost.
--
Philippe.