This document covers the following topics:
For using the Broker stubs with Natural in a batch or CICS
environment, the stub module BKIMBTSO
or CICSETB
respectively is loaded dynamically. The Broker stubs require the IBM Language
Environment runtime library to be installed.
Add the EntireX load library
(EXXvrs.LOAD) to your
STEPLIB
concatenation when running the Natural RPC server.
Start the Natural RPC server with the following profile parameters:
RCA=(BROKER),RCALIAS=(BROKER,BKIMBTSO)
For example:
//STEP EXEC PGM=NATBATvs,PARM=('RCA=(BROKER),RCALIAS=(BROKER,BKIMBTSO)')
This will dynamically load BKIMBTSO
and each
Broker call will use this stub. Loading the broker stub BKIMBTSO
dynamically will work even if NATETB23
has already been statically
linked to Natural. You do not need to link the Broker stub
BKIMBTSO
statically to Natural.
Add the following definition to the CICS CSD cluster:
* ------------------------------------------------------------------ * * CSD Definition for Broker Stubs * ------------------------------------------------------------------ * DEFINE PROGRAM(CICSETB) GROUP(EXX) DESCRIPTION(CICS NETWORK BROKER STUB) LANGUAGE(ASSEMBLER) DEFINE PROGRAM(CICSETB2) GROUP(EXX) DESCRIPTION(CICS TCP BROKER STUB) LANGUAGE(LE370) DEFINE PROGRAM(EXAGLUE) GROUP(EXX) DESCRIPTION(CICS GLUE PGM FOR TCP STUB) LANGUAGE(LE370) DEFINE PROGRAM(EXAMEM) GROUP(EXX) DESCRIPTION(CICS STUB SESSION HANDLER) LANGUAGE(ASSEMBLER)
Add the EntireX load library
(EXXvrs.LOAD) to both the
DFHRPL
chain and the STEPLIB
chain of the CICS
started tasks JCL.
Start the Natural RPC server task with the following profile parameters:
RCA=(BROKER),RCALIAS=(BROKER,CICSETB)
For example:
N426 RCA=(BROKER),RCALIAS=(BROKER,CICSETB)
This will dynamically load CICSETB
and each
Broker call will use this stub.
For using the Broker stubs with Natural in a batch or CICS
environment, the stub module BKIMB
or BKIMC
respectively is loaded dynamically. The Broker stubs require the IBM Language
Environment to be installed.
Include the EntireX sublibrary
(EXXvrs) into the
LIBDEF
search chain when running the Natural RPC server.
Start the Natural RPC server with the following profile parameters:
RCA=(BROKER),RCALIAS=(BROKER,BKIMB)
To enable CICS to find the various programs, include the
EntireX sublibrary (EXXvrs)
into the CICS LIBDEF
search chain and add following definitions to
your CICS CSD file:
DEFINE PROGRAM(BKIMC) GROUP(EXX) DESCRIPTION(ENTIREX BROKER STUB INTERFACE) LANGUAGE(ASSEMBLER) DEFINE PROGRAM(BROKERC) GROUP(EXX) DESCRIPTION(ENTIREX BROKER STUB) LANGUAGE(C)
Start the Natural RPC server with the following profile parameters:
RCA=(BROKER),RCALIAS=(BROKER,BKIMC)
For example:
N426 RCA=(BROKER),RCALIAS=(BROKER,BKIMC)
This will dynamically load BKIMC
and each
Broker call will use this stub.
For using the Broker stubs with Natural in a batch or TIAM
environment, the stub module BROKER
is loaded dynamically.
Add the following assignments to the Natural startup procedure:
/ADD-FILE-LINK LINK-NAME=BLSLIB00,FILE-NAME=<EXXvrs.LIB> /ADD-FILE-LINK LINK-NAME=ETBLIB,FILE-NAME=<EXXvrs.LIB>
Start the Natural RPC server with the following profile parameters:
RCA=(BROKER),RCALIAS=(BROKER,BROKER)
Log on to the Natural library SYSRPC
and enter
MENU
.
Invoke Service Directory Maintenance
(SM
) from the main menu.
Define the node and server, and save your changes.
Invoke Server Command Execution
(XC
) from the main menu for the node and server
defined in the previous step.
Ping the server with the command
PI
.
Your environment and the Broker stub are installed correctly if you receive one of the following:
An answer from the RPC server.
00070007 Service not registered
,
meaning that the broker is up but the RPC server is down.
02150148 Connection error
, meaning
that the broker and the RPC server are down.