ecijtpn - ECI_SYNC_TPN and ECI_ASYNC_TPN Calls
This application issues the following ECI calls:
- eci_sync_tpn
- eci_async_tpn
- eci_get_reply_wait
- eci_sync
- eci_async
- eci_get_reply_wait
The program also uses the method isTPNTransid to confirm
whether tpn is being used.
Note: tpn is currently not supported on Unix platforms.
Testing should include:
- Issuing the calls using the default transid CPMI
- Issuing the calls specifying your own transid. You must
define your own transid in the server. For example, on
CICS for OS/2 CPMI runs program FAAMIR; therefore you
can define your own transid, eg MYMI, to call program FAAMIR.
The example below shows how to override CPMI with MYMI.
Note that the value of transid is case-sensitive.
- Testing with a mirror less than 4-characters in length.
- With a transid undefined on the server. The _tpn calls should
abend, but the following non-tpn calls should use the default
CPMI transid and work successfully.
Prior to each ECI call the commarea is initialised to
18 dashes. The default CICS server program is the supplied SRVTIME
which is compatible on all CICS servers. If desired, a different server
program can be supplied as an input parameter to this application.
This program contains no data conversion for the commarea.
Data conversion should be carried out on the server, if required.
Parameters can be overridden via command line.
Issue "ecijtpn -?" for help and default settings.
Note: the minimum number of iterations is 2
Sample Input
java jgtest.eci.ecijtpn -j local: -tran MYMI
Sample Output
ecijtpn - ECI_SYNC_TPN and ECI_ASYNC_TPN Calls
-j JGate -> local:
-r JGate port -> 2006
-list list systems only -> false
-s CICS server -> (not specified)
-a application -> SRVTIME
-i # iterations (minimum 2) -> 2
-u userid -> SYSAD
-p password -> SYSAD
-d delay between iterations -> 0 seconds
-x exit on ECI error -> false
-! debug -> false
-? Display settings only
--- ecijtpn started 12/06/98 12:14
--- Successfully created JavaGateway connection ---
--- Using CICS Region: NETBTCLR
# Call Mirror Commarea Data Length CICS Rc Abend
-- ------------------ ------ ----------------- ------ ------- -----
1 eci_sync_tpn MYMI 12/06/98 13:14:32 18 0 null
isTPNTransid --> true
1 eci_async_tpn MYMI ----------------- 18 0 null
isTPNTransid --> true
1 eci_get_reply_wait MYMI 12/06/98 13:14:32 18 0 null
2 eci_sync MYMI 12/06/98 13:14:32 18 0 null
isTPNTransid --> false
2 eci_async MYMI ----------------- 18 0 null
isTPNTransid --> false
2 eci_get_reply_wait MYMI 12/06/98 13:14:33 18 0 null
--- Successfully closed JavaGateway connection ---
--- ecijtpn completed 12/06/98 12:14
--- Calls successful ... 6 out of 6
--- Iterations run ..... 2 out of 2
History log:
- Written : Apr 97 - Alan Hollingshead
- Updated : Apr 98 - uses common classes