par Jef Sutherland - Mis en ligne le 19/01/2005 - Publié en Mars 2004
Ce court programme RPG montre combien il est facile d'ouvrir, de lire, d'écrire
et de fermer des fichiers sur l'IFS
Quand nous travaillons avec l'iSeries et son système de fichiers intégré (IFS, integrated
file system), qui nous permet d'intégrer facilement la plate-forme à d'autres
systèmes et qui héberge les fichiers et graphiques stream, reconnaissons que nous
sommes gâtés. Vous pouvez utiliser l'IFS comme un lecteur de réseau ou comme un
autre lecteur personnel pour vos fichiers PC. De plus, vous pouvez stocker des tableurs,
des lettres et des fichiers graphiques sur l'IFS aussi simplement que sur le
disque dur du PC ...Et, même si l'espace disque de l'iSeries n'est pas aussi bon marché
que les disques durs du PC, l'IFS offre un moyen commode, fiable et centralisé
de sauvegarder et de maintenir les fichiers PC.
Autre avantage de placer les données du PC sur l'IFS : vos programmes RPG peuvent
accéder aux fichiers. Dans cet article, nous allons voir comment utiliser un programme
RPG pour accéder à des fichiers texte ASCII stockés sur le système de fichiers
racine de l'IFS.
Accéder aux fichiers de données à partir de l’IFS en RPG
L’exemple suivant illustre combien
il est facile à vos programmes RPG
d’accéder aux fichiers IFS. Votre société
vend de l’équipement médical
par le canal d’un distributeur. Chaque
jour, vous fournissez à celui-ci des devis
avec des niveaux de stock. Le distributeur
envoie alors au service ventes
un courrier électronique auquel est
rattaché un fichier texte contenant les
numéros d’articles. Le service ventes
stocke le fichier texte dans l’IFS de la
manière suivante :
Fichier d’entrée: QUOTEIN.DAT
0038743
0038234
0143838
0373281
1848378
4382983
En tant que développeur, vous devez
créer un programme RPG qui lit le
fichier de données dans l’IFS et prépare
dans celui-ci un fichier de sortie
qui contient l’information de prix et de stock suivante :
Fichier de sortie: QUOTE OUT.CSV
0038743,1099.00,5
0038234,2217.00,6
0143838,3000.00,2
0373281,2500.00,8
1848378,1989.00,3
4382983,2300.00,1
Toutes les informations de prix et
de stock se trouvent dans DB2/400 sur
l’iSeries. Si le distributeur envoie plus
d’un fichier texte dans une même journée,
l’information est ajoutée au fichier
de sortie dans l’IFS. Le fichier de
sortie est ensuite renvoyé par courrier
électronique au distributeur en fin de
la journée. Pendant la nuit, le fichier de
sortie est enlevé de l’IFS.
Téléchargez cette ressource
Créer des agents dans Microsoft 365 Copilot
Insight vous guide dans l’utilisation de la nouvelle expérience de création d’agents dans Microsoft Copilot Studio, disponible dans Copilot Chat. Découvrez les étapes clés pour concevoir, configurer et déployer ces nouveaux agents et injecter la puissance de l’IA directement dans le flux de travail.
Les articles les plus consultés
Les plus consultés sur iTPro.fr
- Souveraineté et MLOps, une combinaison vertueuse
- Marché de l’emploi IT 2025 : un rebond attendu en 2026
- De Hawkins au Cloud hybride : l’évolution de la surface d’attaque depuis les années 80
- Menaces de sécurité des appareils IT/IoT
- L’IA industrielle redéfinit les modèles de l’industrie manufacturière
