Insertion de type money dans les tables SQL

Version imprimable

Bonjour

Je viens vers la communauté SQL pour un renseignement:

J'essaye d'insérer des valeur a virgule flottante ( money) dans les tables SQL

Dans Sql j'ai bien des champs a valeur Money
Code:

1 2 StrSql = "INSERT INTO FactureTmp (NumeroArticle,Designation,PxVente,Quantite,TypeDocument,TotalBrutLigne,RemiseLigne,TvaLigne) VALUES ('" & _ NumArticle & "','" & Designation & "','" & PxVente & "','" & Quantite & "','" & DocType & "','" & Total_Brut_Ligne & "','" & Remise_Ligne & "','" & Montant_Tva_Ligne & "')"
Si PxVente = 1,73, je retrouve 173,00 dans la table :cry:

Quelqu'un aurais une idée, lien, ou bout de code

Merci bien des fois

20/07/2009, 13h25
Erwan1978

Pouvez vous nous indiquer la structure de votre table ?
Pour rappel, Clic droit sur votre table à partir d'Enterprise Manager / Management Studio Puis "Générer un script de la table..."

Voici

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
INSERT INTO [LunchX].[dbo].[FactureTmp]
           ([NumeroArticle]
           ,[Designation]
           ,[PxVente]
           ,[Quantite]
           ,[TauxTva]
           ,[TypeDocument]
           ,[TotalBrutLigne]
           ,[RemiseLigne]
           ,[TvaLigne])
     VALUES
           (<NumeroArticle, nvarchar(10),>
           ,<Designation, nvarchar(100),>
           ,<PxVente, money,>
           ,<Quantite, int,>
           ,<TauxTva, money,>
           ,<TypeDocument, nvarchar(2),>
           ,<TotalBrutLigne, money,>
           ,<RemiseLigne, money,>
           ,<TvaLigne, money,>)

Je ne reproduis pas le comportement que vous décrivez...
Avez vous vérifiez la présence éventuelle d'un trigger sur INSERT ?

Voici mon script :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
CREATE TABLE dbo.FactureTmp
	(NumeroArticle NVARCHAR(10)
	,Designation NVARCHAR(100)
	,PxVente MONEY
	,Quantite INT
	,TauxTva MONEY
	,TypeDocument nvarchar(2)
	,TotalBrutLigne MONEY
	,RemiseLigne MONEY
	,TvaLigne MONEY)
 
INSERT INTO dbo.FactureTmp
(NumeroArticle,Designation,PxVente,Quantite,TauxTva,TypeDocument,TotalBrutLigne,RemiseLigne,TvaLigne)
VALUES('0000001','Mon article',1.73,12,0.186,'ZZ',20.76,0,3.86136)
 
SELECT *
FROM dbo.FactureTmp

20/07/2009, 15h18
jero44

Bonjour,
l'erreur provient de votre construction de requête:

Citation:

StrSql = "INSERT INTO FactureTmp (NumeroArticle,Designation,PxVente,Quantite,TypeDocument,TotalBrutLigne,RemiseLigne,TvaLigne) VALUES ('" & _
NumArticle & "','" & Designation & "','" & PxVente & "','" & Quantite & "','" & DocType & "','" & Total_Brut_Ligne & "','" & Remise_Ligne & "','" & Montant_Tva_Ligne & "')"

dans laquelle le prix de vente est passé entre simple quote (') c'est à dire comme du texte.

Code:

..."','" & PxVente & "','" ...

Pour éviter ce type de mésaventure il est nécessaire de passer par des requêtes paramétrées.
20/07/2009, 15h36
elsuket

Bonjour,

Tu veux dire des procédures stockées ?

@++ ;)
20/07/2009, 15h37
thierry007

Voila qui est bon a savoir
Tu aurais un exemple et/ou tutoriel :ccool:
20/07/2009, 16h58
SQLpro

Les types MONEY et SMALLMONEY sont a éviter. C'est une grosse merde de SQL Server :
1) cela n'existe pas dans la norme SQL. C'est hérité de Sybase du temps ou on comptait les octets parce que le disque coutait très cher
2) il à 4 décimales alors que nos monnaies en ont deux. D'où des erreurs dans les calculs comptables et financiers.

A +

alors je supposes qu'il est préférable d'utiliser du type Float

j'ai trouvé un tuto sur les valeur paramètrées mais que je ne peux mettre en pratique, car je me suis fait une DLL ( Classe) dans la quelle je passe qq paramètres, mais alors pas possible d'utiliser les valeurs paramètrées
Elle facilite grandement la tâche malgré sa simplicité

voici un bout de la Classe

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 Public Function Getdatas(ByRef StringSql As String, ByRef TableName As String, ByRef Connexion As String) As DataSet
            Dim Ds As DataSet
            Dim Da As SqlDataAdapter
            Dim ConnexionData As SqlConnection
            Dim StrSql As String = Nothing
            Dim ErrorSource As String = Nothing
 
            Try
                  ConnexionData = New SqlConnection(Connexion)
                  ConnexionData.Open()
                  Da = New SqlDataAdapter(StringSql, Connexion)
                  Ds = New DataSet
                  Da.Fill(Ds, TableName)
                  ConnexionData.Close()
 
                  Return Ds
 
            Catch ex As Exception
 
                  ErrorSource = Environment.MachineName
                  SendEmail(My.Application.Info.ProductName & "@sender.be", "moi@monEmail.eu", ErrorSource & " - Error Program ", ex.Message & vbCrLf & StringSql)
                  Call AnormalFin(0, "Error on table " & TableName, ex.Message)
 
                  Return Nothing
 
            End Try
 
      End Function

