新規投稿 記事一覧 ホーム
●ご利用方法,ご利用に際しての規約はこちらをお読みください。
こちらからの投稿は、先頭に表示されているコメントへの返信になります。
RE:バッチ印刷ジョブのJOBNO取得について IKD さん [ 3月28日(月) 10時20分 ]

    ご指摘のように同じユーザー・プロフィールに複数の
    JOB番号が発生してしまうのは OS の障害であり
    どちらかを削除すればよいのですが方法はまだ
    特定できていません。

    しかしご利用中の i5/OS が V5R2M0 以上であれば
    API: QSPRILSP ( Retrieve Identify of Last Spool File Created )
    というAPI が公開されていますので、これを利用することができます。

    [例]
     CHGVAR     VAR(%BIN(&RCVLEN)) VALUE(128)         
     CALL       PGM(QSPRILSP) PARM(&RCVDTA &RCVLEN +  
                  'SPRL0100' &APIERR)                 
     CHGVAR     VAR(&JOBNBR) VALUE(%SST(&RCVDTA 39 6))

    [参考]
    実際に弊社製品では OS を判断してし上記の QSPRILSP を利用しています。
    最新の CLP : PRTJOBNO を下記に配置致しましたので
    ご参照ください。

    http://218.44.135.18/QSYS.LIB/PGMRLIB.LIB/QCLSRC.FILE/PRTJOBNO.MBR

お名前
パスワード
e-mailアドレス
タイトル
ホームページ
アドレス