RED CICS Project

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

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

Sample Projects for Substation ES RED interface on CICS

The following table describes the sample projects available for TIBCO ActiveMatrix BusinessWorks using RED interface 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
RED-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
RED-DPL-COBOL (Recipe) CICS

SXCCI001

COBOL

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

XT32,R,1,,RED-TRG-BYTES

TRIGGER-BYTES (Trigger) CICS Transaction

XT32 or XTC2

Listener RED CICS MAP Messages - Queue
  1. Listens to the EMS queue tibss.trigger for MAP messages
  2. Sent by Substation ES Trigger RED-TRG-FLDS using CICS transaction XTC2 or XT32

XT32,R,1,,RED-TRG-FLDS

RED-TRG-FLDS (Trigger) CICS Transaction

XT32 or XTC2

Listener RED CICS Text Messages - Queue
  1. Listens to the EMS queue tibss.trigger for TEXT messages
  2. Sent by Substation ES Trigger RED-TRG-TEXT using CICS transaction XTC2 or XT32

XT32,R,1,,RED-TRG-TEXT

RED-TRG-TEXT (Trigger) CICS Transaction

XT32 or

XTC2

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 RED CICS Request-Reply Process
  1. Listens to the EMS queue tibss.RED.RR.trigger.Request for a MAP message
  2. Sent by Substation ES trigger RED-RR-REQUEST using CICS transaction XTR3
  3. The ActiveMatrix BusinessWorks process sends back a reply MAP message to tibss.RED.RR.Reply
  4. Substation ES recipe RED-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)

RED-RR-ANSWER (Recipe)

CICS

Transaction

XTR3

Substation HeartBeat Event Consumer
Listens to the EMS topic tibss.heartbeat for a Substation ES heartbeat TEXT message. HEARTBEAT (Trigger) Substation

Internal