[rad-studio MsSql] Commande insert avec parametre

Bonjour

J'aurais besoin de votre aide pour créer une commande SQL avec insert.

Mes besoins sont que je veux entrer dans une commande select environ 20 valeurs textes et ou chiffres lors de création d'un enregistrement ceci est pour enregistrer les données (style formulaire) dans une table. Mon problème vient que je veux copier dans des variables les données après insertion pour les enregistrer dans le formulaire suivant et corriger seulement les informations qui ont changés.

En résumé j'ai 20 variables que je mets dans des paramètres style...

Code:

---

1 2 3 4 5 6 7 8 9 10 11

msquery1.Active:=FALSE; MSQUERY1.SQL.TEXT :='INSERT INTO FORMULAIRE.DBO.INFORMATION VALUES ( VR, CAM, DAT9,TAXE,REQ,DEP,ARR,..........)';   msquery1.ParamByName('VR').AsString:= VR ; msquery1.ParamByName('CAM').AsString:= CAMION ; msquery1.ParamByName('DAT9').AsString:= DATE9; msquery1.ParamByName('TAXE').AsString:= TX ; msquery1.ParamByName('REQ').AsString:= REQ ; msquery1.ParamByName('DEP').AsString:= DEPART; msquery1.ParamByName('ARR').AsString:= ARRIVE ;

---

La suite des données sont conforme dans l'ordre des champs de la table

Merci de votre aide

Mario

Il faut spécifier les noms des paramètres avec des ":", tu n'as pas d'identity dans ta table ?
Je trouve plus lisible et plus sûre de spécifier les colonnes dans les insert.

Code:

---

INSERT INTO formulaire.dbo.information FORMULAIRE.DBO.INFORMATION (VR, CAM, DAT9, ...) VALUES (:vr, :cam: dat9, ...)

---

Après tu lances un update global sinon il faut stocker tes champs dans un objet, dès que l'utilisateur modifie le champ tu mets un flag comme quoi il a été mis à jour, à l'enregistrement tu construis dynamiquement ton update.

Bonjour

Merci pour votre aide.

Une petite question supplémentaire . Qu'elle est la quantité d'information que je peux placer dans un insert , update , select, J'ai lu que je peux aller a 4 k.
Est-ce exact ou c'est moins.

Bonne journée

Mario

Oup!

c'est la première fois que ca arrive

J'ai oublié de vous demander comment on écrit la commande quand on dépasse 255 caractères J'ai un message d'erreur lors de la compilation

Code:

---

MSQUERY1.SQL.TEXT :='INSERT INTO formulaire.dbo.information FORMULAIRE.DBO.INFORMATION (VR, CAM, DAT9, ...) VALUES (:vr, :cam: dat9, ...)

---

Merci

Mario

Pour le nombre maximum je ne sais pas, mais je dirais que cela dépend de ton champ en base. Si c'est un VARCHAR(MAX) tu peux faire ce que tu veux je pense.

Sur les Query utilise plutôt le Append plutôt que de setter le texte.

Code:

---

1 2	Qry.SQL.Append('INSERT INTO (...)'); Qry.SQL.Append('VALUES(:a, :b, ...)');

---

Sinon pour passer la limite il suffit de concaténer sur une deuxième ligne.

Bonjour

Quand vous dite

Citation:

---

Sinon pour passer la limite il suffit de concaténer sur une deuxième ligne.

---

comment je dois faire si sur la première ligne je dépasse 255 caractères

Code:

---

1 2	Qry.SQL.Append('INSERT INTO (... plus grand que 255 car.....)'); Qry.SQL.Append('VALUES(:a, :b, ... plus grand que 255 car......)');

---

comme cela

Code:

---

1 2 3 4 5

Qry.SQL.Append('INSERT INTO (vr,...'); Qry.SQL.Append('cam,dat9'); Qry.SQL.Append('champ10,champ11'); Qry.SQL.Append('VALUES(:a, :b, ...)'); Qry.SQL.Append(':v, :y)');

---

merci de votre aide

Mario

ou

Code:

---

1 2 3 4 5 6 7

MSQUERY1.SQL.TEXT := ' INSERT INTO formulaire.dbo.information FORMULAIRE.DBO.INFORMATION' + ' (VR, CAM, DAT9, ' + ' champ10, champ11 ...) ' + ' VALUES ' + ' (:vr, :cam: dat9, ' + ' :v, :y) ' ;

---

Cela peut avoir un impact car certaines lib analyse le SQL à chaque ajout (pour détecter les paramètres), tout soumettre d'un coup est plus efficace

C'est un peu le B.A.-BA : F2069 Ligne trop longue (plus de 1023 caractères) (Delphi)

Citation:

---

Ce message d'erreur est produit lorsque la longueur d'une ligne d'un fichier source dépasse 255 caractères.

Vous pouvez normalement diviser la ligne longue en deux lignes plus courtes.

Si vous avez vraiment besoin d'une constante chaîne longue, vous pouvez la scinder sur plusieurs lignes consécutives que vous concaténerez avec l'opérateur '+'.

---

Avant de vous attaquer à la base de données, une lecture des bases en Delphi serait approprié : Guide Pascal et Delphi > V. Préliminaires > V-A-2. Caractères et chaînes de caractères

Bonjour

Merci de votre aide.

Ca fonctionne très biens. Votre aide est très apprécié.

Le résultat est très rapide pour la création. Mais il me manque une information pour que l'affichage soit a jour a l'écran.

Pour voir l'enregistrement crée je dois faire un refresh de ma table apres la création ce qui ralenti un peu. Il doit me manqué un lien entre mon datasource de mon application et le Query lors de la création de mon nouveau enregistrement.

Si vous avez une idée pour orienté mes recherches ca m'aiderait beaucoup.

Merci encore

Mario

Bonjour,

Citation:

---

Envoyé par mario9

Mais il me manque une information pour que l'affichage soit a jour a l'écran.
Pour voir l'enregistrement crée je dois faire un refresh de ma table après la création ce qui ralenti un peu.

---

Affichage qui, je présume, se situe dans une grille et le datasource lié à une requête ou table

Code:

---

1 2	Il doit me manquer un lien entre mon datasource de mon application et le Query lors de la création de mon nouveau enregistrement.

---

Non, il n' y a pas de manque, c'est "normal" considérez un DataSource comme un cliché à un instant T, votre requête (ou celle des autres en environnement multi-utilisateurs) se passant après cet instant T il faut donc rafraichir le cliché pas de secret si ce n'est que plus le contenu du datasource est petit, plus le ralentissement sera faible

Bonjour

Merci à tous pour votre aide.


Mario