($title_img_alt)

こちらからの投稿は、先頭に表示されているコメントへの返信になります。
RE:WRKJOGQ まめたろぅ さん [ 12月27日(水) 16時19分 ]
補足します。
1の変数の中身は空っぽのまま　API　に渡せばいいです。
APIからの結果が1の144バイト分の変数に返ってきますので
その中の48バイト目から4バイト分を確認すればよいでしょう。
RE:WRKJOGQ KDM さん [ 12月27日(水) 17時41分 ]
まめたろぅさん様、ありがとうございます！
早速試してみます！
RE:WRKJOGQ KDM さん [ 12月27日(水) 20時58分 ]
まめたろぅ　さん様、144バイトの中身をデバッグで見たのですが、バイナリー部分は見えません。
当然ですよね。CHARの144でかえってきたもののバイナリー部分を取る方法を教えていただくことは
できませんでしょうか。
------------------------------------------------------------------
DCL　　　　　　　　VAR(&RCVV)　TYPE(*CHAR)　LEN(144)
DCL　　　　　　　　VAR(&JQCNT)　TYPE(*CHAR)　LEN(04)
：
CALL　　　　　　　PGM(QSPRJOBQ)　PARM(&RCVV　&SIZE　&FNAME　&JFNAME　&ERRCD)　
：
CHGVAR　　　　　VAR(%SST(&RCVV　48　4))　VALUE(&JQCNT)
------------------------------------------------------------------
JQCNTにそのままセットではだめなのかと…。

RE:WRKJOGQ HIROX さん [ 12月28日(木) 10時41分 ]
https://www.ibm.com/support/knowledgecenter/ja/ssw_ibm_i_61/cl/chgvar.htm

JOBQ0100　Format

The　following　table　shows　the　information　returned　for　the　JOBQ0100
format.　For　more　details　about　the　fields　in　the　following　table,　see
Field　Descriptions.
Offset　Type　Field
Dec　Hex
0　0　BINARY(4)　Bytes　returned
4　4　BINARY(4)　Bytes　available
8　8　CHAR(10)　Job　queue　name
18　12　CHAR(10)　Job　queue　library　name
28　1C　CHAR(10)　Operator　controlled
38　26　CHAR(10)　Authority　to　check
48　30　BINARY(4)　Number　of　jobs
52　34　CHAR(10)　Job　queue　status
62　3E　CHAR(10)　Subsystem　name
72　48　CHAR(50)　Text　description
122　7A　CHAR(10)　Subsystem　library　name
132　84　BINARY(4)　Sequence　number
136　88　BINARY(4)　Maximum　active
140　8C　BINARY(4)　Current　active

って書いてあるのだから、読めるように変数に入れてあげましょうよ。

お名前

パスワード

メールアドレス

タイトル

ホームページ

アドレス

項目