> Tech > Convertir un rapport AS/400 en Excel

Convertir un rapport AS/400 en Excel

Tech - Par Renaud ROSSET - Publié le 24 juin 2010
email

Il est souvent nécessaire de distribuer les rapports AS/400 par courrier électronique afin que les destinataires puissent le convertir en un fichier Excel pour analyser les nombres. Voici un moyen rapide de procéder. Il faut d'abord créer un fichier physique avec un champ, comme dans cet exemple DDS simple :

A..........T.Name++++++RLen++TDpB.
********** Beginning of data *****
A            R PCFILER
A            LINE         198O
************* End of data ********

Cet exemple crée un champ de données ouvert DBCS (Double-Byte Character Set) de 198 colonnes. Si votre système d’exploitation ne permet pas le double octet ou si le double octet n’est pas nécessaire dans l’application, on peut utiliser ‘198A’ à  la place.

Emettre la commande AS/400 CPYSPLF (Copy Spooled File) pour copier le fichier spoule dans le fichier physique que l’on vient de créer :

CPYSPLF FILE(SPLFNAME)
  TOFILE(*LIBL/PCFILE)
  MBROPT(*REPLACE)

On peut préciser d’autres paramètres (comme nom du job, utilisateur, numéro du job, numéro du fichier spoule) si plusieurs fichiers se trouvent dans la sortie du spooling.
Enfin, on émet la commande AS/400 CPYTOPCD (Copy To PC Document) pour copier le fichier physique sur le document PC dans le répertoire des dossiers AS/400 :

CPYTOPCD FROMFILE(PCFILE)
  TOFLR(MYFOLDER) TODOC(PCFILE.TXT)

Sur le PC, on peut associer un lecteur du réseau à  \\Hostname\ QDLS, où l’on trouvera le répertoire du dossier AS/400. De là , on pourra rattacher le fichier à  un message de courrier électronique pour distribution, ou copier le fichier dans l’environnement PC pour travailler avec lui. A noter que bien que ce tip utilise les DLS (Document Library Services), on peut également utiliser l’IFS (integrated file system) AS/400.

Jaslyn Wang, analyste système sénior, Asie Pacifique
Monsanto Singapore Co. (Pte) Ltd.
Singapour

Téléchargez cette ressource

Guide de technologie 5G pour l’entreprise

Guide de technologie 5G pour l’entreprise

Le livre blanc "The Big Book of Enterprise 5G" vous fournit les informations stratégiques dont vous avez besoin pour prendre des décisions éclairées et préparer votre entreprise à prospérer dans l'ère de la 5G. Cradlepoint, part of Ericsson est le leader mondial des solutions de réseau sans fil 4G LTE et 5G fournies via le cloud. Connectez vos employés, lieux et objets avec la 4G LTE et la 5G pour un WAN sans fil d'entreprise.

Tech - Par Renaud ROSSET - Publié le 24 juin 2010