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 gratuitement cette ressource

Sécurité Office 365 : 5 erreurs à ne pas commettre
A l’heure où les données des solutions Microsoft de Digital Workplace sont devenues indispensables au bon fonctionnement de l’entreprise, êtes-vous certain de pouvoir compter sur votre plan de sécurité des données et de sauvegarde des identités Microsoft 365, Exchange et Teams ? Découvrez les 5 erreurs à ne pas commettre et les bonnes pratiques recommandées par les Experts DIB France.
Les articles les plus consultés
Les plus consultés sur iTPro.fr
- Plateforme de protection applicative : le couteau suisse indispensable pour les développeurs et les équipes de sécurité
- Cohésion d’équipe & Collaboration numérique : un duo gagnant ?
- Cyber espionnage – Les pirates russes APT29 utilisent les services de stockage en ligne, DropBox et Google Drive
- SEKOIA : de l’intelligence sur les menaces jusqu’à l’automatisation de la réponse !
- Les managers face à l’impact du télétravail
