Historisation de commande

PGM
  SNDPGMMSG MSG(‘wrkactjob’) TOPGMQ(*SAME (QCMD)) MSGTYPE(*RQS)
  RCVMSG PGMQ(*SAME (QCMD)) MSGTYPE(*RQS) RMV(*NO)
ENDPGM

Après compilation. On lance le programme par

CALL HISTO

Lorsque que l’on fait F9, on obtient

WRKACTJOB

puis encore F9

CALL HISTO

Ceci peut-être pratique quand on gère par programme une ligne de commande. On commence
par l’historiser puis on la lance par une des 2 API QCMDEXC ou QCAPCMD. Pour récupérer
les dernières commandes lancées, utiliser l’API QMHRTVRQ.

A bientôt

Laurent

Print Friendly, PDF & Email