RE: Socket Programming - HL7 Data to Win2k server

[Scott Klement <klemscot@xxxxxxxxxxxx>]

Hi Gerald,

The best way to get started with something like this is knowing exactly
what the other side needs to receive.   If you know that the other side
needs to receive, it's easy for us to help you.

Otherwise, you have to hope that someone on this list is familiar with the
"Biztalk and Microsoft Message Queueing" protocol, which I'm not familiar
with.

For example, if you know that the Win2k server is looking for the
following:
    x'0B' 'Something Here' x'0D0A'

then you just have to write code like that in your program.  Possibly by
doing something like this:

     c                   eval      data = x'0b'
     c                   callp     send(sock: %addr(data): 1: 0)
     c                   eval      data = 'Something Here'
     c                   eval      len = %len(%trimr(data))
     c                   callp     Translate(len: data: 'QTCPASC')
     c                   eval      data = x'0d0a'
     c                   callp     send(sock: %addr(data): 2: 0)

Your original message, however, didn't sound very sure that this is what
you needed to send, however.

I have no idea what the other end of the connection is expecting, and it's
pointless to try to guess.  You need to start by getting the specs for the
application's protocol from the vendor, or whomever defines them.

Or, if you need to figure this out without the specs, use a sniffer (like
Ethereal http://www.ethereal.com) to see exactly what the Windows machine
is sending, and make sure that your program sends the same thing.

Once you've figured out what you need to send, I'd be happy to answer any
coding problems you have over on the RPG400-L mailing list here on
Midrange.com (since this is obviously an RPG issue)

But, until you know what actually NEEDS to be sent, you're just spinning
your wheels :)