MQSeries.net :: View topic - "UTF-8" (Unicode) message wrong after adding MQRFH

jorgego · Posted: Thu Sep 13, 2007 6:59 pm Post subject:

Hi
In Message Broker we have a simple flow where we map from XML to XML using the mapping node. We can send XML messages with Chinese characters and we set the CCSID (Coded Character Set IDentifier)= 1208 when we PUT the message in the input queue. This works OK since on the output queue of the flow we get a message with Chinese chars well formed.
The PROBLEM is that after adding a compute node (right after the mapping node) the (double byte) Chinese characters are corrupted/garbled. This compute node just includes an MQRFH2 header in the message as shown below:

CREATE COMPUTE MODULE GL_Cusdec_SAPtoBT_Compute
CREATE FUNCTION Main() RETURNS BOOLEAN
BEGIN
-- CALL CopyMessageHeaders();
-- CALL CopyEntireMessage();

SET OutputRoot.Properties = InputRoot.Properties;
SET OutputRoot.MQMD = InputRoot.MQMD;

DECLARE inRef REFERENCE TO InputRoot.MRM.ESB_DOC.TX_METADATA;
SET OutputRoot.MQRFH2.(MQRFH2.Field)Format = 'MQSTR ';
SET OutputRoot.MQRFH2.(MQRFH2.Field)NameValueCCSID = 1208;
SET OutputRoot.MQRFH2.mcd.Msd = 'jms_text';
SET OutputRoot.MQRFH2.mcd.Type = 'application/xml';
SET OutputRoot.MQRFH2.jms.Dlv = '1';
SET OutputRoot.MQRFH2.usr.x_aux_sender_id = inRef.sender_partner_id;
SET OutputRoot.MQRFH2.usr.x_aux_receiver_id = inRef.receiver_partner_id;
SET OutputRoot.MQRFH2.usr.x_aux_protocol = 'CANONICAL';
SET OutputRoot.MQRFH2.usr.x_aux_protocol_version = '1.0';
SET OutputRoot.MQRFH2.usr.x_aux_process_type = 'CustomsDecl';
SET OutputRoot.MQRFH2.usr.x_aux_process_version = '1.0';
SET OutputRoot.MQRFH2.usr.x_aux_msg_id = inRef.msg_id;
--SET OutputRoot.MQRFH2.usr.x_aux_production = inRef.test_flag;
SET OutputRoot.MQRFH2.usr.content_type = 'application/xml;charset=UTF-8';

SET OutputRoot.MRM = InputRoot.MRM;

RETURN TRUE;
END;

Any ideas about how to add an MQRFH2 header without messing with the double byte characters.

Thanks !
JORGE.