すべてのプログラムは少なくともステータスとメッセージを返します。ステータスは文字列値またはi5/OS APIの理由コードになります。
- OK
- ERROR
- FATAL
- NOMSG
- CPF9801 - オブジェクトが見つからない
などがあります。
JSMDQGET - メッセージを取得する
パラメータ | 記述 | I/O | タイプ | 長さ | 小数点の位置 |
|---|---|---|---|---|---|
JSMQLIB | ライブラリ | I | CHAR | 10 | |
JSMQNME | 待ち行列 | I | CHAR | 10 | |
JSMQKEY | キー - キーなしのデータ待ち行列の場合、ブランクのキー値を使用する | I | CHAR | 256 | |
JSMWAIT | 待ち時間(ミリ秒、直近の秒数に丸められる) | I | DEC | 8 | 0 |
JSMSTS | 状態 | O | CHAR | 20 | |
JSMMSG | メッセージ | O | CHAR | 256 |
例
CHANGE FIELD(#JSMQLIB) TO(MYLIB)CHANGE FIELD(#JSMQNME) TO(MYQUEUE)CHANGE FIELD(#JSMQKEY) TO(*BLANK) CALL PGM(JSMDQGET) PARM(#JSMQLIB #JSMQNME #JSMQKEY #JSMWAIT #JSMSTS #JSMMSG) NUM_LEN(*DEFINED)
JSMDQPUT - メッセージを入れる
パラメータ | 記述 | I/O | タイプ | 長さ | 小数点の位置 |
|---|---|---|---|---|---|
JSMQLIB | ライブラリ | I | CHAR | 10 | |
JSMQNME | 待ち行列 | I | CHAR | 10 | |
JSMQKEY | キー - キーなしのデータ待ち行列の場合、ブランクのキー値を使用する | I | CHAR | 256 | |
JSMSTS | 状態 | O | CHAR | 20 | |
JSMMSG | メッセージ | O | CHAR | 256 |
例
CALL PGM(JSMDQPUT) PARM(#JSMQLIB #JSMQNME #JSMQKEY #JSMSTS #JSMMSG)