社内でちょっとしたコマンドを作成している例はいくつかあるかも知れない。
処理プログラムのない簡単なコマンドは次のように作成できる。

CRTCMD        CMD(QGPL/DU)        PGM(QSYS/QCMDEXC)        SRCFILE(QTRSRC/QCMDSRC)

これでコマンド入力画面で DU と打鍵すれば WRKACTJOB が実行される。

0001.00              CMD        PROMPT(' 活動ジョブ表示 ')                     
0002.00              PARM       KWD(CMD) TYPE(*CHAR) LEN(9) CONSTANT(WRKACTJOB)
0003.00              PARM       KWD(LEN) TYPE(*DEC) LEN(15 5) CONSTANT(9)