ADELIA |
VADELIA |
SADELIA |
WADELIA |
EADELIA |
(I/B) |
(I/B) (C/S) |
(B) (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, et ne peut pas être utilisé sur un index.
Paragraphe d'utilisation
Tous
Syntaxe
LIRE_P_ELT NomListe
LIRE_P_ELT NomIndex
Description
Lorsque cet ordre s'applique sur une liste, il lit le premier élément de la liste NomListe et affecte les valeurs aux variables qui la composent.
Après l'exécution de cet ordre, l'élément courant est l'élément lu.
Lorsque cet ordre s'applique à un index, il lit le premier élément de l'index NomIndex supérieur ou égal aux critères d'accès de l'index, et affecte les valeurs de l'élément correspondant de la liste associée à l'index aux variables qui la composent. Les valeurs des zones d'accès doivent donc être fixées avant l'utilisation de cet ordre. Si un élément est lu, il devient l'élément courant de l'index et de la liste associée à l'index.
Cette utilisation n'est pas compatible avec les programmes de type ADELIA.
La fonction prédéfinie &CODE_LST (sur la liste dans le cas d'une liste ou sur l'index dans le cas d'un index) permet de savoir si la lecture a abouti.
Voici les différentes valeurs :
Valeur |
|
*NON_TROUVE |
La lecture n'a pas trouvé d'élément. |
*NORMAL |
La lecture a abouti. |
Par exemple
* Lecture du premier élément de la liste mémoire LSTCLI
LIRE_P_ELT LSTCLI
* Lecture du premier élément de la liste graphique LST_ASSURES (programme VADELIA ou WADELIA)
LIRE_P_ELT LST_ASSURES:LISTE
* Lecture sur un index
LISTE MaListe Zone1 Zone2
INDEX_LISTE MonIndex MaListe Zone1
/* La liste contient 4 éléments avec les valeurs suivantes pour Zone1: 10, 2, 5, et 7
Zone1 = 4
LIRE_P_ELT MonIndex
* Lira l'élément de la liste avec Zone1 égal à 5 car c'est le premier élément supérieur ou égal à 4
Zone1 = 11
LIRE_P_ELT MonIndex
* La lecture n'aboutit pas (&CODE_LST rendra *NON_TROUVE)