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