Page History
[ |../../index.htm#lansa/exec_os400_e.htm]
現在地:
...
7.56.3 EXEC_OS400 の使用例
例1:プログラムQCMDEXCから実行可能なIBM 例1:プログラムQCMDEXCから実行可能なIBM i オペレーティング・システム・コマンドを実行し、コマンドが無効かエラーを含んでいても異常終了しないRDMLプログラムを作成します。
DEFINE FIELD
| Code Block |
|---|
DEFINE FIELD(#CMD) |
...
TYPE(*CHAR) |
...
LENGTH(200) L1: |
...
REQUEST FIELDS(#CMD) |
...
EXEC_OS400 COMMAND(#CMD) |
...
IF_ERROR(L1) |
...
GOTO LABEL(L1) |
...