Dans une macro commande ARCAD, il est possible d’appeler un programme, mais surtout de gérer les paramètres retour.
1) Déclarer la variable dans la macro.
CHGSBSVAR SBSVAR(Z1) VALUE(‘ ‘)
2) appeler le programme
CALL PGM(TEST01) PARM(‘&UP’ ‘&VR’ )
3) contrôler le code retour
CHKSBSVAR COND((*IF ‘&Z1’ *EQ ‘Y’)) THEN(GOTOSTEP STEP(BKEND))
4) le programme TEST01 doit être implémenté comme suit :
PGM PARM(&USER &VERSION )
…
Traitement ….
Dans le programme, ajouter la ligne suivante, pour mettre à jour la variable d’application.
CHGSBSVAR SBSVAR(ZF) VALUE(‘Y’)
Pour mémoire, les macro-commandes sont des scripts IBM i destinés à paramétrer et personnaliser les applications de GCL de l’éditeur Arcadsoftware.