Mainframe batch Job Triggering

Question

Sono nuovo di CICS. Ho una domanda, possiamo innescare lavoro batch approfondita delle transazioni CICS? Voglio innescare un processo batch attraverso il programma che viene eseguito per transazione CICS, è possibile?

Answer 1

Si, è possibile.

I tuoi programmatori di sistema devono impostare una coda di dati di partizione transitoria in più cui dichiarazione DD si punta verso il lettore JES interno.

Devi scrivere il JCL per la coda di dati transitoria, tra cui l'ultimo // carta.

L'utente è responsabile per garantire l'accesso seriale alla coda di dati transitoria con comandi CICS enqueue e DEQUEUE.

La scheda di lavoro deve contenere un'userid e una password, in modo che le corse LAVORO sotto il vostro account e non l'ID utente della regione CICS.

Un'altra opzione è il comando CICS SPOOLOPEN.

Ecco un po 'di codice Cobol che utilizza il comando SPOOLOPEN.

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

Ho trovato queste informazioni in un CICS wiki .