Client and Server Examples for z/OS CICS

This document describes the examples provided for the COBOL Wrapper for z/OS CICS. All examples here can be found in the EntireX directory examples/RPC under UNIX and Windows. They are also available for z/OS, if this is installed. See Extracting the EntireX RPC Examples from their Container Data Set. This document covers the following topics:


Basic RPC Client Examples - CALC, SQUARE

CALC Client using DFHCOMMAREA

For CICS under operating system z/OS, the following CALC client is implemented with interface type "CICS with DFHCOMMAREA calling convention". See Client Interface Types for more information.

Name Type Data Set Description Notes
CALC1DFH CICS CSD EXP101.DCCO CSD Definition for RPC client CALC1CLT.  
CALC1IGY JCL EXP101.DCCO Job (JCL) to build the RPC client CALC1CLT. 2
CALC1MAP CICS Map EXP101.DCCO CICS Map definition for RPC client and CALC1CLT.  
CALC1 COBOL source code EXP101.DCCO Client interface object for IDL program CALC1, alias of CALC. 1
CALC1CLT COBOL source code EXP101.DCCO An RPC client application calling the remote procedure (RPC service) CALC. 3
CALC1MAP COBOL copybook EXP101.DICO Description of input and output fields of map CALC1MAP.  
CALC1 COBOL copybook EXP101.DICO Client interface object copybook for IDL program CALC1, alias of CALC. 1

Notes:

  1. Under z/OS, client interface objects are delivered with the installation; under UNIX and Windows, generate these objects with the EntireX Workbench.

  2. Adapt the JCL to your needs.

  3. Application

    1. built according to the client-side build instructions, see Using the COBOL Wrapper for CICS with DFHCOMMAREA Calling Convention (z/OS and z/VSE).

    2. associated with IDL file exampleWithPgmAlias.idl, delivered under UNIX and Windows in EntireX directory examples/RPC/CobolClient/zosCICS/DFHCOMMAREA.

    3. client interface object name CALC1 different from remote procedure name CALC (RPC service).

    4. CALC1CLT and client interface objects CALC1 installed as separate CICS programs.

For more information, refer to the readme file in EntireX directory examples/RPC/CobolClient/zosCICS/DFHCOMMAREA under UNIX or Windows.

CALC Client using Call Interface

For CICS under operating system z/OS, the following CALC client is implemented with interface type "CICS with standard linkage calling convention". See Client Interface Types for more information.

Name Type Data Set Description Notes
CALC COBOL source code EXP101.DCCO Client interface object for IDL program CALC. 1
CALCCLT COBOL source code EXP101.DCCO An RPC client application calling the remote procedure (RPC service) CALC. 2
CALCDFH CICS CSD EXP101.DCCO CSD Definition for RPC client CALCCLT.  
CALCIGY JCL EXP101.DCCO Job (JCL) to build the RPC client CALCCLT. 3
CALCMAP CICS Map EXP101.DCCO CICS Map definition for RPC client CALCCLT.  
CALC COBOL copybook EXP101.DICO Client interface object copybook for IDL program CALC. 1
CALCMAP COBOL copybook EXP101.DICO Description of input and output fields of map CALCMAP.  
COBSRVI COBOL source code EXP101.DICO Generic RPC service module for CICS with call interface. 4

Notes:

  1. Under z/OS, client interface objects are delivered with the installation; under UNIX and Windows, generate these objects with the EntireX Workbench.

  2. Application

    1. built according to the client-side build instructions, see Using the COBOL Wrapper for CICS with Call Interfaces (z/OS and z/VSE)

    2. associated with IDL file example.idl

    3. CALCCLT uses CICS Map definition CALCMAP

    4. CALCCLT and client interface object CALC are linked together

    5. CALCCLT installed as single CICS program

  3. Adapt the JCL to your needs.

  4. See Generate Generic RPC Service Module COBSRVI.

For more information, refer to the readme file in EntireX directory examples/RPC/CobolClient/zosCICS/Callinterface under UNIX or Windows.

SQUARE Client using DFHCOMMAREA

For CICS on operating system z/OS, the following SQUARE client is implemented with interface type "CICS with DFHCOMMAREA calling convention". See Client Interface Types for more information.

Name Type Data Set Description Notes
SQRE1DFH CICS CSD EXP101.DCCO CSD Definition for RPC client SQRE1CLT.  
SQREI1GY JCL EXP101.DCCO Job (JCL) to build the RPC client SQRE1CLT. 2
SQRE1MAP CICS Map EXP101.DCCO CICS Map definition for RPC clients SQRE1CLT.  
SQRE1 COBOL source code EXP101.DCCO Client interface object for IDL program SQRE1, alias of SQUARE. 1
SQRE1CLT COBOL source code EXP101.DCCO An RPC client application calling the remote procedure (RPC service) SQUARE. 3
SQRE1MAP COBOL copybook EXP101.DICO Description of input and output fields of map SQRE1MAP.  
SQRE1 COBOL copybook EXP101.DICO Client interface object copybook for IDL program SQRE1, alias of SQUARE. 1

