메인 프레임 일괄 작업 트리거링

Question

CICS를 처음 사용했습니다. 하나의 쿼리가 있습니다. CICS 트랜잭션을 통해 배치 작업을 트리거 할 수 있습니까? CICS 트랜잭션에 의해 실행되는 프로그램을 통해 배치 작업을 트리거하고 싶습니다. 가능합니까?

Answer 1

예, 가능합니다.

시스템 프로그래머는 DD 문이 내부 JES 판독기를 가리키는 추가 파티션 임시 데이터 대기열을 설정해야합니다.

마지막 // 카드를 포함하여 일시적인 데이터 대기열에 JCL을 작성해야합니다.

CICS ENQUEUE 및 DEQUEUE 명령을 사용하여 일시적인 데이터 대기열에 대한 직렬 액세스를 보장해야합니다.

JOB 카드에는 사용자 ID와 암호가 있어야하므로 JOB은 사용자 계정에서 실행되며 CICS region의 사용자 ID에서는 실행되지 않습니다.

또 다른 옵션은 CICS SPOOLOPEN 명령입니다.

다음은 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 

이 정보는 CICS wiki에 있습니다.