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 » Issues with REFERENCE TO

Post new topic  Reply to topic
 Issues with REFERENCE TO « View previous topic :: View next topic » 
Author Message
EddieA
PostPosted: Thu Jan 08, 2009 11:35 am    Post subject: Issues with REFERENCE TO Reply with quote

Jedi

Joined: 28 Jun 2001
Posts: 2453
Location: Los Angeles

I'm running the following code on a 6.0.0.7 Windows box.

Code:
      MOVE ReplyData NEXTSIBLING;

      DECLARE VinFlagTable REFERENCE TO ReplyData;
      DECLARE VinFlag REFERENCE TO VinFlagTable;
      WHILE LASTMOVE(VinFlagTable)
      AND (VinFlagTable.LCSW701_VIN_FLG <> ' ') DO

         CREATE LASTCHILD OF VSHDataArea.vshNS:VehicleServiceHistory
                     AS VinFlag NAMESPACE vshNS NAME 'VinFlagTable';
         SET VinFlag.vshNS:VinFlagUsageCode = VinFlagTable.LCSW701_VIN_FLG;
         SET VinFlag.vshNS:VinFlagDescription = VinFlagTable.LCSW701_FLG_DESC;
         
         MOVE VinFlagTable NEXTSIBLING REPEAT TYPE NAME;
      END WHILE;

      MOVE ReplyData NEXTSIBLING;


The ReplyData Reference is walking down a series of 03 levels in an imported COBOL copy book.

After the initial MOVE, in the code snippet, it's correctly pointing at the 03 that contains the table.

When the loop has terminated, ReplyData is still pointing at the start of the table, but when the MOVE is executed, it walks the reference to the 2nd element in the table, NOT the next 03 level in the COBOL structure.

Thoughts, or suggestions.

Cheers,
Eddie
_________________
Eddie Atherton
IBM Certified Solution Developer - WebSphere Message Broker V6.1
IBM Certified Solution Developer - WebSphere Message Broker V7.0
Back to top
View user's profile Send private message
EddieA
PostPosted: Thu Jan 08, 2009 11:43 am    Post subject: Reply with quote

Jedi

Joined: 28 Jun 2001
Posts: 2453
Location: Los Angeles

Don't bother. I've worked out why.

It's the way the repeats have been defined in the COBOL copy book.

Duhhhhh

Cheers,
Eddie
_________________
Eddie Atherton
IBM Certified Solution Developer - WebSphere Message Broker V6.1
IBM Certified Solution Developer - WebSphere Message Broker V7.0
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic  Reply to topic Page 1 of 1

MQSeries.net Forum Index » WebSphere Message Broker (ACE) Support » Issues with REFERENCE TO
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.