ADELIA |
VADELIA |
SADELIA |
WADELIA |
EADELIA |
(I/B) |
(I/B) (S) |
(B) (S) |
(I/B) (S) |
(B) (S) |
Paragraphe d'utilisation
Tous
Syntaxe
POSITIONNER_AV NomVue
Description
Cet ordre positionne le fichier associé à la vue NomVue DEVANT l'enregistrement ayant une clé PLUS GRANDE ou EGALE à la clé précisée dans les variables constituant la clé de la vue.
A cet instant, l'enregistrement n'est pas lu. La lecture est à la charge de l'utilisateur.
Il est possible de tester le succès du positionnement en utilisant les ordres EXISTE ou N_EXISTE_PAS.
EXISTE est indiqué si un enregistrement qui a une clé correspondant aux zones clés de la vue a été trouvé.
Par exemple
Le fichier VENTES a pour clés : code client et numéro de ligne.
La vue VENTES est utilisée avec W_CODE_CLIENT seulement comme clé d'accès.
CODE_CLI_VTES |
NUM_LIGNE_VTES |
0002 |
01 |
0002 |
02 |
0002 |
03 |
0002 |
04 |
0006 |
01 |
0006 |
02 |
0011 |
01 |
W_CODE_CLIENT = '0006'
POSITIONNER_AV VENTES
* Le pointeur sera positionné avant l'enregistrement client 0006, ligne 01
*
SI VENTES EXISTE
LIRE_AVANT VENTES
* lecture de l'enregistrement client 0006, ligne 01
TANT_QUE VENTES EXISTE
IMPRIMER DETAIL_VENTES
LIRE_SUIVANT VENTES
* tous les enregistrements du client 0006 seront lus
REFAIRE
SINON
EDITER FMT_ZERO_VENTE
FIN
*
* si W_CODE_CLIENT = '0003' ou '0004' ou '0005', le résultat est identique
* si W_CODE_CLIENT < '0003', le pointeur est avant le premier enregistrement
* si W_CODE_CLIENT > '0011', le pointeur est après le dernier enregistrement