($title_img_alt)

こちらからの投稿は、先頭に表示されているコメントへの返信になります。
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))    

お名前

パスワード

メールアドレス

タイトル

ホームページ

アドレス

項目