Pb Type de données

**Yanmeunier** · 02/01/2006, 15h59

Bonjour
J'effectue un trigger dans lequel j'ai un curseur qui permet de récupérer des données seulemnt quand j'insère dans mes variables les valeurs qui ont des virgules sql arrondi. Pourtant le type de mes variables sont des numeric.
Si vous aviez une petite idée.
Merci

**SQLpro** · 02/01/2006, 16h16

Poste ton code.

Un trigger avec un cursor c'est déjà pas très bon.

A +

**Yanmeunier** · 02/01/2006, 17h30

Pkoi si j'ai pas le choix c'est comme utiliser un trigger dans une procédure normale.
J'ai quel risque?

**Fabien Celaia** · 02/01/2006, 20h20

Raison de performances... comme SQLPro vous l'a demandé, commencez par psoter votre code... merci

**Yanmeunier** · 03/01/2006, 09h16

Voila mon code:

Code :

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

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
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
 
CREATE TRIGGER PassageBF ON [dbo].[F_DOCLIGNE] 
FOR  UPDATE
AS
DECLARE @PasseBF NUMERIC(13), @Qte NUMERIC(13),@Type SMALLINT,@Piece VARCHAR(9) ,@DL_No INTEGER,@maxDL_No INTEGER,@QteAvant NUMERIC(13),@Test INTEGER,@sens SMALLINT,@DO_Piece VARCHAR(9),@NbLigne INTEGER,
@CHAR_DO_Piece_bis  CHAR(1),
@CHAR_DO_Piece CHAR(1),-- Caractère pour ajout au n° de pièce
@CHAR_DO_Piece4 CHAR(1),
@CHAR_DO_Piece3 CHAR(1),
@CHAR_DO_Piece2 CHAR(1),
@CHAR_DO_Piece1 CHAR(1),@cbMarq INTEGER,
@AR_Ref         VARCHAR(17),    -- Numéros de l'article
@CdRet          INTEGER,        -- Code de retour pour les procédures
@Colisage       INTEGER,        -- Nombre de pièce par colis
@Palette            INTEGER,        -- Numéros de palette
[color=blue]@DL_Qte         NUMERIC,[/color]        -- Quantité pour la ligne d'origine
@MaxCdMarq      INTEGER,        -- Code ligne pour l'insertion
@i                  INTEGER,        -- Variable de boucle
@DL_PoidsNet    NUMERIC,        -- Poid net de la ligne réference
@DL_PoidsBrut   NUMERIC,        -- Poid brute de la ligne réference
@PoidsNet       NUMERIC,        -- Poid net de la ligne nouvelle
@PoidsBrut      NUMERIC,        -- Poid brute de la ligne nouvelle
@DL_MontantHT   NUMERIC,        -- Montant HT de la ligne réference
@DL_MontantTTC  NUMERIC,        -- Montant TTC de la ligne réference
@MontantHT  NUMERIC,            -- Montant HT recalculé
@MontantTTC NUMERIC,            -- Montant TTC recalculé
@ref_art    VARCHAR(6),
@ref        VARCHAR(17),
@ref_art_num    VARCHAR(1),
@DO_Domaine SMALLINT,
@DO_Type SMALLINT,
@CT_Num VARCHAR(17),
@DL_PieceBC VARCHAR(9),
@DL_PieceBL VARCHAR(9),
@DO_Date SMALLDATETIME,
@DL_DateBC SMALLDATETIME,
@DL_DateBL SMALLDATETIME,
@DL_Ligne INTEGER,
@DO_Ref VARCHAR(17),
@DL_TNomencl SMALLINT,
@DL_TRemPied SMALLINT,
@DL_TRemExep SMALLINT,
@DL_Design VARCHAR(69),
@DL_QteBC NUMERIC(13),
@DL_QteBL NUMERIC(13),
@DL_Remise01REM_Valeur NUMERIC(13),
@DL_Remise01REM_Type SMALLINT,
@DL_Remise02REM_Valeur NUMERIC(13),
@DL_Remise02REM_Type SMALLINT,
@DL_Remise03REM_Valeur NUMERIC(13),
@DL_Remise03REM_Type SMALLINT,
@DL_PrixUnitaire NUMERIC(13),
@DL_PUBC NUMERIC(13),
@DL_Taxe1 NUMERIC(13),
@DL_TypeTaux1 SMALLINT,
@DL_TypeTaxe1 SMALLINT,
@DL_Taxe2 NUMERIC(13),
@DL_TypeTaux2 SMALLINT,
@DL_TypeTaxe2 SMALLINT,
@RE_No INTEGER,
@cbRE_No INTEGER,
@AG_No1 INTEGER, 
@AG_No2 INTEGER,
@DL_PrixRU NUMERIC(13),
@DL_CMUP NUMERIC(13),
@DL_MvtStock SMALLINT,
@GL_No INTEGER,
@cbGL_No INTEGER,
@AF_RefFourniss VARCHAR(19),
@EU_Enumere VARCHAR(21),
@EU_Qte NUMERIC(13),
@DL_TTC SMALLINT,
@DE_No INTEGER,
@cbDE_No INTEGER,
@DL_NoRef SMALLINT,
@DL_TypePL SMALLINT,
@DL_PUDevise NUMERIC(13),
@DL_PUTTC NUMERIC(13),
@DO_DateLivr SMALLDATETIME,
@CA_Num VARCHAR(13),
@DL_Taxe3 NUMERIC(13),
@DL_TypeTaux3 SMALLINT,
@DL_TypeTaxe3 SMALLINT,
@DL_Frais NUMERIC(13),
@DL_Valorise SMALLINT,
@AR_RefCompose VARCHAR(19),
@DL_NonLivre SMALLINT,
@AC_RefClient VARCHAR(19),
@DL_FactPoids SMALLINT,
@DL_Escompte SMALLINT,
@cbProt SMALLINT,
@cbCreateur CHAR(4),
@cbModification SMALLDATETIME,
@cbReplication INTEGER,
@cbFlag SMALLINT,
@DL_QteAp NUMERIC(13),
@DL_QteBCAp NUMERIC(13),
@DL_QteBLAp NUMERIC(13),
@PoidsNetAp NUMERIC(13),
@PoidsBrutAp NUMERIC(13),
@EU_QteAp NUMERIC(13),
@DL_TTCAp SMALLINT,
@DL_MontantHTAp NUMERIC(13),
@DL_MontantTTCAp NUMERIC(13),
@NvTest VARCHAR(17),
@k INTEGER,@Total NUMERIC(13),
@DL_PiecePL VARCHAR(9),
@DL_DatePL SMALLDATETIME,
@DL_QtePL NUMERIC(13),@DL_NoColis VARCHAR(19)
 
