Results 1 to 1 of 1

Thread: HOW TO: Send an event from CICS on the Mainframe

  1. #1
    Adeeb Mass'ad is offline Support Manager
    Join Date
    Aug 2006
    Location
    Jaffa of Nazareth
    Posts
    169
    Rep Power
    14

    CICS Integration - HOW TO: Send an event from CICS on the Mainframe

    DESCRIPTION

    The placeEvent sample Adapter uses the 3GL API's of the TRANS3GL CICS transaction, to send an event to the specified event queue.

    The Adapter receives all of the properties of the target Event as input, processes them, and sends the event to the specified queue..

    SETTING UP THE SAMPLE

    1. The sample is attached to this article.

    1.1. Create a new Adapter in the Studio under the NAV binding:
    • Right-Click on the Adapters and choose New adapter...
    • Name the Adapter placeEvent.
    • Select the Cics type.
    • Click Finish to create the adapter.
    1.2. Import the Adapter definition in the attached file CICS_PLACEEVENT_DEF.XML. (Or Create it manully using the Studio)

    2. Compiling the transaction. The source is composed from the following two source files:
    • EVENTADP.C Adapter source code
    • # compile.jcl Script to compile CICS transactions
    In order to compile the adapter, move these files to your Mainframe using FTP, and modify the DSN (at the bottom) which specifies location of the source file, replace the value TEST.MYSAMPLES.SCRIPTS to the mentioned dataset.

    3. Define and install the transaction under CICS:

    Open a CICS session, typing 'L CICS' in the welcome screen.

    3.1. Define the transaction:

    CEDA DEF PROG(EVENTADP) G(ATY) L(C) DA(ANY) DE(PLACE EVENTS ADAPTER)
    3.2. Install the transaction:

    CEDA IN PROG(EVENTADP) G(ATY)
    3.3. Define a new copy of the transaction:

    This is relevant when doing any modifications to the transaction, and recompiling it.

    CEMT IN PROG(EVENTADP)
    Place the cursor between the 'PRI' and 'CED' properties and type 'N', which means new. If operation was successful you should see the message "RESPONSE:NORMAL" at the bottom of the screen.

    4. Creating a sample EventQueue:

    4.1. Use the Studio to create the same EventQueue as follows:
    • Right-Click Adapters under the NAV binding and choose New Adapter...
    • Name the adapter as account, and choose the type as Database (even though it's not important here, we are interested in the event Queue)
    • Check the “Create event queue for the adapter“.
    • Click Finish.
    4.2. Import the Adapter definition in the attached Acqueue.xml file (or create it manully using the Studio).

    5. Refresh the daemon to update it with all the new changes.

    RUNNING THE SAMPLE
    • Run the acxDemo from the PC.
    • Provide the following properties:

    Server = machine
    Adapter= placeEvent
    Interaction= placeEventInteraction

    Input XML = Load the attached SampleInput.XML.
    PLACE_EVENT attributes explained:

    MACHINE = IP:Port of the machine where the event queue was defined.
    WORKSPACE = The workspace of the event.
    EVENTQUEUE = The name of EventQueue adapter.
    EVENTNAME = The name of the event.
    XMLINPUT = Event to send (should be valid xml).
    Last edited by Adeeb Mass'ad; 09-15-2006 at 08:58 AM.
    To Find Out more About Attunity Technology:
    Attunity
    or:
    Contact Us

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •