The MQRecord stereotype identifies a structured Record part that
holds information from an WebSphere® MQ
data queue. The following is an example of a Record with the MQRecord
stereotype:
Record MQRecordPart type mqRecord
{
queueName = "myQueue"
}
10 myField01 CHAR(2);
10 myField02 CHAR(78);
end
The syntax diagram for an MQRecord part is as follows:
recordPartName
Specifies the name of the Record part.
properties
Any of the unique properties that the MQRecord stereotype brings
to the Record part. For more information, see MQRecord properties.
structureField
A structure field in the Record.
The following is an example of a MQ topic with the MQRecord
stereotype:
Record BASICMQMESSAGE type mqRecord {
topicName = "MYTOPIC", includeMsgInTransaction = yes,
subscriptionName = "MYSUB", isTopicRecord = yes
}
3 MESSAGE char(79) ;
end // end MQMESSAGE
or
Record BASICMQMESSAGE type mqRecord {
topicString = "EARTH/INDIA", includeMsgInTransaction = yes,
subscriptionName = "MYSUB", isTopicRecord = yes
}
3 MESSAGE char(79) ;
end // end MQMESSAGE
Runtime changes for COBOL environment:
We need to add below DSN to execute the Pub-Sub program