SELECT @Type=DO_Type,@PasseBF=PassageBF,@Qte=DL_Qte,@Piece=DO_Piece,@DL_No=DL_No,@sens=DL_MvtStock FROM Inserted
SELECT @QteAvant=DL_Qte FROM Deleted
 
Set @Test=0
IF UPDATE(PassageBF)
BEGIN
   IF @Type=25
   BEGIN
       IF @sens=0 AND (@PasseBF<>0) 
       BEGIN
           set @sens=3
           IF(@PasseBF<@QteAvant)
	   BEGIN
           Set @NbLigne=@@rowcount
           --Calculer Nouveau DO_Piece
           IF @Piece=NULL 
           BEGIN
               Raiserror('Le No_Pièce est NULL',16,1)
           END
           IF LEN(@Piece)>=10 
           BEGIN
               Raiserror('Le numéro de pièce ne peut être incrémenté',16,1)
           END
 
           SELECT @CHAR_DO_Piece_bis = RIGHT(LEFT(MAX(DO_Piece),8),1)--Récupere le chiffre qui va falloir incrementer
           FROM F_DOCENTETE 
           WHERE DO_Type=25
 
           SELECT @CHAR_DO_Piece = LEFT(RIGHT(MAX(DO_Piece),2),1)--Récupere le chiffre qui va falloir incrementer
           FROM F_DOCENTETE 
           WHERE DO_Type=25
 
           SELECT @CHAR_DO_Piece1 = LEFT(RIGHT(MAX(DO_Piece),3),1) --Récupere le nombre à rajouter en cas de test 1
           FROM F_DOCENTETE 
           WHERE DO_Type=25
 
           SELECT @CHAR_DO_Piece2 = LEFT(RIGHT(MAX(DO_Piece),4),1) --Récupere le nombre à rajouter en cas de test 1
           FROM F_DOCENTETE 
           WHERE DO_Type=25
 
           SELECT @CHAR_DO_Piece3 = LEFT(RIGHT(MAX(DO_Piece),5),1) --Récupere le nombre à rajouter en cas de test 1
           FROM F_DOCENTETE 
           WHERE DO_Type=25
 
           SELECT @CHAR_DO_Piece4 =LEFT(RIGHT(MAX(DO_Piece),6),1) --Récupere le nombre à rajouter en cas de test 1
           FROM F_DOCENTETE 
           WHERE DO_Type=25 
 
           -- Pour Info 'A' = 65 ; 'Z' = 90 ; 'a' = 97 ; 'z' = 122
           -- Recherche de la lettre suivante
           IF @CHAR_DO_Piece_bis IS NULL
           BEGIN
               SET @CHAR_DO_Piece_bis = '0' -- si pas de lettre initialise à 0
           END
           ELSE
           BEGIN
           -- incrémente la lettre
               IF (ASCII(@CHAR_DO_Piece_bis) >= 47
                   AND ASCII(@CHAR_DO_Piece_bis) < 57) -- Verifie qu'une lettre existe*/
               BEGIN
                   SET @CHAR_DO_Piece_bis = CHAR(ASCII(@CHAR_DO_Piece_bis) + 1)
               END
               ELSE        
               BEGIN
               -- incrémente la lettre
                   IF (ASCII(@CHAR_DO_Piece) >= 47 AND ASCII(@CHAR_DO_Piece) < 57) -- Verifie qu'une lettre existe*/
                   BEGIN
                       SET @CHAR_DO_Piece = CHAR(ASCII(@CHAR_DO_Piece) + 1)
                       SET @CHAR_DO_Piece_bis = '0'
                   END
                   ELSE
                   BEGIN
                   IF (ASCII(@CHAR_DO_Piece1) >= 47 AND ASCII(@CHAR_DO_Piece1) < 57) -- Verifie qu'une lettre existe*/
                   BEGIN
                       SET @CHAR_DO_Piece1 = CHAR(ASCII(@CHAR_DO_Piece1) + 1)
                       SET @CHAR_DO_Piece = '0'
                       SET @CHAR_DO_Piece_bis = '0'
                   END
                   ELSE 
                   BEGIN
                       IF (ASCII(@CHAR_DO_Piece2) >= 47 AND ASCII(@CHAR_DO_Piece2) < 57)
                       BEGIN
                           SET @CHAR_DO_Piece2 = CHAR(ASCII(@CHAR_DO_Piece2) + 1)
                           SET @CHAR_DO_Piece1 = '0'
                           SET @CHAR_DO_Piece = '0'
                           SET @CHAR_DO_Piece_bis = '0'
                       END
                       ELSE
                       BEGIN
                           IF (ASCII(@CHAR_DO_Piece3) >= 47 AND ASCII(@CHAR_DO_Piece3) < 57)
                           BEGIN
                               SET @CHAR_DO_Piece3 = CHAR(ASCII(@CHAR_DO_Piece3) + 1)
                               SET @CHAR_DO_Piece2 = '0'
                               SET @CHAR_DO_Piece1 = '0'
                               SET @CHAR_DO_Piece = '0'
                               SET @CHAR_DO_Piece_bis = '0'
                           END
 
                           BEGIN -- toutes les lettres ont été utilisées
                               RAISERROR ('Impossible de Numéroter cette pièce1',16,1)
                           END
                       END
                   END
               END
           END
 
       SET @DO_Piece ='OF'+ @CHAR_DO_Piece3 + @CHAR_DO_Piece2+@CHAR_DO_Piece1 + @CHAR_DO_Piece +@CHAR_DO_Piece_bis --@DO_PieceOrigine+@CHAR_DO_Piece 
       IF @DO_Piece IS NULL
       BEGIN
           RAISERROR('Le do_Piece est null',16,1)
       END 
       -- Valeur de cbMarq
       SELECT @cbMarq = MAX([cbMarq]+1)
       FROM [F_DOCENTETE]
 
       --Insertion ENTETE
       INSERT INTO [F_DOCENTETE] 
       ([DO_Domaine],[DO_Type],[DO_Piece],[DO_Date],[DO_Ref],[DO_Tiers],
       [RE_No],[cbRE_No],[DO_Period],[DO_Devise],[DO_Cours],[DE_No],
       [cbDE_No],[LI_No],[cbLI_No],[CT_NumPayeur],[DO_Expedit],
       [DO_NbFacture], [DO_BLFact],[DO_TxEscompte],[DO_Reliquat],[DO_Imprim],
       [CA_Num],[DO_Coord01],[DO_Coord02],[DO_Coord03],[DO_Coord04],
       [DO_Souche],[DO_DateLivr],[DO_Condition],[DO_Tarif],[DO_Colisage],
       [DO_TypeColis], [DO_Transaction],[DO_Langue],[DO_Ecart],[DO_Regime],
       [N_CatCompta],[DO_Ventile],[AB_No],[DO_DebutAbo],[DO_FinAbo],
       [DO_DebutPeriod],[DO_FinPeriod],[CG_Num],[DO_Statut],[DO_Heure],
       [CA_No],[cbCA_No],[RE_NoCaissier],[cbRE_NoCaissier],[DO_Transfere],
       [DO_Cloture],[DO_NoWeb],[DO_Attente],[DO_Provenance],[cbProt],
       /*[cbMarq],*/[cbCreateur],[cbModification],[cbReplication],[cbFlag])
       SELECT 
       [DO_Domaine],[DO_Type], @DO_Piece,[DO_Date],[DO_Ref],[DO_Tiers],
       [RE_No],[cbRE_No],[DO_Period],[DO_Devise],[DO_Cours],[DE_No],
       [cbDE_No],[LI_No],[cbLI_No],[CT_NumPayeur],[DO_Expedit],
       [DO_NbFacture],[DO_BLFact],[DO_TxEscompte],[DO_Reliquat],
       [DO_Imprim],[CA_Num],[DO_Coord01],[DO_Coord02],[DO_Coord03],
       [DO_Coord04],[DO_Souche],[DO_DateLivr],[DO_Condition],[DO_Tarif],
       [DO_Colisage],[DO_TypeColis],[DO_Transaction],[DO_Langue],
       [DO_Ecart],[DO_Regime],[N_CatCompta],[DO_Ventile],[AB_No],
       [DO_DebutAbo],[DO_FinAbo],[DO_DebutPeriod],[DO_FinPeriod],[CG_Num],
       [DO_Statut],[DO_Heure],[CA_No],[cbCA_No],[RE_NoCaissier],
       [cbRE_NoCaissier],[DO_Transfere],[DO_Cloture],[DO_NoWeb],[DO_Attente],
       [DO_Provenance],[cbProt],/*@cbMarq,*/[cbCreateur],[cbModification],
       [cbReplication],[cbFlag]
       FROM [F_DOCENTETE]
       WHERE [DO_Piece] = @Piece
 
       --1er Curseur
           --Raiserror(@DO_Piece,16,1)
 
 
           set @k=0
           DECLARE cursor_AvantModif CURSOR  
           FOR SELECT [DL_No],[AR_Ref],[DO_Type],[DO_Domaine],[DL_Ligne],[DL_Design],
	   [DL_Valorise],[DL_PieceBC],[CT_Num],[DL_PieceBL],[DO_Date],[DL_DateBL],[DL_DateBC],
	   [DO_Ref],[DL_TNomencl],[DL_QteBC],[DL_QteBL],[DL_TRemPied],[DL_TRemExep],[DL_MvtStock],
	   [DL_Qte],[DE_No],[DL_PoidsNet],[DL_PoidsBrut],[DL_Remise01REM_Valeur],
	   [DL_Remise01REM_Type],[DL_Remise02REM_Valeur],[DL_Remise02REM_Type],[DL_Remise03REM_Valeur],
	   [DL_Remise03REM_Type],[DL_PrixUnitaire],[DL_PUBC],[DL_Taxe1],[DL_TypeTaux1],[DL_TypeTaxe1],
	   [DL_Taxe2],[DL_TypeTaux2],[DL_TypeTaxe2],[RE_No],[AG_No1],[AG_No2],[DL_PrixRU],[DL_CMUP],
	   [GL_No],[AF_RefFourniss],[EU_Enumere],[DL_TTC],[DL_NoRef],[DL_TypePL],[DL_PUDevise],
	   [DL_PUTTC],[DO_DateLivr],[CA_Num],[DL_Taxe3],[DL_TypeTaux3],[DL_TypeTaxe3],[AR_RefCompose],
	   [DL_NonLivre],[DL_Frais],[AC_RefClient],[DL_MontantHT],[DL_MontantTTC],[DL_FactPoids],
	   [DL_Escompte],[DL_PiecePL],[DL_DatePL],[DL_QtePL],[DL_NoColis]
           FROM F_DOCLIGNE 
           WHERE DO_Piece=@Piece
 
           OPEN cursor_AvantModif
           FETCH NEXT FROM cursor_avantModif INTO @DL_No,@AR_Ref,@Type,@DO_Domaine,
	   @DL_Ligne,@DL_Design,@DL_Valorise,@DL_PieceBC,@CT_Num,@DL_PieceBL,@DO_Date,
	   @DL_DateBL,@DL_DateBC,@DO_Ref,@DL_TNomencl,@DL_QteBC,@DL_QteBL,
	   @DL_TRemPied,@DL_TRemExep,@DL_MvtStock,@DL_Qte,@DE_No,@DL_PoidsNet,@DL_PoidsBrut,
	   @DL_Remise01REM_Valeur,@DL_Remise01REM_Type,@DL_Remise02REM_Valeur,@DL_Remise02REM_Type,
	   @DL_Remise03REM_Valeur,@DL_Remise03REM_Type,@DL_PrixUnitaire,@DL_PUBC,
	   @DL_Taxe1,@DL_TypeTaux1,@DL_TypeTaxe1,@DL_Taxe2,@DL_TypeTaux2,@DL_TypeTaxe2,@RE_No,
	   @AG_No1,@AG_No2,@DL_PrixRU,@DL_CMUP,@GL_No,@AF_RefFourniss,@EU_Enumere,@DL_TTC,@DL_NoRef,
	   @DL_TypePL,@DL_PUDevise,@DL_PUTTC,@DO_DateLivr,@CA_Num,@DL_Taxe3,@DL_TypeTaux3,
	   @DL_TypeTaxe3,@AR_RefCompose,@DL_NonLivre,@DL_Frais,@AC_RefClient,@DL_MontantHT,@DL_MontantTTC,
	   @DL_FactPoids,@DL_Escompte,@DL_PiecePL,@DL_DatePL,@DL_QtePL,@DL_NoColis
 
 
           WHILE @@FETCH_STATUS = 0
           BEGIN     
	   	SELECT @nbLigne=COUNT(DL_No) FROM F_DOCLIGNE WHERE DO_Piece=@Piece
           	SELECT @maxDL_No=MAX(DL_No)+1 from F_DOCLIGNE
	   	set @maxDL_No=0
		If(@DL_MvtStock=3)
		BEGIN
		Set @Total=((@QteAvant-@PasseBF)/@QteAvant*@DL_Qte)
 
           	BEGIN TRANSACTION
		Set @k=@k+1
               	INSERT INTO [F_DOCLIGNE]
           	([DO_Domaine],[DO_Type],[CT_Num],[DO_Piece],[DO_Date],
           	[DL_Ligne],[AR_Ref],[DL_Design],[DL_Qte],[DL_No],[EU_Qte],[DL_Valorise],
		[DL_PieceBC],[DL_PieceBL],[DL_DateBL],[DL_DateBC],[DO_Ref],[DL_TNomencl],
		[DL_QteBC],[DL_QteBL],[DL_TRemPied],[DL_TRemExep],[DL_MvtStock],[DE_No],
		[DL_PoidsNet],[DL_PoidsBrut],[DL_Remise01REM_Valeur],[DL_Remise01REM_Type],
		[DL_Remise02REM_Valeur],[DL_Remise02REM_Type],[DL_Remise03REM_Valeur],
		[DL_Remise03REM_Type],[DL_PrixUnitaire],[DL_PUBC],[DL_Taxe1],[DL_TypeTaux1],
		[DL_TypeTaxe1],[DL_Taxe2],[DL_TypeTaux2],[DL_TypeTaxe2],[RE_No],[AG_No1],
		[AG_No2],[DL_PrixRU],[DL_CMUP],[GL_No],[AF_RefFourniss],[EU_Enumere],[DL_TTC],
		[DL_NoRef],[DL_TypePL],[DL_PUDevise],[DL_PUTTC],[DO_DateLivr],[CA_Num],
		[DL_Taxe3],[DL_TypeTaux3],[DL_TypeTaxe3],[AR_RefCompose],[DL_NonLivre],
		[DL_Frais],[AC_RefClient],[DL_MontantHT],[DL_MontantTTC],[DL_FactPoids],[DL_Escompte],
		[DL_PiecePL],[DL_DatePL],[DL_QtePL],[DL_NoColis])
           	VALUES
           	(@DO_Domaine,@Type,@CT_Num,@DO_Piece,@DO_Date,@DL_Ligne,@AR_Ref,
	   	@DL_Design,@DL_Qte/@QteAvant*(@QteAvant-@PasseBF),@maxDL_No,(@QteAvant-@PasseBF)/@QteAvant*@DL_Qte,@DL_Valorise,
		@DL_PieceBC,@DL_PieceBL,@DL_DateBL,@DL_DateBC,@DO_Ref,@DL_TNomencl,
		@DL_QteBC,@DL_QteBL,@DL_TRemPied,@DL_TRemExep,@DL_MvtStock,@DE_No,
		@DL_PoidsNet,@DL_PoidsBrut,@DL_Remise01REM_Valeur,@DL_Remise01REM_Type,
		@DL_Remise02REM_Valeur,@DL_Remise02REM_Type,@DL_Remise03REM_Valeur,@DL_Remise03REM_Type,
		@DL_PrixUnitaire,@DL_PUBC,@DL_Taxe1,@DL_TypeTaux1,@DL_TypeTaxe1,
		@DL_Taxe2,@DL_TypeTaux2,@DL_TypeTaxe2,@RE_No,@AG_No1,@AG_No2,@DL_PrixRU,@DL_CMUP,
		@GL_No,@AF_RefFourniss,@EU_Enumere,@DL_TTC,@DL_NoRef,@DL_TypePL,@DL_PUDevise,@DL_PUTTC,
		@DO_DateLivr,@CA_Num,@DL_Taxe3,@DL_TypeTaux3,@DL_TypeTaxe3,@AR_RefCompose,
		@DL_NonLivre,@DL_Frais,@AC_RefClient,@DL_MontantHT,@DL_MontantTTC,@DL_FactPoids,@DL_Escompte,
		@DL_PiecePL,@DL_DatePL,@DL_QtePL,@DL_NoColis)
           	COMMIT
 
		If @k=6
		BEGIN
			Set @NvTest=STR(@DL_Qte,10,5)
	   		Raiserror(@NvTest,16,1)
		END
		END
 
		If(@DL_MvtStock=0)
		BEGIN
		BEGIN TRANSACTION
		INSERT INTO [F_DOCLIGNE]
           	([DO_Domaine],[DO_Type],[CT_Num],[DO_Piece],[DO_Date],
           	[DL_Ligne],[AR_Ref],[DL_Design],[DL_Qte],[DL_No],[EU_Qte],[DL_Valorise],
		[DL_PieceBC],[DL_PieceBL],[DL_DateBL],[DL_DateBC],[DO_Ref],[DL_TNOmencl],
		[DL_QteBC],[DL_QteBL],[DL_TRemPied],[DL_TRemExep],[DL_MvtStock],[DL_PoidsNet],
		[DL_PoidsBrut],[DL_Remise01REM_Valeur],[DL_Remise01REM_Type],
		[DL_Remise02REM_Valeur],[DL_Remise02REM_Type],[DL_Remise03REM_Valeur],
		[DL_Remise03REM_Type],[DL_PrixUnitaire],[DL_PUBC],[DL_Taxe1],[DL_TypeTaux1],
		[DL_TypeTaxe1],[DL_Taxe2],[DL_TypeTaux2],[DL_TypeTaxe2],[RE_No],[AG_No1],
		[AG_No2],[DL_PrixRU],[DL_CMUP],[GL_No],[AF_RefFourniss],[EU_Enumere],[DL_TTC],[DE_No],
		[DL_NoRef],[DL_TypePL],[DL_PUDevise],[DL_PUTTC],[DO_DateLivr],[CA_Num],
		[DL_Taxe3],[DL_TypeTaux3],[DL_TypeTaxe3],[AR_RefCompose],[DL_NonLivre],[DL_Frais],
		[AC_RefClient],[DL_MontantHT],[DL_MontantTTC],[DL_FactPoids],[DL_Escompte],
		[DL_PiecePL],[DL_DatePL],[DL_QtePL],[DL_NoColis])
           	VALUES
           	(@DO_Domaine,@Type,@CT_Num,@DO_Piece,@DO_Date,@DL_Ligne,@AR_Ref,
	   	@DL_Design,@QteAvant-@PasseBF,@maxDL_No,@QteAvant-@PasseBF,@DL_Valorise,
		@DL_PieceBC,@DL_PieceBL,@DL_DateBL,@DL_DateBC,@DO_Ref,@DL_TNomencl,
		@DL_QteBC,@DL_QteBL,@DL_TRemPied,@DL_TRemExep,@DL_MvtStock,@DL_PoidsNet,
		@DL_PoidsBrut,@DL_Remise01REM_Valeur,@DL_Remise01REM_Type,@DL_Remise02REM_Valeur,
		@DL_Remise02REM_Type,@DL_Remise03REM_Valeur,@DL_Remise03REM_Type,@DL_PrixUnitaire,
		@DL_PUBC,@DL_Taxe1,@DL_TypeTaux1,@DL_TypeTaxe1,@DL_Taxe2,@DL_TypeTaux2,
		@DL_TypeTaxe2,@RE_No,@AG_No1,@AG_No2,@DL_PrixRU,@DL_CMUP,@GL_No,@AF_RefFourniss,
		@EU_Enumere,@DL_TTC,@DE_No,@DL_NoRef,@DL_TypePL,@DL_PUDevise,@DL_PUTTC,@DO_DateLivr,
		@CA_Num,@DL_Taxe3,@DL_TypeTaux3,@DL_TypeTaxe3,@AR_RefCompose,@DL_NonLivre,@DL_Frais,
		@AC_RefClient,@DL_MontantHT,@DL_MontantTTC,@DL_FactPoids,@DL_Escompte,
		@DL_PiecePL,@DL_DatePL,@DL_QtePL,@DL_NoColis)
           	COMMIT
		END
		/*Set @NvTest=STR(@QteAvant-@PasseBF,10,5)
	  	Raiserror(@NvTest,16,1)*/
          	FETCH NEXT FROM cursor_AvantModif INTO @DL_No,@AR_Ref,@Type,@DO_Domaine,
	   	@DL_Ligne,@DL_Design,@DL_Valorise,@DL_PieceBC,@CT_Num,@DL_PieceBL,@DO_Date,
	   	@DL_DateBL,@DL_DateBC,@DO_Ref,@DL_TNomencl,@DL_QteBC,@DL_QteBL,
	   	@DL_TRemPied,@DL_TRemExep,@DL_MvtStock,@DL_Qte,@DE_No,@DL_PoidsNet,@DL_PoidsBrut,
	   	@DL_Remise01REM_Valeur,@DL_Remise01REM_Type,@DL_Remise02REM_Valeur,@DL_Remise02REM_Type,
	   	@DL_Remise03REM_Valeur,@DL_Remise03REM_Type,@DL_PrixUnitaire,@DL_PUBC,
	   	@DL_Taxe1,@DL_TypeTaux1,@DL_TypeTaxe1,@DL_Taxe2,@DL_TypeTaux2,@DL_TypeTaxe2,@RE_No,
	   	@AG_No1,@AG_No2,@DL_PrixRU,@DL_CMUP,@GL_No,@AF_RefFourniss,@EU_Enumere,@DL_TTC,@DL_NoRef,
		@DL_TypePL,@DL_PUDevise,@DL_PUTTC,@DO_DateLivr,@CA_Num,@DL_Taxe3,@DL_TypeTaux3,
		@DL_TypeTaxe3,@AR_RefCompose,@DL_NonLivre,@DL_Frais,@AC_RefClient,@DL_MontantHT,@DL_MontantTTC,
		@DL_FactPoids,@DL_Escompte,@DL_PiecePL,@DL_DatePL,@DL_QtePL,@DL_NoColis
          	END
 
           CLOSE cursor_AvantModif
           DEALLOCATE cursor_AvantModif
           END
	   UPDATE F_DOCLIGNE SET DL_Qte=(DL_Qte*@PasseBF)/@QteAvant  FROM F_DOCLIGNE WHERE DO_Piece=@Piece AND 
