ADELIA |
VADELIA |
SADELIA |
WADELIA |
EADELIA |
(I/B) |
(I/B) (C/S) |
(S) |
(I/B) (C/S) |
(B) (C/S) |
Attention : dans le cas des programmes de type ADELIA, cet ordre n'est pas compatible avec le générateur C d'Adélia iSeries Studio ni avec Adélia/400.
Paragraphe d'utilisation
Tous
Syntaxe
CHOIX_SELON Expression
Description
Cet ordre ouvre un bloc de CHOIX_SELON.
Expression est l'expression qui sera évaluée pour déterminer quel SI_VALEUR (ou éventuellement AUTRE_VALEUR) sera exécuté.
Pour les programmes de type ADELIA, l'expression est soit une variable, soit l'appel d'une fonction prédéfinie pouvant être utilisé dans la condition d'un SI.
Pour les programmes de type autre que ADELIA, l'expression peut, en plus d'une variable ou de l'appel à une fonction prédéfinie (pouvant être utilisé dans la condition d'un SI), être une expression arithmétique ou de concaténation.
Pour les programmes de type Visual Adélia Interactif, l'expression peut également être une variable de type OBJET_GRAPHIQUE (de type contrôle, *FENETRE ou *ITEM_MENU).
Par exemple
Exemple 1
CHOIX_SELON WCODE
SI_VALEUR 12 15 25
WCODE = WCODE * 3
WTYPE = '1'
SI_VALEUR 7 8
WCODE = WCODE * 2
WTYPE = '2'
AUTRE_VALEUR
WCODE = WCODE + 1
WTYPE = *BLANK
FIN_CHOIX_SELON
Exemple 2
/* OBJET_GRAPHIQUE(CHAMP_DE_SAISIE) MonObjetChamp */
CHOIX_SELON MonObjetChamp
SI_VALEUR MaFenetre.ChampA
...
SI_VALEUR MaFenetre.ChampB
...
SI_VALEUR *OBJET_NULL
...
AUTRE_VALEUR
...
FIN_CHOIX_SELON
Exemple 3
/* OBJET_GRAPHIQUE(*FENETRE) MonObjetFenetre */
CHOIX_SELON MonObjetFenetre
SI_VALEUR MaFenetreA
...
SI_VALEUR MaFenetreB
...
SI_VALEUR *OBJET_NULL
...
AUTRE_VALEUR
...
FIN_CHOIX_SELON
Exemple 4
/* OBJET_GRAPHIQUE(*ITEM_MENU) MonObjetGraphiqueEltMenu */
CHOIX_SELON MonObjetGraphiqueEltMenu
SI_VALEUR CBUFEN[CBUMENU1]
...
SI_VALEUR CBUFEN[CBUMENU2]
...
SI_VALEUR *OBJET_NULL
...
AUTRE_VALEUR
...
FIN_CHOIX_SELON