MQSeries.net :: View topic

umesh · Posted: Tue May 24, 2005 1:48 am Post subject:

Hi all,

I am having a message flow where TDS message is the input and output. Now I am also selecting a code from database in compute mode and putting a message to output queue in TDS format. When I am executing the flow the codes are retireved and next flow ends in error saying "No message Id received."I am giving TDS message as input in the form of a+...... where + is seperator.I have checked project reference properties and message set definitions.

Please let me know the reason for this error.

CREATE COMPUTE MODULE "A_B_Compute"
CREATE FUNCTION Main() RETURNS BOOLEAN
BEGIN

CALL CopyEntireMessage();

SET Environment.Variables.Result[] = (SELECT T.CD FROM Database.CODES as T);

DECLARE i INTEGER 1;

FOR xyz AS Environment.Variables.Result[] DO SET OutputRoot.Properties=InputRoot.Properties;
SET OutputRoot.MQMD = InputRoot.MQMD;
SET OutputRoot.MRM.Details.Result[i].CD=xyz.CD;
SET OutputLocalEnvironment.Destination.MQ.DestinationData[i].queueName= xyz.Code || '.OUT.1' ;
SET i = i + 1;
PROPAGATE;
END FOR;

RETURN TRUE;
END;

thanks,
umesh