DL_MvtStock=3
           UPDATE F_DOCLIGNE SET DL_Qte=@PasseBF  FROM F_DOCLIGNE WHERE DO_Piece=@Piece AND 
DL_MvtStock=0
           COMMIT
           END
 
           IF(@PasseBF>@QteAvant)
	   BEGIN
		BEGIN TRANSACTION
	   	UPDATE F_DOCLIGNE SET DL_Qte=(DL_Qte*@PasseBF)/@QteAvant  FROM F_DOCLIGNE WHERE DO_Piece=@Piece AND 
DL_MvtStock=3
           	UPDATE F_DOCLIGNE SET DL_Qte=@PasseBF  FROM F_DOCLIGNE WHERE DO_Piece=@Piece AND 
DL_MvtStock=0
           	COMMIT
	   END
	   END
 
   END
END
Merci

**WOLO Laurent** · 03/01/2006, 11h21

Envoyé par Yanmeunier

Bonjour
J'effectue un trigger dans lequel j'ai un curseur qui permet de récupérer des données seulemnt quand j'insère dans mes variables les valeurs qui ont des virgules sql arrondi. Pourtant le type de mes variables sont des numeric.
Si vous aviez une petite idée.
Merci

Ajoutez la précision et le nombre de chiffre après la virgule !

