Section courante

A propos

Section administrative du site

SELECT

 Sélection de cas
PL/1

Syntaxe

SELECT(resultat);
 WHEN(1)
 instruction_exécuté_si_vrai;
 WHEN(2)
 instruction_exécuté_si_vrai;
 WHEN(3)
 instruction_exécuté_si_vrai;
 OTHERWISE
 instruction_exécuté_si_faux;
END;

Paramètres

Nom Description
résultat Ce paramètre permet d'indiquer l'expression à tester le résultat
valeur Ce paramètre permet d'indiquer la valeur avec lequel le résultat doit être comparer
instruction_exécuté_si_vrai Ce paramètre permet d'indiquer les instructions à exécuter si la condition est vrai
instruction_exécuté_si_faux Ce paramètre permet d'indiquer les instructions à exécuter si la condition est fausse

Description

Cette instruction permet de définir une liste de conditionnels ayant comme point de comparaison un même résultat.

Exemple

Voici un exemple une utilisation typique de cette instruction :

  1.  Corps: PROC options(main);  
  2.      DECLARE (a) fixed;
  3.      a = 2;
  4.      SELECT(a);
  5.         WHEN(1,2,3)
  6.             display('Entre 1 et 3');
  7.         WHEN(4,5,6)
  8.             display('Entre 4 et 6');
  9.         WHEN(7)
  10.             display('C''est 7');
  11.         OTHERWISE
  12.             display('Inférieur ou égale à 0 ou supérieur à 8');
  13.      END;
  14.  END Corps;

on obtiendra le résultat suivant :

Entre 1 et 3

Dernière mise à jour : Lundi, le 13 octobre 2014