CICS Project

You can use sample projects available for TIBCO ActiveMatrix BusinessWorks on CICS. To use the CICS Project sample programs, you must set these global variables:

Global Variable Setting
JmsProviderUrl The URL of EMS Server
JmsUserid The User ID to access EMS Server
JmsPassword The password associated with the EMS Server user ID

TIBCO ActiveMatrix BusinessWorks Sample Projects for Substation ES on CICS

The following table describes the sample projects available for TIBCO ActiveMatrix BusinessWorks on CICS:

Description Service Name Program
Call CICS Pgm SXC3I001 - Bytes - Queue
  1. Sends a message to the queue.
  2. Receives a Bytes message response on replyProcessId.

DPL-BYTES

(Recipe)

CICS

SXC3I001

C

Call CICS Pgm SXC3I001 - MAP - Queue
  1. Sends a MAP message to the queue tibss.CICS.C.Request.
  2. Receives a MAP message response on SXCCI001ProcessId.

SXC-DPL-C

(Recipe)

CICS

SXC3I001

C

Call CICS Pgm SXCCI001 - MAP - Queue
  1. Sends a MAP message to the queue tibss.CICS.Cobol.Request.
  2. Receives a MAP message response on SXCCI001ProcessId.

SXC-DPL-COBOL

(Recipce)

CICS

SXCCI001

COBOL

Listener CICS Bytes Messages - Queue
  1. Listens to the EMS queue tibss.trigger for BYTES messages.
  2. Sent by Substation ES using CICS transaction SXTF or SXT6

    SXTF,R,1,,TRIGGER-BYTES

TRIGGER-BYTES

(Trigger)

CICS

Transaction

SXTF or SXT6

Listener CICS MAP Messages - Queue
  1. Listens to the EMS queue tibss.trigger for MAP messages.
  2. Sent by Substation ES Trigger TRIGGER-FLDS using CICS transaction SXTF or SXT6

    SXTF,R,1,, TRIGGER-FLDS

TRIGGER-FLDS

(Trigger)

CICS

Transaction

SXTF or SXT6

Listener CICS Text Messages - Queue
  1. Listens to the EMS queue tibss.trigger for TEXT messages.
  2. Sent by Substation ES Trigger TRIGGER-TEXT using CICS transaction SXTF or SXT6

    SXTF,R,1,, TRIGGER-TEXT

TRIGGER-TEXT

(Trigger)

CICS

Transaction

SXTF or SXT6

Listener for Substation Errors
  1. Listens to the EMS queue tibss.error.out for MAP Substation ES error messages.
  2. Sent by Substation ES error processing.

Substation Internal

Substation Internal
Listener for CICS Request-Reply Process
  1. Listens to the EMS queue tibss.CICS.RR.trigger.Request for a MAP message.
  2. Sent by Substation ES trigger CICS-RR-REQUEST using CICS transaction SXRC or SXR3.
  3. The process sends back a reply MAP message to tibss.CICS.RR.Reply.
  4. Substation ES recipe SXC-RR-ANSWER reads the reply MAP message and forwards it to the CICS program SXC3REPLY, which forwards the reply to the business application.

To start the test, use CICS transaction SXR3 or SXRC.

CICS-RR-REQUEST

(Trigger)

SXC-RR-ANSWER

(Recipe)

CICS

Transaction

SXR3 or SXRC

Substation HeartBeat event consumer

Listens to the EMS topic tibss.heartbeat for a Substation ES heartbeat TEXT message.

HEARTBEAT

(Trigger)

Substation Internal