Sous la forme Numeric(p,n) ou p est la précision et n le nombre de chiffres après la virgule.

**SQLpro** · 03/01/2006, 11h27

Critiques

1) votre trigger n'opère pas sur une logique ensembliste. Il ne fera pas ce que vous voudriez qu'il fasse si le mise à jour concerne plusieurs lignes.

2) un trigger est situé à l'intérieur d'une transaction, celle là meme qui l'a déclenchée (UPDATE) donc piloter des transactions à l'intérieur d'un trigger n'a aucun effet.

3) le code de votre trigger est tellement énorme et le traitement tellement complexe que, si jamais il marche, toutes vos mise à jour vont commencer à prendre beaucoup de temps. Comme il faut poser des verrous pour assurer l'UPDATE, alors vous allez obtenir de la contention jusqu'a un probable blocage complet du serveur (mse à jours imbriquées dans boucles de trigger). Ce n'est donc absolument pas dans un trigger qu'il faut jouer un tel code. Remplacez le par une procédure stockée qui se substituera dans votre application à tout update de la table F_DOCLIGNE.

A +

**Yanmeunier** · 03/01/2006, 13h59

L'Update ne peut pas avoir lieu sur plusieurs lignes.
En ce qui concerne la deuxième critique si vous pouviez être plus précis.
Et en ce qui concerne la troisième crittique je n'ai pas de mise à jour imbriqué donc le problème de blocage du serveur ne peut pas avoir lieu.

