Le programme exemple EXPMBR0001 utilisent des programmes de services et des clauses COPY qui doivent êtres installés. Ils sont décrits dans cet article :
Indique MYBIB comme bibliothèque par défaut (le répertoire de liage MYBNDDIR est normalement dedans, si vous avez installé les programmes de services).
Copie du source QRPGLESRC_RPGLE_EXPMBR0001.txt dans MYBIB/QRPGLESRC sous le nom EXPMBR0001 et le type RPGLE.
Compilation via la commande CRTBNDRPG PGM(MYBIB/EXPMBR0001) SRCFILE(MYBIB/QRPGLESRC) SRCMBR(EXPMBR0001) DBGVIEW(*SOURCE) OUTPUT(*PRINT) REPLACE(*YES)
Utilisation
Lancez le prgramme test avec un un fichier/bibliothèque/membre qui n’existe pas via la commande : CALL PGM(EXPMBR0001) PARM(‘QRPGLESRC’ ‘MYBIB’ ‘EXISTEPAS’) pour déclencher l’affichage d’une erreur.