Opérateurs de comparaison

ADELIA	VADELIA	SADELIA	WADELIA	EADELIA
(I/B)	(I/B) (C/S)	(B) (S)	(I/B) (C/S)	(B) (C/S)

Paragraphe d'utilisation

Tous

Syntaxe

EltTypé OpérateurComparaison EltTypé

EltTypé = SuiteEltsTypés

EltTypé <> SuiteEltsTypés

EltTypé

* non utilisable dans une SuiteEltTypés dans le contexte des programmes de type ADELIA

** non utilisable dans le contexte des programmes de type ADELIA

OpérateurComparaison

= | <> | < | <= | >= | >

SuiteEltsTypés

EltTypé;EltTypé | EltTypé;SuiteEltsTypés

Description

Les différents opérateurs de comparaison permettent de comparer des valeurs et de renvoyer un résultat booléen vrai ou faux. Il est possible de combiner plusieurs tests dans une même expression avec les opérateurs de liaison ET et OU.

Tous les opérandes "EltTypé" ou "SuiteEltsTypés" sont de même type (alpha, numérique, date, time, timestamp, image, pointeur, ref_classe(nomClasse), objet_graphique(NomOGB)). Pour les types suivants : pointeur, image, ref_classe(nomClasse), objet_graphique(NomOGB), seuls les opérateurs "=" et "<>" sont possibles.

Si des zones numériques sont comparées, les zones de longueur différente sont alignées au niveau du point décimal.

Si des zones alphanumériques sont comparées, les zones de longueur différente sont alignées à partir du caractère le plus à gauche. La zone la plus courte est comblée avec des espaces pour pouvoir être égale (en taille) à la plus grande.

Une zone numérique positive est toujours plus grande qu'une zone numérique négative.

Pour l'opérateur = (égal à), il est possible d'écrire :

SI VAR = A;B;C;D

Dans ce cas, le programme teste si la variable VAR est égale à A, à B, à C ou à D. La liaison OU est implicite.

Pour l'opérateur <> (différent de), il est possible d'écrire :

SI VAR <> A;B;C;D

Dans ce cas, le programme teste si la variable VAR est différente de A et de B et de C et de D. La liaison ET est implicite.

Remarque : Pour le type alphanumérique, les comparaisons >, <, >= et <= se font en fonction de la séquence des caractères dans la page de code courante (EBCDIC pour AS/400, ANSI pour Windows, UTF16 pour Java ou une génération Unicode).

Par exemple

SI CODE_OPTION <> '2';'3';'4'

ERREUR

FIN

*

SI TOTAL <> 0 ET CODE_REGLEMENT <> 'CHEQUE'

RESULTAT = TOTAL + ( TOTAL * TAX_1 / 100 )

SINON

RESULTAT = TOTAL + ( TOTAL * TAX_2 / 100 )

FIN

*

SI REPONSE = 'YES';'JA';'SI';'OUI';'DA'

APPELER IMPR_LISTE

FIN

*

LIRE_AVANT CLIENT

TANT_QUE CLIENTS EXISTE ET NUMERO_LIGNE <= 50

EDITER INFOS_CLIENTS

NUMERO_LIGNE = NUMERO_LIGNE + 1

LIRE_AVANT CLIENT

REFAIRE

↑ Haut de page