This document describes the examples provided for the COBOL Wrapper for z/OS Batch. It covers the following topics:
The following examples are delivered for IBM i in the library EXAMPLE:
Module | Source file | Windows File Name | Description | Notes |
---|---|---|---|---|
CALCMENU |
QCBLLESRC |
- not delivered here - | COBOL client display file (source) | 1 |
CALCMAIN |
QCBLLESRC |
- not delivered here - | COBOL client dialog program (source) | 1 |
CCALC |
QCBLLESRC |
- not delivered here - | client interface object (generated) | 1 |
RPCSRVI |
QCBLLESRC |
- not delivered here - | generic RPC service module | 1 |
CALC |
QCBLLESRC |
- not delivered here - | RPC server calc (source) | 2 |
The name of the delivered module.
The name of the source file where the modules are delivered.
IBM i examples are not delivered in the Windows installation.
The purpose of the module
Notes:
CALCMENU
,
CALCMAIN
, CCALC
and RPCSRVI
. You can find the associated IDL file
example.idl in the Windows installation.
To run the client examples for IBM i
The EntireX product library EXX must be in your library list. It contains the Broker ACI service program EXA.
Confirm that the broker and the RPC server are active.
Start the client application CALCCLIENT
that you built, see Using the COBOL Wrapper for Batch (z/OS, BS2000, z/VSE and IBM i).
A menu similar to the following will be displayed:
Calculator Menu ----------------------------------------------------- Operation: + (type + - * / to calculate or type . to terminate) Operand 1: _____ Operand 2: _____ Result: ___________ Broker-ID: localhost:1971 Server: SRV1
Specify the ID of the remote Broker and the name of the server that provides the CALC program. Specify the numbers you want to compute and press ENTER. If the Broker connection fails, you will get an appropriate error message.
To install and run the server examples for IBM i
For IBM i, the delivered program CALC
in QCBLLESRC
source file must
be provided to the RPC server under IBM i.
Confirm that the broker is active.
Start the RPC server under IBM i.