**SQLpro** · 03/01/2006, 14h35

L'Update ne peut pas avoir lieu sur plusieurs lignes.

Que se passe t-il si la requête suivante est lancée :

Code :

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

1
2
UPDATE F_DOCLIGNE
SET PassageBF = PassageBF + 1

?
Vous allez me dire que c'est pas possible parce que dans votre code il n'y a qu'une seule requête... Et dans l'avenir ??? Si une nouvelle interface est mise en place ???

En ce qui concerne la deuxième critique si vous pouviez être plus précis.

Un trigger est déclenché par un ordre SQL comme UPDATE. Un UPDATE EST UNE TRANSACTION. Donc le code du trigger est situé quelque part entre le début de la transaction qui à démarré avec l'ordre UPDATE et le COMMIT ou ROLLBACK implicite qui finira le code du trigger.
Toute transaction à l'intérieur du trigger n'aura donc aucun effet. (pas de transactions imbriquée, ou plus exactement la seule transaction opérante est la première, dans le cas présent, celle de l'ordre UPDATE ayant lancé le code du trigger).

Et en ce qui concerne la troisième crittique je n'ai pas de mise à jour imbriqué donc le problème de blocage du serveur ne peut pas avoir

oh que si vous avez de multiples mise à jour imbriquées dans votre trigger :
INSERT INTO [F_DOCENTETE]
INSERT INTO [F_DOCLIGNE]
INSERT INTO [F_DOCLIGNE]
UPDATE F_DOCLIGNE
UPDATE F_DOCLIGNE
UPDATE F_DOCLIGNE
UPDATE F_DOCLIGNE
voici celles que j'ai compté. Il y en a peut être d'autres. J'ai survolé.
Ne confondez pas mise à jour des données et UPDATE (modification).
On parle de mise à jour des données pour tout ordre SQL de type INSERT, UPDATE, DELETE, donc générant des verrous.

A +

**Yanmeunier** · 04/01/2006, 08h51

En reregardant mon trigger je ne vois toujour pas d'imbrication de mise à jour. Quand j'observe les imbrication que vous me faites part s'en ai pas.
Car si vraiment j'ai des imbrications et que par le pure hasard je fais une certaine manip SQL SERVER m'afficherait une erreur d'imbrication comme j'avais au départ de la création de mon trigger. Mais je vous explique:

Je travaille en SQL pour répondre à des exigences concernant le logiciel SAGE. Donc en faite tous les triggers que j'utilise sont généralement fait que pour Sage.
De plus lorsque je créé un nouveau trigger ou une nouvelle proc je les teste sur la base du client avec donc les trigger et les procédures déjà existantes.

En plus une nouvelle application qui modifierait PassageBF comme vous me l'indiquer n'est pas oposiible du faite que ce champs je l'ai créé spécialement pour ce trigger.

Merci

**SQLpro** · 04/01/2006, 13h20

Encore une fois vous ne lisez pas ce que l'on vous dit. Je ne peut pas me répéter éternellement. Relisez les post que j'ai fait ou bien formez vous à SQL Server.

Si vous le voulez je propose des formations à la carte qui peuvent être prise en charge par les fond mutualisés de formation professionnelle.
Mon entreprise DATA SAPIENS est agréée pour cela.
http://www.datasapiens.com/prestations/index.htm

A +

Pb Type de données

MS SQL Server

Vue hybride

Discussions similaires

Partager

Partager