[2008R2] Qu'est-ce qui cloche avec ce code?

Qu'est-ce qui cloche avec ce code?

Bonjour,

D'abord, j'aimerais préciser que je ne suis pas un expert SQL et que je commence seulement à programmer des fonctions et procédures. Donc j'implore votre tolérance.

J'essaie de créer cette fonction, mais SQL server m'indique qu'il y a une erreur près de "SET" à la ligne 69 qui se trouve à être le dernier "SET @Result..." avant de retourner le résultat.
J'ai eu beau réviser mon code pour voir si j'avais loupé quelque chose, je ne vois pas où est l'os.
Merci de m'aider svp!

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
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
 
create function cas_GetInspectorAlarmStatus 
(
	@UM varchar(240), 
	@DWORDVAL numeric(38,0),
	@ALARM1 numeric(3,0), 
	@ALARM2 numeric(3,0), 
	@ALARM3 numeric(3,0), 
	@ALARM4 numeric(3,0), 
	@ALARM5 numeric(3,0)
)
returns varchar(10)
as
BEGIN
	DECLARE @Status numeric(3,0);
	DECLARE @Result varchar(10);
	DECLARE @Alarms table (idx numeric(3,0), alarm numeric(3,0));
	insert into @Alarms select 1, @ALARM1 union select 2, @ALARM2 union select 3, @ALARM3 union select 4, @ALARM4 union select 5, @ALARM5;
 
	IF ((@UM = 'Sélection unique') or (@UM ='Single Selection'))
		SET @Status = 
			CASE
				WHEN @DWORDVAL=1  then @ALARM1
				WHEN @DWORDVAL=2  then @ALARM2
				WHEN @DWORDVAL=4  then @ALARM3
				WHEN @DWORDVAL=8  then @ALARM4
				WHEN @DWORDVAL=12 then @ALARM5
			END;
	ELSE
		IF ((@UM = 'Sélections multiples') or (@UM = 'Multiple Selections'))
			SET @Status =
				CASE 
					WHEN @DWORDVAL = 1  then @ALARM1
					WHEN @DWORDVAL = 2  then @ALARM2
					WHEN @DWORDVAL = 4  then @ALARM3
					WHEN @DWORDVAL = 8  then @ALARM4
					WHEN @DWORDVAL = 16 then @ALARM5
					WHEN @DWORDVAL = 1	then (select max(alarm) from @Alarms where idx in (1))
					WHEN @DWORDVAL = 2  then (select max(alarm) from @Alarms where idx in (2))
					WHEN @DWORDVAL = 3  then (select max(alarm) from @Alarms where idx in (1,2))
					WHEN @DWORDVAL = 4  then (select max(alarm) from @Alarms where idx in (3))
					WHEN @DWORDVAL = 4  then (select max(alarm) from @Alarms where idx in (3))
					WHEN @DWORDVAL = 6  then (select max(alarm) from @Alarms where idx in (2,3))
					WHEN @DWORDVAL = 7  then (select max(alarm) from @Alarms where idx in (1,2,3))
					WHEN @DWORDVAL = 8  then (select max(alarm) from @Alarms where idx in (4))
					WHEN @DWORDVAL = 10 then (select max(alarm) from @Alarms where idx in (2,4))
					WHEN @DWORDVAL = 11 then (select max(alarm) from @Alarms where idx in (1,2,4))
					WHEN @DWORDVAL = 12 then (select max(alarm) from @Alarms where idx in (3,4))
					WHEN @DWORDVAL = 13 then (select max(alarm) from @Alarms where idx in (1,3,4))
					WHEN @DWORDVAL = 14 then (select max(alarm) from @Alarms where idx in (2,3,4))
					WHEN @DWORDVAL = 15 then (select max(alarm) from @Alarms where idx in (1,2,3,4))
					WHEN @DWORDVAL = 16 then (select max(alarm) from @Alarms where idx in (5))
					WHEN @DWORDVAL = 17 then (select max(alarm) from @Alarms where idx in (1,5))
					WHEN @DWORDVAL = 18 then (select max(alarm) from @Alarms where idx in (2,5))
					WHEN @DWORDVAL = 19 then (select max(alarm) from @Alarms where idx in (1,2,5))
					WHEN @DWORDVAL = 20 then (select max(alarm) from @Alarms where idx in (3,5))
					WHEN @DWORDVAL = 21 then (select max(alarm) from @Alarms where idx in (1,3,5))
					WHEN @DWORDVAL = 23 then (select max(alarm) from @Alarms where idx in (1,2,3,5))
					WHEN @DWORDVAL = 22 then (select max(alarm) from @Alarms where idx in (2,3,5))
					WHEN @DWORDVAL = 24 then (select max(alarm) from @Alarms where idx in (4,5))
					WHEN @DWORDVAL = 25 then (select max(alarm) from @Alarms where idx in (1,4,5))
					WHEN @DWORDVAL = 26 then (select max(alarm) from @Alarms where idx in (2,4,5))
					WHEN @DWORDVAL = 27 then (select max(alarm) from @Alarms where idx in (1,2,4,5))
					WHEN @DWORDVAL = 28 then (select max(alarm) from @Alarms where idx in (3,4,5))
					WHEN @DWORDVAL = 29 then (select max(alarm) from @Alarms where idx in (1,3,4,5))
					WHEN @DWORDVAL = 30 then (select max(alarm) from @Alarms where idx in (2,3,4,5))
					WHEN @DWORDVAL = 31 then (select max(alarm) from @Alarms where idx in (1,2,3,4,5))
				END;
	END;
 
	SET @Result = 
		CASE 
			when @Status = 1 then 'OK'
			when @Status = 2 then 'OK'
			when @Status = 3 then 'ALERT'
			when @Status = 4 then 'DANGER'
		END;
 
	RETURN @Result;
END;

Bonjour,

Vous avez un END en trop.

D'ailleurs, vu que que votre code dans le IF...ELSE est sur plusieurs lignes, je vous recommande d'utiliser des délimiteurs pour une meilleure lisibilité :
Code:

1 2 3 4 5 6 7 8 9 IF (...) BEGIN --code END ELSE BEGIN --code END

Le END avant le CASE termine votre fonction. Supprimez le et tout va bien !

A +

Bonjour,

Vous avez mis un END pour le deuxième IF, sans BEGIN ;)

Par ailleurs une autre coquille s'est glissé dans le code :

On a deux WHEN 1, WHEN 2, WHEN 8, WHEN 16
On a trois WHEN 4 : on a deux fois WHEN 4 THEN (SELECT MAX(alarm) FROM Alarms WHERE idx IN (3)), donc il n'en reste en fait que deux

Or dès que l'un des WHEN est vérifié, les autres ne sont pas évalués.
Donc pour ces valeurs de @DWORDVAL, on n'atteindra jamais ceux qui ont des doublons et un SELECT MAX().

@++ ;)

Sinon, c'est quoi l'intérêt d'utiliser des numeric(3,0) ?

Pourquoi ne pas utiliser tinyint (si les valeurs sont inférieures à 256) ou smallint ?

Ce sera bien plus performant que d'utiliser le type numeric... (mais bon, on parle de quelques cycles CPU, c'est juste que ça me pique les yeux)

Autant pour un numeric(3,2) je pige parfaitement l'intérêt par rapport à un float, autant pour un entier, je vois pas trop :)