© Éditions Eyrolles
219
chapitre n° 6
Bases du langage de programmation
Selon la nature de l’expression et des conditions, une des deux écritures suivantes peut être
utilisée :
Le tableau suivant nous livre l’écriture avec IF d’une programmation qu’il est plus rationnel
d’effectuer avec une structure CASE (de type searched) :
Structures répétitives
Étudions à présent les trois structures répétitives tant que, répéter et boucle sans fin.
Structure tant que
La structure tant que se programme à l’aide de la syntaxe suivante. Avant chaque itération (et
notamment avant la première), la condition est évaluée. Si elle est vraie, la séquence d’instructions est exécutée, puis la condition est réévaluée pour un éventuel nouveau passage dans la
Tableau 6-13 Structures CASE
CASE
searched CASE
CASE variable
WHEN expr1 THEN instructions1;
WHEN expr2 THEN instructions2;
…
WHEN exprN THEN instructionsN;
[ELSE instructionsN+1;]
END CASE;
CASE
WHEN condition1 THEN instructions1;
WHEN condition2 THEN instructions2;
…
WHEN conditionN THEN instructionsN;
[ELSE instructionsN+1;]
END CASE;
Tableau 6-14 Différentes programmations
IF
CASE
BEGIN
DECLARE v_mention CHAR(2);
DECLARE v_note DECIMAL(4,2) DEFAULT 9.8; ...
IF v_note >= 16 THEN
SET v_mention := 'TB';
ELSEIF v_note >= 14 THEN
SET v_mention := 'B';
ELSEIF v_note >= 12 THEN
SET v_mention := 'AB';
ELSEIF v_note >= 10 THEN
SET v_mention := 'P';
ELSE
;
END IF;
...
CASE
WHEN v_note >= 16 THEN SET v_mention := 'TB';
WHEN v_note >= 14 THEN SET v_mention := 'B';
WHEN v_note >= 12 THEN SET v_mention := 'AB';
WHEN v_note >= 10 THEN SET v_mention := 'P';
ELSE
SET v_mention := 'R';
END CASE;
...
Web
SET v_mention := 'R'