Specify a value for the DESTID parameter in the EBCXMOPT macro in the EC0XMCTR module and corresponding DCT entries. This value defines a transient data destination for messages issued by the subtask.
Note: Specify a blank for DESTID to suppress the generation of informational messages from the subtask.
The DCT entries for a DESTID of XMC0 are:
RMOLOG DFHDCT TYPE=SDSCI, FOR CICS MESSAGES AND SHUTDOWN
BLKSIZE=250, STATISTICS
BUFNO=1,
DSCNAME=RMOLOG,
RECFORM=VARUNBM,
RECSIZE=242,
TYPEFLE=OUTPUT
XMC0G DFHDCT TYPE=EXTRA,
DESTID=XMC0,
DSCNAME=RMOLOG
If you want to invoke CA Deliver from a user-written CICS menu system, then return to that menu system when you exit from CA Deliver, do the following:
Invoke CA Deliver from the menu system by using this CICS command:
EXEC CICS START TRANSID(DELIVER transaction-id)
TERMID(EIBTRMID)
FROM(data-area)
LENGTH(4)
where:
Specifies the CA Deliver transaction ID.
Specifies the terminal that a CA Deliver transaction will communicate with.
Specifies the optional variable length character string.
The format of the data-area parameter is:
tran,
where:
Specifies the return menu CICS transaction to be started when CA Deliver finishes.
Note: None of the data-area parameters is required.
Specifies the number of bytes in the data field being passed.
Note:
When CA Deliver receives control, it retrieves the four-byte return transaction ID and saves it from iteration to iteration.
If the retrieve fails, CA Deliver retains the information that it was started directly from a terminal, not a menu system.
When CA Deliver finishes processing, it determines whether it should return to a menu system by starting the return transaction.
If there is a saved transaction ID, CA Deliver starts the return transaction before it exits to CICS by issuing:
EXEC CICS START TRANSID(RETURN transaction-id)
TERMID(EIBTRMID)
NOCHECK
The cross memory CICS access involves two different address spaces: the CICS address spaces and the XMS address spaces.
The user's CICS transactions and the cross memory support subtask reside in the address spaces.
| Copyright © 2012 CA. All rights reserved. |
|