20/07/2009, 17h24
jero44

Non ce n'est pas les procèdures stockées mais la façon d'appeler /construire les requêtes depuis ton programme. Par exemple si tu es en .net il faut utiliser la méthode prepare de SqlCommand : http://msdn.microsoft.com/fr-fr/libr...d.prepare.aspx
20/07/2009, 17h46
thierry007

Oui, mais de la a l'implémenter dans la Classe ici plus haut !!!!
20/07/2009, 17h57
Hinault Romaric

Il est préférable pour toi d'utiliser des procédures stockés, Avec les requête paramétré faudra déclarer chaque paramètre hors dans ta classe tu ne peut pas les définir puisque a priori le nombre de paramètre est variant.

PS: Procédure stocké et Requête paramétré peuvent jumeler.
20/07/2009, 18h00
thierry007

HOLA 8O sa devient plus flou je débute avec SQL en VB.NET
un exemple ou tuto serais le bien venu :roll:
Ou alors poser le post dans le VB.NET

Je ne sais pas où tu places ta DLL, mais j'espère que tu ne t'en es pas servi pour créer une procédure stockée d'assembly.
Dans tous les cas il me semble clair que tu peux t'en passer.

Voici un exemple de procédure stockée que tu peux créer :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
CREATE PROCEDURE Ps_NouvelleLigneFacture
	@NumeroArticle INT,
	@Designation VARCHAR(15),
	@PxVente NUMERIC(8,2),
	@Quantite INT,
	@TypeDocument CHAR(5),
	@RemiseLigne NUMERIC(4,2),
AS
BEGIN
	DECLARE @TotalBrutLigne NUMERIC(6,2),
			@TVALigne NUMERIC(6,2)
 
	SELECT @TotalBrutLigne = @PxVente * @Quantite,
			@TVALigne = @TotalBrutLigne * 0.196
 
	INSERT INTO dbo.FactureTmp
	(
		NumeroArticle,
		Designation,
		PxVente,
		Quantite,
		TypeDocument,
		TotalBrutLigne,
		RemiseLigne,
		TvaLigne
	)
	VALUES
	(
		@NumeroArticle,
		@Designation,
		@PxVente,
		@Quantite,
		@TypeDocument,
		@TotalBrutLigne,
		@RemiseLigne,
		@TVALigne
	)
END

ou encore :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
CREATE PROCEDURE Ps_NouvelleLigneFacture
	@NumeroArticle INT,
	@Designation VARCHAR(15),
	@PxVente NUMERIC(8,2),
	@Quantite INT,
	@TypeDocument CHAR(5),
	@RemiseLigne NUMERIC(4,2),
AS
BEGIN
	DECLARE @TotalBrutLigne NUMERIC(6,2),
			@TVALigne NUMERIC(6,2)
 
	SELECT @TotalBrutLigne = @PxVente * @Quantite,
			@TVALigne = @TotalBrutLigne * 0.196
 
	INSERT INTO dbo.FactureTmp
	(
		NumeroArticle,
		Designation,
		PxVente,
		Quantite,
		TypeDocument,
		TotalBrutLigne,
		RemiseLigne,
		TvaLigne
	)
	SELECT @NumeroArticle,
			@Designation,
			@PxVente,
			@Quantite,
			@TypeDocument,
			@PxVente * @Quantite, -- Anciennement @TotalBrutLigne
			@RemiseLigne,
			@PxVente * @Quantite * 0.196 -- Anciennement @TVALigne
END

Pour exécuter cette procédure stockée depuis SQL Server Management Studio, il te suffit d'écrire, par exemple :

Code:

1
2
3
4
5
6
7
EXEC dbo.Ps_NouvelleLigneFacture
	1, -- @NumeroArticle
	'unArticle', -- @Designation
	321.45, -- @PxVente
	12, -- @Quantite
	'ATX', -- @TypeDocument
	0.02 -- @RemiseLigne

Et pour l'exécuter avec VB.NET (J'espère ne pas avoir trop écrit de pâté :mouarf:) :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
                using(SqlConnection sqlcnx = new SqlConnection("context connection=true"))
                {
                    sqlcnx.Open();
 
                    // Création de l'appel de procédure stockée
                    SqlCommand requete = new SqlCommand("Ps_NouvelleLigneFacture", sqlcnx);
                    requete.CommandType= CommandType.StoredProcedure;
                    requete.Parameters.Add("@NumeroArticle", SqlDbType.Decimal).Value = ...;
                    requete.Parameters.Add("@Designation", SqlDbType.VarChar, 15).Value = ...;
					requete.Parameters.Add...
 
                    // Exécution de la procédure stockée
                    SqlContext.Pipe.ExecuteAndSend(requete);
                }

Tu peux t'aider de l'aide en ligne qui est téléchargeable et consultable depuis les liens qui sont dans ma signature.

Voici pour le CREATE PROCEDURE et pour l'instruction INSERT.

Et tu peux jeter un oeil sur ce billet que j'ai écrit sur l'avantage de l'utilisation des procédures stockées par rapport à une commande T-SQL.

N'hésites pas à poster de nouveau si quelque chose est obscur.

@++ ;)

20/07/2009, 23h05
SQLpro

Utilisez le type DECIMAL, pas le FLOAT !

A +