Making calls from a cics client program – Oracle Audio Technologies Oracle Tuxedo User Manual
Oracle Tuxedo Mainframe Adapter for TCP - CICS User Guide
Making Calls from a CICS Client Program
To make a service call from a CICS program to a remote Oracle Tuxedo domain, make an
call to the Pre-requester. The service you want to access must be configured by the
Oracle TMA Administrator, but from a programming point of view the
call is all you need.
The following COBOL record is in the COBOL copybook
Listing 5-1 COBOL Record
10 DATALEN PIC S9(08) COMP.
10 SVCNAME PIC X(16).
10 REQUESTCD PIC S9(08) COMP.
10 RETURNCD PIC S9(08) COMP.
10 REQRETURNCD PIC S9(08) COMP.
10 DATA-AREA PIC X(DATALEN).
The layout of the structure in C that must be passed in the
call is shown in
following C structures are in the
Listing 5-2 C Structures
typedef struct CLIENTHDR
long DataLen; /* THE LEN OF THE DATA FROM AND TO APPL */
char SvcName; /* THE SERVICE NAME */
long RequestCd; /* THE REQUEST COMMAND FROM THE APPL */
long ReturnCd; /* THE RETURN CODE TO THE APPL */
long ReqReturnCd; /* THE RETURN CODE FROM THE PREQ AND REQ */
typedef struct CMAREA