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
État des lieux de la sécurité cloud-native
L’État des lieux de la sécurité cloud-native vous offre une analyse complète des problématiques, des tendances et des priorités qui sous-tendent les pratiques de sécurité cloud-native dans le monde entier. Une lecture indispensable pour renforcer votre stratégie de sécurité dans le cloud. Une mine d’infos exclusives pour élaborer votre stratégie de sécurité cloud-native.
Les articles les plus consultés
Les plus consultés sur iTPro.fr
- Les risques liés à l’essor fulgurant de l’IA générative
- Pourquoi est-il temps de repenser la gestion des vulnérabilités ?
- Reporting RSE : un levier d’innovation !
- De la 5G à la 6G : la France se positionne pour dominer les réseaux du futur
- Datanexions, acteur clé de la transformation numérique data-centric
