MQSeries.net :: View topic

mahek · Posted: Tue Mar 01, 2005 2:41 pm Post subject:

Hi all,
I Have the following problem
I HAVE THE INPUT SUPPOSE AS
[1,2]
[2,4]
[1,6]
[2,9]
[1,8]
THE group indicator is [ and terminator is ] AND REPEATING ELEMENTS DELEMITED BY <CR><LF>
I am having a message set in which DETAILS is the repeating element having FIRSTNAME AND LASTNAME AS ITS INNER ELEMENTS.
I have to get the output as
ON QUEUE A
1,2
1,6
1,8
AS ONE MESSAGE

AND ONE QUEUE B
<MESSAGE>
<N>
<FN>2</FN>
<LN>4</LN>
</N>
<N>
<FN>2</FN>
<LN>9</LN>
</N>
</MESSAGE>
I HAVE THE FOLLOWING CODE FOR THIS

CREATE COMPUTE MODULE FLOATMF_Compute
CREATE FUNCTION Main() RETURNS BOOLEAN
BEGIN

DECLARE K INTEGER 1;
DECLARE L INTEGER CARDINALITY(InputRoot.MRM.DETAILS[]);
WHILE K <= L DO
CALL CopyMessageHeaders();
IF InputRoot.MRM.DETAILS[K].FN='1'
THEN
SET OutputRoot.Properties.MessageSet = 'EBQDKJC002001';
SET OutputRoot.Properties.MessageType = 'FLOATMSG1';

SET OutputRoot.MRM.DETAILS[K].FIRSTNAME =InputRoot.MRM.DETAILS[K].FN;
SET OutputRoot.MRM.DETAILS[K].LASTNAME= InputRoot.MRM.DETAILS[K].LN;
SET OutputLocalEnvironment.Destination.MQ.DestinationData.queueName = 'A';
SETOutputLocalEnvironment.Destination.MQ.DestinationData.queueManagerName ='BMB';

ELSE
SET OutputRoot.XML.MESSAGE.N[K].FN=InputRoot.MRM.DETAILS[K].FN;
SET OutputRoot.XML.MESSAGE.N[K].LN=InputRoot.MRM.DETAILS[K].LN;

SET OutputLocalEnvironment.Destination.MQ.DestinationData.queueName 'B;
SET OutputLocalEnvironment.Destination.MQ.DestinationData.queueManagerName= 'BMB';

END IF;
SET K=K+1;
PROPAGATE;
END WHILE;

RETURN FALSE;

END;
Can any one tell me what mistake i am doing.
Thanks