($title_img_alt)

こちらからの投稿は、先頭に表示されているコメントへの返信になります。
RE:WRKJOGQ まめたろぅ さん [ 12月28日(木) 12時50分 ]
> CHGVAR     VAR(%SST(&RCVV 48 4)) VALUE(&JQCNT)

この場合には、%BIN 関数が有効です。
下記のように指定すればよいでしょうか。
CHGVAR VAR(%BIN(&JQCNT)) VALUE(%SST(&RCVV 48 4))

あと、APIからの戻り変数 &RCVV の各項目の位置は
OFFSETだったので、「48バイト目から4バイト」ではなく
「49バイト目から4バイト」かも知れません。
上記のCHGVARを試してうまく値が取得できなければ
CHGVAR VAR(%BIN(&JQCNT)) VALUE(%SST(&RCVV 49 4))
も試してみて下さい。

もう少しで実現できそうですね。
RE:WRKJOGQ KDM さん [ 12月28日(木) 16時51分 ]
まめたろぅ 様 無事できました!
ありがとうございました!
1コマンドではだめで一旦SSTしたものを*DECにCHGVARしたら取れました。
またおっしゃるとおり49から4バイトでした。

DCL        VAR(&RCVV) TYPE(*CHAR) LEN(200)
DCL        VAR(&JQCNT) TYPE(*CHAR) LEN(04) 
DCL        VAR(&JQCNT2) TYPE(*DEC) LEN(10) 

CALL       PGM(QSPRJOBQ) PARM(&RCVV &SIZE &FNAME &JFNAME &ERRCD)
CHGVAR     VAR(&JQCNT) VALUE(%SST(&RCVV 49 4)) 
CHGVAR     VAR(&JQCNT2) VALUE(%BIN(&JQCNT))    

お名前

パスワード

メールアドレス

タイトル

ホームページ

アドレス

項目