STRPCCMDでURL実行

IBM i (AS400)からクエリーを実行したい場合、CLプログラムの「STRPCCMD」を使用してURL実行することでクエリーを実行することが可能です。

（例）3つのパラメーター（検索条件）があるクエリーを実行するCL

PGM PARM(&P@JGCD &P@TKCD &P@SBCD)

DCL VAR(&P@JGCD) TYPE(*CHAR) LEN(5)
DCL VAR(&P@TKCD) TYPE(*CHAR) LEN(2)
DCL VAR(&P@SBCD) TYPE(*CHAR) LEN(2)
DCL VAR(&URL)    TYPE(*CHAR) LEN(200)
DCL VAR(&EXE) TYPE(*CHAR) LEN(100) +
  VALUE('start http://IP/phpquery2/#call/+
  ユーザーID/パスワード/クエリーID/params/')

CHGVAR VAR(&URL) VALUE(&EXE *TCAT &P@JGCD)
CHGVAR VAR(&URL) VALUE(&URL *TCAT '^&')
CHGVAR VAR(&URL) VALUE(&URL *TCAT &P@TKCD)
CHGVAR VAR(&URL) VALUE(&URL *TCAT '^&')
CHGVAR VAR(&URL) VALUE(&URL *TCAT &P@SBCD)

STRPCO
MONMSG MSGID(IWS4010)

STRPCCMD PCCMD(&URL) PAUSE(*NO)

ENDPGM

※「*TCAT」を使用することでブランクを除去することが可能です

※検索条件が複数ある場合は、「^&」で区切ります

※URLの部分は大文字小文字を区別して記載する必要がございます。
　ユーザーID、パスワード、クエリーIDを大文字で登録している場合は大文字となります。
　エミュレータの小文字入力を可能にしたい