Visual Basic declaration
Type MQEPH
StrucId As String*4 'Structure identifier'
Version As Long 'Structure version number'
StrucLength As Long 'Total length of MQEPH structure including the MQCFH'
'and parameter structures that follow it'
Encoding As Long 'Numeric encoding of data that follows last'
'PCF parameter structure'
CodedCharSetId As Long 'Character set identifier of data that'
'follows last PCF parameter structure'
Format As String*8 'Format name of data that follows last PCF'
'parameter structure'
Flags As Long 'Flags'
PCFHeader As MQCFH 'Programmable command format header'
End Type
Global MQEPH_DEFAULT As MQEPH