MQSeries.net :: View topic - subscribe message wich is published by using MQRFH2 header

warrior12 · Posted: Wed Apr 11, 2012 2:41 am Post subject:

hi there,
actually i am publishing message from one flow and then onther flow which is subscribing the message and converting into to the dilimited text format and writin in file.

============================================
in 1st flow
MQinput--- > compute----> publish.

In compute node publish logic is:
CALL CopyMessageHeaders();
SET OutputRoot.Properties.MessageSet = CONST_REMODEL_MessageSet;

--publishing to the topic as per RFH Approach for coalt
SET OutputRoot.MQMD.Format = MQFMT_RF_HEADER_2;
SET OutputRoot.MQRFH2.(MQRFH2.Field)Format = 'MQSTR';
SET OutputRoot.MQRFH2.(MQRFH2.Field)NameValueCCSID = 1208;
SET OutputRoot.MQRFH2.psc.Command='Publish';
SET OutputRoot.MQRFH2.psc.Topic='AAA/BBBB/CCC';

there are 2 xmlnsc message set for IP and OP.
===============================================
2)subscription flow

MQInput-->compute---> filoutput node.
In Compute node:

CREATE FUNCTION Main() RETURNS BOOLEAN -------- option 1---------
BEGIN

CALL CopyMessageHeaders();
SET OutputRoot.Properties.MessageSet='CDW_EUOM_TDS_MESSSAGE';
SET OutputRoot.Properties.MessageType='UOM';
SET OutputRoot.Properties.MessageFormat='Text1';
SET OutputLocalEnvironment.Destination.File.Name=setOPFileName(fileName,InputRoot.MQMD.MsgId);
SET OutputRoot.MRM.empCode = InputRoot.MRM.empCode;
SET OutputRoot.MRM.empName = InputRoot.MRM.empName;
PROPAGATE TO TERMINAL 'out' DELETE NONE;
PROPAGATE TO TERMINAL 'out1' DELETE NONE;

RETURN FALSE;
END;

-----------------------------
CREATE FUNCTION Main() RETURNS BOOLEAN -------- option 2---------
BEGIN

SET OutputRoot= InputRoot;
PROPAGATE TO TERMINAL 'out' DELETE NONE;
PROPAGATE TO TERMINAL 'out1' DELETE NONE;
RETURN FALSE;
END;

there are 2 MRM message set for IP(XML format) and OP (Text1 format).

case1 : if i use like 1st function then its genrating blank file.
case2 : if i use like genrateFileOP() 2nd function then its genrating blank file.

actually this is happening becuase i changed publication logic from

SET OutputRoot.Properties.Topic='AAA/BBBB/CCC';

to

SET OutputRoot.MQMD.Format = MQFMT_RF_HEADER_2;
SET OutputRoot.MQRFH2.(MQRFH2.Field)Format = 'MQSTR';
SET OutputRoot.MQRFH2.(MQRFH2.Field)NameValueCCSID = 1208;
SET OutputRoot.MQRFH2.psc.Command='Publish';
SET OutputRoot.MQRFH2.psc.Topic='AAA/BBBB/CCC';

i want to use option 1 becuase i am having some transformation logic and i am converting xml to Text dilimited format.

could you please suggest how i can use 1st apporch.
any help really appreciated.

Thanks.