Traitement principal (Figure 2)
Si la zone de positionnement est remplie, le programme ajuste
le fichier à substituer.
Les indicateurs de couleur variant de
1 à 6, la variable de retour Tri est utilisée
comme indice.
Ceux-ci sont initialisés à l'affichage
grâce aux SETOF dans le DSPF.
Pour le RPG,
Traitements

les champs TRI et
ORDRE du DSPF sont remplacés par les
champs I et J.
Le changement de couleur de plusieurs
colonnes en une seule ligne de
code programme! Qui dit mieux !
Le changement de tri ou de
positionnement, détecté par les indicateurs
10 et 11, déclenche le rechargement
du sous fichier.
Pour un positionnement, un sousprogramme
sera appelé pour régler un
message non monitorable (voir
contraintes positionnement).
Le rafraîchissement de la liste
(Figure 3)
Le rafraîchissement de la liste consiste à
recharger simplement le sous fichier.
Description du sous-programme
REFRESH:
- Fermeture du fichier lu antérieurement.
- Appel du programme CLP de tris et/ou
positionnement (sélection de la vue) :
SELTRI - Ouverture du fichier.
- Clear du sous fichier.
- Rechargement du sous fichier avec le
fichier substitué.
La fermeture et l’ouverture sont importantes
car elles permettent la prise en
compte de la substitution.
Spécificité langage :
Pour le COBOL il faut convertir la valeur
Tri et Ordre en alphanumérique.
La sélection des vues (Figure 4)
Ce programme substitue le fichier lu par
un fichier logique en adéquation avec le
tri demandé.
Il permet de changer de vues logiques
et éventuellement de se positionner
sur un critère donné.
Description du programme SELTRI :
- Suppression des overrides en cours.
- Substitution du fichier lu par un fichier logique.
Spécificité langage :
La déclaration des &Tri et &Ordre sont mis en *dec pour des facilités
d’appel depuis un RPG.
Les comparaisons sont numériques contrairement au COBOL.
Téléchargez gratuitement cette ressource

Guide de facturation électronique, voie royale pour le DAF et la digitalisation de la fonction finance
Ce livre blanc expose les problématiques auxquelles sont confrontés les DAF modernes et souligne les bénéfices de la facturation électronique pour la trésorerie. Il dévoile également le processus de déploiement de ce projet de transformation digitale que la réglementation rendra bientôt obligatoire.
Les articles les plus consultés
Les plus consultés sur iTPro.fr
- SEKOIA : de l’intelligence sur les menaces jusqu’à l’automatisation de la réponse !
- Les managers face à l’impact du télétravail
- A la découverte de Keda dans Kubernetes
- Cloud Computing dans le secteur bancaire – Comment mettre en œuvre les exigences de conformité ?
- Les nouveaux usages hybrides des DSI pour s’adapter aux nouvelles contraintes
