0

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

4

1 に答える 1

4

はい、可能です。

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

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

CICS ENQUEUEおよびDEQUEUEコマンドを使用して、一時データ・キューへのシリアル・アクセスを保証する責任があります。

JOBカードには、ユーザーIDとパスワードが含まれている必要があります。これにより、JOBは、CICS領域のユーザーIDではなく、アカウントで実行されます。

もう1つのオプションは、CICSSPOOLOPENコマンドです。

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

この情報はCICSwikiで見つかりました。

于 2010-06-17T08:39:56.230 に答える