System/390(R) assembler declaration
MQCIH DSECT
MQCIH_STRUCID DS CL4 Structure identifier
MQCIH_VERSION DS F Structure version number
MQCIH_STRUCLENGTH DS F Length of MQCIH structure
MQCIH_ENCODING DS F Reserved
MQCIH_CODEDCHARSETID DS F Reserved
MQCIH_FORMAT DS CL8 MQ format name of data that follows
* MQCIH
MQCIH_FLAGS DS F Flags
MQCIH_RETURNCODE DS F Return code from bridge
MQCIH_COMPCODE DS F MQ completion code or CICS EIBRESP
MQCIH_REASON DS F MQ reason or feedback code, or CICS
* EIBRESP2
MQCIH_UOWCONTROL DS F Unit-of-work control
MQCIH_GETWAITINTERVAL DS F Wait interval for MQGET call issued
* by bridge task
MQCIH_LINKTYPE DS F Link type
MQCIH_OUTPUTDATALENGTH DS F Output COMMAREA data length
MQCIH_FACILITYKEEPTIME DS F Bridge facility release time
MQCIH_ADSDESCRIPTOR DS F Send/receive ADS descriptor
MQCIH_CONVERSATIONALTASK DS F Whether task can be conversational
MQCIH_TASKENDSTATUS DS F Status at end of task
MQCIH_FACILITY DS XL8 Bridge facility token
MQCIH_FUNCTION DS CL4 MQ call name or CICS EIBFN function
MQCIH_ABENDCODE DS CL4 Abend code
MQCIH_AUTHENTICATOR DS CL8 Password or passticket
MQCIH_RESERVED1 DS CL8 Reserved
MQCIH_REPLYTOFORMAT DS CL8 MQ format name of reply message
MQCIH_REMOTESYSID DS CL4 Reserved
MQCIH_REMOTETRANSID DS CL4 Reserved
MQCIH_TRANSACTIONID DS CL4 Transaction to attach
MQCIH_FACILITYLIKE DS CL4 Terminal emulated attributes
MQCIH_ATTENTIONID DS CL4 AID key
MQCIH_STARTCODE DS CL4 Transaction start code
MQCIH_CANCELCODE DS CL4 Abend transaction code
MQCIH_NEXTTRANSACTIONID DS CL4 Next transaction to attach
MQCIH_RESERVED2 DS CL8 Reserved
MQCIH_RESERVED3 DS CL8 Reserved
MQCIH_CURSORPOSITION DS F Cursor position
MQCIH_ERROROFFSET DS F Offset of error in message
MQCIH_INPUTITEM DS F Reserved
MQCIH_RESERVED4 DS F Reserved
*
MQCIH_LENGTH EQU *-MQCIH
ORG MQCIH
MQCIH_AREA DS CL(MQCIH_LENGTH)