Discussion :

[bibak05]

bonjour tous le monde
j'ai un soucis avec la type currency, dans la requête update, il me demande de convertir le type currency, malgré que le type que j'ai configuré sur ma base de donnée est numérique(access), voici ma requête:

Code :

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

datamodule1.nv_vente.SQL.Add('update vente_c set (qtt=:qttv,s_tt='+floattostr(st)+') where code_b='+datamodule1.produit_v.FieldValues['code_barre']+' and n_vente='+edit4.Text+'')

s'il vous plait, à l'aide

[anapurna]

salut

essai un truc de ce genre

Code :

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

1
2
3
4
5
6
7
 
StQuery := 'update vente_c  '
                +'  set qtt=:qttv , s_tt = %f '
               +' where code_b= ''%s'' and n_vente= ''%s'' ';
 
datamodule1.nv_vente.SQL.Add(
Format(StQuery[floattostr(st),datamodule1.produit_v.FieldValues['code_barre'].asString,edit4.Text]))

avec s_tt de type float ou alors il faut l'encadrer de double cote
après mélanger les paramètres avec du texte, des fois cela ne rend pas les choses plus simple

[ShaiLeTroll]

:qttv est un paramètre
Pourquoi ne pas généraliser le ParamByName pour l'ensemble des valeurs ?

Le currency est un faux nombre à virgule, c'est en fait un entier / 10000
Il faut être sûr que le couple provider \ driver supporte cela
Un Double (AsFloat) est préférable.

[SergioMaster]

Bonjour et bienvenue,

pour une premier post, je vais peutêtre paraitre un peu "vache"
Deux choses :
Tout d'abord il vaut mieux utiliser des requêtes paramétrées

Code sql :

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

update vente_c set qtt=:qttv , s_tt =:tt where code_b=:c and n_vente=:nv

ce qui évitera des problèmes de conversions de type de données et d'injection SQL
je suis sidéré que vous ayez utilisé un paramètre pour qtt et pas pour les autres à moins que, carrément vous vous soyez fourvoyé

ensuite et c'est ce qui vaudrait un vous oublier que le SQL utilise un format précis pour des valeurs comme les dates et les nombres, dans le cas des nombres le point décimal et non la virgule.
Si malgré ce que j'ai écrit en premier, vous voulez utiliser des formats ou des floattostr n'oubliez pas d'indiquer le bon format TFormatSettings.EN_US

Enfin, conseil à tout nouveau venu, indiquez votre version de Delphi dans chaque nouvelle discussion et, dans ce fil précis, les composants de données utilisés . datamodule1.nv_vente nous indique que vous utilisez un datamodule mais nv_vente ne nous indique pas de quel type de Query il s'agit (TQuery, TFDQuery, TAdoQuery ?)

S'il s'agit de FDQuery vous pouvez envisager une syntaxe beaucoup plus courte pour cet Update

Code :

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

FDConnexion.ExecSQL('update vente_c set qtt=:qttv , s_tt =:tt where code_b=:c and n_vente=:nv',[qttv,St,datamodule1.produit_v.FieldByName().asinteger,edit4.text]);