ASG
IBM
Zystems
Cressida
Icon
Netflexity
 
  MQSeries.net
Search  Search       Tech Exchange      Education      Certifications      Library      Info Center      SupportPacs      LinkedIn  Search  Search                                                                   FAQ  FAQ   Usergroups  Usergroups
 
Register  ::  Log in Log in to check your private messages
 
RSS Feed - WebSphere MQ Support RSS Feed - Message Broker Support

MQSeries.net Forum Index » WebSphere Message Broker (ACE) Support » set correlId

Post new topic  Reply to topic Goto page Previous  1, 2
 set correlId « View previous topic :: View next topic » 
Author Message
dilse
PostPosted: Thu Nov 30, 2006 3:26 pm    Post subject: Reply with quote

Master

Joined: 24 Jun 2004
Posts: 270

Quote:
CALL CopyEntireMessage();
SET OutputRoot.XMLNS = NULL;
SET OutputRoot.BLOB = NULL;
SET v_HopCorrelId = FIELDVALUE(Environment.Context.XML.ServiceProperty.Destination.Request.DestinationHop.MQ.CorrelID);
WHILE LENGTH(v_HopCorrelId) < 24 DO
SET v_HopCorrelId = v_HopCorrelId || '0';
END WHILE;
IF LENGTH(v_HopCorrelId) > 24 THEN
SET v_HopCorrelId = RIGHT(v_HopCorrelId,24);
END IF;
SET OutputRoot.MQMD.CorrelId = CAST(v_HopCorrelId AS BLOB CCSID 1208);


I am assuming you have this code in the compute node after the HTTPRequest node. If that is the case you have to Nullify the HTTPHeaders and create a new MQMD or copy one from if you already stored as you will not get an MQMD from the HTTPResponse. Let us know where exactly you are writing this code.

DilSe,,
Back to top
View user's profile Send private message
madi
PostPosted: Fri Dec 01, 2006 7:45 am    Post subject: Reply with quote

Chevalier

Joined: 17 Jan 2006
Posts: 475

Code:

Code:
IF FIELDNAME(OutputRoot.MQMD) IS NULL THEN
         CREATE NEXTSIBLING OF OutputRoot.Properties DOMAIN 'MQMD';
         SET OutputRoot.MQMD.Format = 'MQSTR';
         SET OutputRoot.MQMD.StructID = MQMD_STRUC_ID;
         SET OutputRoot.MQMD.Version = MQMD_CURRENT_VERSION;
      END IF;
      IF FIELDNAME(Environment.Context.XML.ServiceProperty.Destination.Request.DestinationHop.MQ.IN.QName) IS NOT NULL AND FIELDVALUE(Environment.Context.XML.ServiceProperty.Destination.Request.DestinationHop.MQ.IN.QName) <> '' THEN
         SET OutputLocalEnvironment.Destination.MQDestinationList.DestinationData.queueName = FIELDVALUE(Environment.Context.XML.ServiceProperty.Destination.Request.DestinationHop.MQ.IN.QName);
         SET OutputRoot.XMLNSC.Messages.XMLPayLoad = InputBody;
         SET OutputRoot.XMLNSC.Messages.Context = Environment.Context;
         SET v_HopCorrelId = CAST(FIELDVALUE(Environment.Context.XML.ServiceProperty.Destination.Request.DestinationHop.MQ.CorrelID) AS CHAR);
         WHILE LENGTH(v_HopCorrelId) < 24 DO
            SET v_HopCorrelId = v_HopCorrelId || '0';
         END WHILE;
         IF LENGTH(v_HopCorrelId) > 24 THEN
            SET v_HopCorrelId = RIGHT(v_HopCorrelId,24);
         END IF;
         DECLARE v_ReqId CHAR FIELDVALUE(InputLocalEnvironment.Destination.HTTP.RequestIdentifier);
         IF LENGTH(v_ReqId) < 24 THEN
            WHILE LENGTH(v_ReqId) < 24 DO
               SET v_ReqId = v_ReqId || '0';
            END WHILE;
         ELSE
            SET v_ReqId = RIGHT(v_ReqId, 24);
         END IF;
         SET OutputRoot.MQMD.MsgId= CAST(v_ReqId AS BLOB CCSID 819);
         -- SET OutputRoot.MQMD.MsgId = CAST(v_MsgId AS BLOB CCSID 1208);         
         SET OutputRoot.MQMD.CorrelId = CAST(v_HopCorrelId AS BLOB CCSID 819);
      
         PROPAGATE TO LABEL 'Queue' DELETE NONE;
         
         SET Environment.WORKAREA.MQMD.CorrelId = OutputRoot.MQMD.CorrelId;
         SET OutputRoot.MQMD.CorrelId = OutputRoot.MQMD.MsgId;
         SET OutputRoot.MQMD.MsgId = CAST(Environment.WORKAREA.MQMD.CorrelId AS BLOB CCSID 1208);

         PROPAGATE TO TERMINAL 'out';


i am creating MQMD but am not making the http headers null .... is that a problem??
Back to top
View user's profile Send private message
madi
PostPosted: Fri Dec 01, 2006 12:53 pm    Post subject: Reply with quote

Chevalier

Joined: 17 Jan 2006
Posts: 475

PROPAGATE to LABEL 'Queue'

after this statement the correlId is setting to 00000000000

but the next propagate where im flipping the msg id to the correl id

there the correl id is setting correctly

cant figure this out and getting pretty irritating

--madi
Back to top
View user's profile Send private message
voodoo123
PostPosted: Tue Dec 12, 2006 6:40 am    Post subject: Reply with quote

Newbie

Joined: 14 Aug 2006
Posts: 5

plesase set the reply identifier in properies folder.
Back to top
View user's profile Send private message
fjb_saper
PostPosted: Tue Dec 12, 2006 3:22 pm    Post subject: Reply with quote

Grand High Poobah

Joined: 18 Nov 2003
Posts: 20756
Location: LI,NY

madi wrote:
PROPAGATE to LABEL 'Queue'

after this statement the correlId is setting to 00000000000

but the next propagate where im flipping the msg id to the correl id

there the correl id is setting correctly

cant figure this out and getting pretty irritating

--madi

Duh... Doesn't the PROPAGATE reset everything to the default values if you did not specify the appropriate keyword ???
_________________
MQ & Broker admin
Back to top
View user's profile Send private message Send e-mail
Display posts from previous:   
Post new topic  Reply to topic Goto page Previous  1, 2 Page 2 of 2

MQSeries.net Forum Index » WebSphere Message Broker (ACE) Support » set correlId
Jump to:  



You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
Protected by Anti-Spam ACP
 
 


Theme by Dustin Baccetti
Powered by phpBB © 2001, 2002 phpBB Group

Copyright © MQSeries.net. All rights reserved.