Visual Basic declaration
Type MQWIH
StrucId As String*4 'Structure identifier'
Version As Long 'Structure version number'
StrucLength As Long 'Length of MQWIH structure'
Encoding As Long 'Numeric encoding of data that follows'
'MQWIH'
CodedCharSetId As Long 'Character-set identifier of data that'
'follows MQWIH'
Format As String*8 'Format name of data that follows MQWIH'
Flags As Long 'Flags'
ServiceName As String*32 'Service name'
ServiceStep As String*8 'Service step name'
MsgToken As MQBYTE16 'Message token'
Reserved As String*32 'Reserved'
End Type