RPG declaration (copy file CMQCIHH)

     D*..1....:....2....:....3....:....4....:....5....:....6....:....7..
     D* MQCIH Structure
     D*
     D* Structure identifier
     D  CISID                  1      4
     D* Structure version number
     D  CIVER                  5      8I 0
     D* Length of MQCIH structure
     D  CILEN                  9     12I 0
     D* Reserved
     D  CIENC                 13     16I 0
     D* Reserved
     D  CICSI                 17     20I 0
     D* MQ format name of data that follows MQCIH
     D  CIFMT                 21     28
     D* Flags
     D  CIFLG                 29     32I 0
     D* Return code from bridge
     D  CIRET                 33     36I 0
     D* MQ completion code or CICS EIBRESP
     D  CICC                  37     40I 0
     D* MQ reason or feedback code, or CICS EIBRESP2
     D  CIREA                 41     44I 0
     D* Unit-of-work control
     D  CIUOW                 45     48I 0
     D* Wait interval for MQGET call issued by bridge task
     D  CIGWI                 49     52I 0
     D* Link type
     D  CILT                  53     56I 0
     D* Output COMMAREA data length
     D  CIODL                 57     60I 0
     D* Bridge facility release time
     D  CIFKT                 61     64I 0
     D* Send/receive ADS descriptor
     D  CIADS                 65     68I 0
     D* Whether task can be conversational
     D  CICT                  69     72I 0
     D* Status at end of task
     D  CITES                 73     76I 0
     D* Bridge facility token
     D  CIFAC                 77     84
     D* MQ call name or CICS EIBFN function
     D  CIFNC                 85     88
     D* Abend code
     D  CIAC                  89     92
     D* Password or passticket
     D  CIAUT                 93    100
     D* Reserved
     D  CIRS1                101    108
     D* MQ format name of reply message
     D  CIRFM                109    116
     D* Reserved
     D  CIRSI                117    120
     D* Reserved
     D  CIRTI                121    124
     D* Transaction to attach
     D  CITI                 125    128
     D* Terminal emulated attributes
     D  CIFL                 129    132
     D* AID key
     D  CIAI                 133    136
     D* Transaction start code
     D  CISC                 137    140
     D* Abend transaction code
     D  CICNC                141    144
     D* Next transaction to attach
     D  CINTI                145    148
     D* Reserved
     D  CIRS2                149    156
     D* Reserved
     D  CIRS3                157    164
     D* Cursor position
     D  CICP                 165    168I 0
     D* Offset of error in message
     D  CIEO                 169    172I 0
     D* Reserved
     D  CIII                 173    176I 0
     D* Reserved
     D  CIRS4                177    180I 0