|
RSS Feed - WebSphere MQ Support
|
RSS Feed - Message Broker Support
|
 |
|
Problem with 64k buffer size in VB |
« View previous topic :: View next topic » |
Author |
Message
|
jmcconnell |
Posted: Wed Oct 17, 2001 8:07 am Post subject: |
|
|
Newbie
Joined: 16 Oct 2001 Posts: 2 Location: Cornerstone Consulting
|
I'm passing an XML message from a CICS/IMS/COBOL II program on an OS/390 to a VB app running on NT 4.0. The max message size on the Q is set to 4mb, but the string buffer in the VB app has a limit of 64k. The data from the legacy system is such that the message length could exceed 64k. Any ideas on how to get a larger message into VB? Do I have to use segmented messages? |
|
Back to top |
|
 |
billreiss |
Posted: Thu Oct 18, 2001 7:42 am Post subject: |
|
|
Newbie
Joined: 17 Oct 2001 Posts: 1 Location: CommerceQuest
|
Yes, there is a fairly easy solution to this, assuming you are calling the MQI MQGET from VB directly. Declare a variable length string, and then use the Space() function to create a string of spaces using some large number. Then pass this string and its size into the MQGET call.
It will look something like this:
Dim buf as String
Dim msglen as Long
msglen=100000
buf=Space(msglen)
MQGET Hconn, hQueue, md, gmo, msglen, buf, DataLength, CompCode, Reason
Hope this works for you. |
|
Back to top |
|
 |
sk |
Posted: Thu Oct 18, 2001 11:08 am Post subject: |
|
|
Newbie
Joined: 30 Sep 2001 Posts: 3
|
Version of MQ used is 5.2. I am running the MQSeries Server on Windows NT and the MQSeries Client is on Windows 2000 Professional. The Client and the Server is on a different Machine. I am using MQSeries Automation Classes for ActiveX reference. I wrote a program in Visual Basic 6.0 which is putting a message on a request queue and I am getting back a message from the reply queue. The message which i am getting back from the reply queue is getting truncated. How can get back a message without being truncated. Is there any parameter that i should set. Thanks |
|
Back to top |
|
 |
jmcconnell |
Posted: Fri Oct 19, 2001 2:23 pm Post subject: |
|
|
Newbie
Joined: 16 Oct 2001 Posts: 2 Location: Cornerstone Consulting
|
Bill, thanks for the tip. I'll give it a try.
Jeff |
|
Back to top |
|
 |
|
|
 |
|
Page 1 of 1 |
|
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
|
|
|
|