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 » IBM MQ API Support » Cobol buffer size to read 100MB message

Post new topic  Reply to topic
 Cobol buffer size to read 100MB message « View previous topic :: View next topic » 
Author Message
tjfunny1
PostPosted: Fri Nov 15, 2002 1:13 pm    Post subject: Cobol buffer size to read 100MB message Reply with quote

Apprentice

Joined: 17 Jun 2002
Posts: 35
Location: Atlanta

This is ugly, but according to IBM docs, you can put a 100 megabyte message on a queue on the OS/390. My question is how can you read it with a Cobol program?? While our program requirements are much smaller than 100mb, we do need capacity to read/process up to a 4mb message.

I've been told you can use the 'Occurs' call to handle large units of data, but I haven't seen any sample code using MQ to read a LARGE message like this.

Has anyone out there done this? Can you forward a copy of the code to build the buffer/working storage area?

Kudos to the expert programmer (I have an opening for you here).

TJ
Back to top
View user's profile Send private message
nimconsult
PostPosted: Sun Nov 17, 2002 11:22 pm    Post subject: Reply with quote

Master

Joined: 22 May 2002
Posts: 268
Location: NIMCONSULT - Belgium

That is a LONG time ago for me, but I personally used dynamic memory allocation instead of hard-coding an array in the COBOL program.

First allocate memory (using a language environment call CEEGTST if I remember well, or EXEC CICS GETMAIN, which is equivalent if you work with CICS) and set it to MY-BUFFER-POINTER.

Then you perform "SET ADDRESS OF MY-BUFFER TO MY-BUFFER-POINTER", where MY-BUFFER is a character variable declared in the LINKAGE section.

Do not blame me if I made a typo, COBOL is some years behind, but believe me this worked perfectly and avoids having huge modules when not necessary.

Nicolas
_________________
Nicolas Maréchal
Senior Architect - Partner

NIMCONSULT Software Architecture Services (Belgium)
http://www.nimconsult.be
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic  Reply to topic Page 1 of 1

MQSeries.net Forum Index » IBM MQ API Support » Cobol buffer size to read 100MB message
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.