Notes:

  1. Under z/OS, client interface objects are delivered with the installation; under UNIX and Windows, generate these objects with the EntireX Workbench.

  2. Adapt the JCL to your needs.

  3. Application

    1. built according to the client-side build instructions, see Using the COBOL Wrapper for CICS with DFHCOMMAREA Calling Convention (z/OS and z/VSE).

    2. associated with IDL exampleWithPgmAlias.idl.

    3. client interface object name SQRE1 different from remote procedure name SQUARE (RPC service).

    4. SQRE1CLT and client interface object SQRE1 installed as separate CICS programs.

For more information, refer to the readme file in EntireX directory examples/RPC/CobolClient/zosCICS/DFHCOMMAREA under UNIX or Windows.

SQUARE Client using Call Interface

For CICS on operating system z/OS, the following SQUARE client is implemented with interface type "CICS with standard linkage calling convention". See Client Interface Types for more information.

Name Type Data Set Description Notes
COBSRVI COBOL source code EXP101.DCCO Generate RPC service module for CICS with call interface. 4
SQRECLT COBOL source code EXP101.DCCO An RPC client application calling the remote procedure (RPC service) SQUARE. 2
SQREDFH CICS CSD EXP101.DCCO CSD Definition for RPC client SQRECLT.  
SQREIGY JCL EXP101.DCCO Job (JCL) to build the RPC client SQRECLT. 3
SQREMAP CICS Map EXP101.DCCO CICS Map definition for RPC client SQRECLT.  
SQUARE COBOL source code EXP101.DCCO Client interface object for IDL program SQUARE. 1
SQREMAP COBOL copybook EXP101.DICO Description of input and output fields of map SQREMAP.  
SQUARE COBOL copybook EXP101.DICO Client interface object copybook for IDL program SQUARE. 1

Notes:

  1. Under z/OS, client interface objects are delivered with the installation; under UNIX and Windows, generate these objects with the EntireX Workbench.

  2. Application

    1. built according to the client-side build instructions, see Using the COBOL Wrapper for CICS with Call Interfaces (z/OS and z/VSE).

    2. associated with IDL file example.idl.

    3. SQRECLT uses CICS Map definition SQREMAP.

    4. SQRECLT and client interface object SQUARE are linked together.

    5. SQRECLT installed as single CICS program.

  3. Adapt the JCL to your needs.

  4. See Generate Generic RPC Service Module COBSRVI.

For more information, refer to the readme file in EntireX directory examples/RPC/CobolClient/zosCICS/CallInterface under UNIX or Windows.

Basic RPC Server Examples - CALC, SQUARE

CALC Server

For CICS under operating system z/OS, the CALC server is built with COBOL Wrapper "CICS with DFHCOMMAREA calling convention" interface type. See Server Interface Types for more information.

Name Type Data Set Description Notes
CALC COBOL source code EXP101.DVCO A server application providing the remote procedure CALC (RPC service), with associated example.idl. 1
CALCDFH CICS CSD EXP101.DVCO CSD Definition for remote procedure CALC (RPC service).  
CALCIGY JCL EXP101.DVCO Job (JCL) to build the remote procedure CALC (RPC service). 2

Notes:

  1. Application built according to the server-side build instructions, see Using the COBOL Wrapper for CICS with DFHCOMMAREA Calling Convention (z/OS and z/VSE).
  2. Adapt the JCL to your needs.

For more information, refer to the readme file in EntireX directory examples/RPC/CobolServer/zosCICS/DFHCOMMAREA under UNIX or Windows.

SQUARE Server

For CICS under operating system z/OS, the SQUARE server is built with COBOL Wrapper "CICS with DFHCOMMAREA calling convention" interface type. See Client Interface Types for more information.

Name Type Data Set Description Notes
SQREDFH CICS CSD EXP101.DVCO CSD Definition for remote procedure SQUARE (RPC service).  
SQREIGY JCL EXP101.DVCO Job (JCL) to build the remote procedure SQUARE (RPC service). 2
SQUARE COBOL source code EXP101.DVCO A server application providing the remote procedure SQUARE (RPC service), with associated example.idl. 1

Notes:

  1. Application built according to the server-side build instructions, see Using the COBOL Wrapper for CICS with DFHCOMMAREA Calling Convention (z/OS and z/VSE).
  2. Adapt the JCL to your needs.

For more information, refer to the readme file in EntireX directory examples/RPC/CobolServer/zosCICS/DFHCOMMAREA under UNIX or Windows.

Advanced CICS Channel Container RPC Server Example

For CICS on operating system z/OS, the TWOC server is built with COBOL Wrapper "CICS with Channel Container calling convention" interface type. See Server Interface Types for more information.

Name Type Data Set Description Notes
TWOC COBOL source code EXP101.DVCO A server application providing the remote procedure TWOC (RPC service), with associated CICSChannelContainer.idl. 1
TWOCDFH CICS CSD EXP101.DVCO CSD Definition for remote procedure TWOC (RPC service).  
TWOCIGY JCL EXP101.DVCO Job (JCL) to build remote procedure TWOC (RPC service). 2
  1. Application built according to the server-side build instructions. See Using the COBOL Wrapper for CICS with Channel Container Calling Convention (z/OS).

  2. Adapt the JCL to your needs.

For more information, see the readme file in EntireX directory examples/RPC/CobolServer/zosCICS/ChannelContainer under UNIX or Windows.