Pascal_Osthus-bugat_1753

Récupération du contenu d'un librairie AS400 par l'appel de PREP_PROCESS_FILENAME

Discussion created by Pascal_Osthus-bugat_1753 on Sep 30, 2016
L'appel de la fonction PREP_PROCESS_FILENAME dans un object de type SCRIPT peut servir à lister le contenu d'une librairie AS400.

Dans l'exemple évoqué ici plus bas le code suivant permet de récupérer le contenu de la librairie d'installation d'un Agent V11.2 sur un système AS400 V7R2. Ce code exécuté par un objet de type SCRIPT.


=================================================================================
:SET &HND# = PREP_PROCESS_FILENAME("AS4001","UC4V11/*","Y",,,,"UC_LOGIN=LOGIN.POB.1")
:PROCESS &HND#
:   SET &LINE# = GET_PROCESS_LINE(&HND#)
:   PRINT &LINE#
:ENDPROCESS
=================================================================================

Le Report d'une telle exécution fournira le contenu suivant:

===============================================================================
2016-09-29 17:22:44 - U00010039 'UC4V11/ENDUCAGENT'
2016-09-29 17:22:44 - U00010039 'UC4V11/IRSTRJOB'
2016-09-29 17:22:44 - U00010039 'UC4V11/MAKEMSL'
2016-09-29 17:22:44 - U00010039 'UC4V11/REMOTEIO'
2016-09-29 17:22:44 - U00010039 'UC4V11/STRUCAGENT'
2016-09-29 17:22:44 - U00010039 'UC4V11/UCEX_END'
2016-09-29 17:22:44 - U00010039 'UC4V11/UCEX_RUN'
2016-09-29 17:22:44 - U00010039 'UC4V11/UCXBO41C'
2016-09-29 17:22:44 - U00010039 'UC4V11/UCXJO41'
2016-09-29 17:22:44 - U00010039 'UC4V11/UCXJO41M'
2016-09-29 17:22:44 - U00010039 'UC4V11/COMPRESS'
2016-09-29 17:22:44 - U00010039 'UC4V11/GSS'
2016-09-29 17:22:44 - U00010039 'UC4V11/LIBCPPRNT'
2016-09-29 17:22:44 - U00010039 'UC4V11/DQ'
2016-09-29 17:22:44 - U00010039 'UC4V11/CLLE'
2016-09-29 17:22:44 - U00010039 'UC4V11/INI'
2016-09-29 17:22:44 - U00010039 'UC4V11/MSL'
2016-09-29 17:22:44 - U00010039 'UC4V11/TMP'
2016-09-29 17:22:44 - U00010039 'UC4V11/ENDUCAGENT'
2016-09-29 17:22:44 - U00010039 'UC4V11/GENUCMSL'
2016-09-29 17:22:44 - U00010039 'UC4V11/STRUCAGENT'
2016-09-29 17:22:44 - U00010039 'UC4V11/FT3C4IF'
2016-09-29 17:22:44 - U00010039 'UC4V11/FT3C4IG'
2016-09-29 17:22:44 - U00010039 'UC4V11/FT3C4IH'
2016-09-29 17:22:44 - U00010039 'UC4V11/FT3C4JC'
2016-09-29 17:22:44 - U00010039 'UC4V11/FT3C4JG'
2016-09-29 17:22:44 - U00010039 'UC4V11/FT3C4JH'
2016-09-29 17:22:44 - U00010039 'UC4V11/FT3C4JI'
2016-09-29 17:22:44 - U00010039 'UC4V11/FT3C4JJ'
2016-09-29 17:22:44 - U00010039 'UC4V11/FT3C4J8'
2016-09-29 17:22:44 - U00010039 'UC4V11/FT3C4K0'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4IF'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4IG'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4IH'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4JC'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4JE'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4JF'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4JG'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4JH'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4JI'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4JJ'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4JK'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4JM'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4JN'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4JO'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4J8'
2016-09-29 17:22:44 - U00010039 'UC4V11/O3C4K0'
===============================================================================

Un utilisateur avisé reconnaitra dans ce retour une similitude avec la commande STRPDM ==> Option 2.

irydvm2rould.png





Outcomes