メインフレームバッチジョブトリガー

Question

私はCICSが初めてです。クエリが1つありますが、バッチジョブ徹底的なCICSトランザクションをトリガーできますか？ CICSトランザクションによって実行されるプログラムを通じてバッチジョブをトリガーしたいのですが、可能ですか？

Answer 1

はい、それは可能です。

システムプログラマーは、DDステートメントが内部JESリーダーを指している追加のパーティション過渡データキューを設定する必要があります。

JCLを最後の//カードを含む一時的なデータキューに書き込む必要があります。

お客様は、CICS EnqueueおよびDequeueコマンドを使用して、過渡データキューへのシリアルアクセスを保証する責任があります。

ジョブカードには、CICSリージョンのユーザーIDではなく、アカウントの下でジョブが実行されるように、ユーザーIDとパスワードを含める必要があります。

別のオプションは、CICS Spoolopenコマンドです。

Spoolopenコマンドを使用するCOBOLコードは次のとおりです。

EXEC CICS SPOOLOPEN OUTPUT
          NODE ('LOCAL')
          USERID ('INTRDR')
          RESP(RETCODE)RESP2(RESP2)
          TOKEN(TOKEN)
END-EXEC

PERFORM VARYING JCL-IND FROM +1 BY +1
  UNTIL RETCODE NOT = DFHRESP(NORMAL)
     OR JCL-IND > jcl-ind-max
  MOVE JCLELE (JCL-IND)     TO      JOBQUEUE
  EXEC CICS SPOOLWRITE
          FROM(JOBQUEUE)
          RESP(RETCODE) RESP2(RESP2)
          FLENGTH(OUTLEN)
          TOKEN(TOKEN)
  END-EXEC
END-PERFORM

EXEC CICS SPOOLCLOSE
          TOKEN(TOKEN)
          RESP(RETCODE) RESP2(RESP2)
END-EXEC

この情報をaで見つけました CICS wiki.