> Tech > Afficher un répertoire

Afficher un répertoire

Tech - Par iTPro - Publié le 24 juin 2010
email

Le programme DSPDIR (figure 1) affiche le contenu d'un répertoire. DSPDIR s'attend à  un paramètre de 50 caractères qui contient le nom du répertoire et utilise le code op RPG DSPLY pour afficher son contenu. Le programme DSPDIR est élémentaire et il faut combler le paramètre avec des blancs à 

Afficher un répertoire

droite jusqu’à  une longueur
de 50 caractères ou plus pour que le
programme fonctionne.
Le programme démarre avec des
directives copy pour les membres copy
STDTYPH et STMIOH (en A, figure 1).
Toutes les directives copy dans cet article
supposent que les membres copy
se trouvent dans un fichier source appelé
ITOOLKITH (vous devez changer
ce nom pour l’adapter à  votre système).
Les cartes D (en B) définissent
les variables destinées à  contenir un
nom de dossier, un handle de fichier et
un nom de chemin.
Les cartes C (en C) définissent le
paramètre dossier pour le programme.
En D, la logique du programme démarre
en utilisant openStreamDir pour
ouvrir le répertoire. Les entrées du répertoire sont lues par
nextStream DirEntry et transférées dans la structure de données
streamDirEntry définie en STMIOH puis affichées (en
E). Les entrées du répertoire sont similaires à  celles que renvoient
les commandes du PC : la première entrée contient un
point (.), la deuxième a deux points (..) et les entrées suivantes
contiennent le contenu du répertoire. Finalement, le
programme utilise closeStreamDir pour fermer le répertoire
(en F).
Dans le membre copy STMIOH, la structure de données
streamDir Entry définit uniquement la longueur et le chemin
d’une entrée. Pour extraire des informations à  propos d’une
entrée, on peut utiliser le prototype getStreamInfo dans le
membre copy:

if getStreamInfo(
   %trim( folder ) + '/' +
   %subst( streamDirEntry.path: 1 ;
      streamDirEntry.len ):
   streamInfo ) <> streamError;
   ...
endif;

La structure de données streamInfo inclut le type d’entrée
: *DIR, *STMF, ou un type d’objet iSeries. A noter
que les heures définies dans la structure de données contiennent
des dates représentant le nombre de secondes depuis
le 1er janvier 1970.

Téléchargez gratuitement cette ressource

Guide de Services Cloud Managés

Guide de Services Cloud Managés

Accélérer votre transformation digitale, protéger et sécuriser vos environnements Cloud avec les offres de support, d'accompagnement et de services managés. Découvrez le TOP 3 des Services Managés pour accompagner la transformation de vos environnements Cloud, gagner en agilité et en sécurité dans un monde d'incertitudes.

Tech - Par iTPro - Publié le 24 juin 2010