× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Client Access data queue control
  • From: "Peter Dow" <pcdow@xxxxxxxxx>
  • Date: Tue, 5 Sep 2000 23:19:23 -0700

Hi All,

I was playing around with Chris Bipes's method of using a single data queue
to communicate between client and server (thanks Chris!) using VB 6.0 and CA
V3R1M3 SF60456.

I created a keyed data queue on the AS400 and wrote a VB program to allow
the user to enter a string, send a string to the data queue, then receive it
and display it.  It does this with key = blanks.  Separate command buttons
so I can control when it sends and receives. That much works fine, although
I noticed that the data queue key is not translated, although the data is
(when I have the convert data property set).

Then I wrote an RPGLE server program that receives data queue entries with
key = low values and sends entries with key = blanks. I send it a source
member name, and it loads the data queue with all the source records. I also
modified the VB program to send key = low values and receive key = blanks.

The problem is, the VB program sends the entry, and the RPGLE program
receives it and loads the data queue with the specified source member's
records (I can see this with a DMPOBJ of the data queue), and the VB program
receives the entries (they disappear from the data queue according to
DMPOBJ) but nothing is displayed by the VB program, and debugging appears to
be saying the received text is blank.

The entries placed on the data queue do not appear to be very different. I
noticed at first that the RPGLE program was leaving trailing blanks in the
data queue entry, whereas the VB program left it trailling x'00'.  So I
tried modifying the RPGLE to do that.  Didn't help.

The only other thing is that the data queue was created to include the
sender info. I changed it to not include the sender info. No joy.

What am I missing?

TIA,
Peter Dow
Dow Software Services, Inc.
909 425-0194 voice
909 425-0196 fax

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---




_________________________________________________________
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.