× 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.


  1.  Home
  2. MIDRANGE-L
  3. December 2003

RE: Socket Programming - HL7 Data to Win2k server


Gerald,

Yes, the ASCII xlate tables do all sorts of strange things. Best reference I ever found is the OLD "Asynchronous Communications Programers Guide" sc21-9592-2 (Note, they still shipped in white binders not HTML, when this one came.) Page-C3 shows that a EBCDIC x15 NL & x25 LF XLATE to x0A LF, but x0A is NULL. However, x02 STX, x03 ETX & x0D CR do map. Coming back if you xlate the stream the x0A will become a x15 EBCDIC NL.

However, I use something similar to that below, although I usually build the stream in a buffer and send the whole thing once, inserting my control characters outside the Xlate function as shown. The other option available is to build my own xlate tables for the project with CRTTBL

Lastly, it's a little unusual to see an ASCII STX x02 with out the matching ETX x03 so you should find out more about the data stream if you can..

        Hope this helps.
        JMS...


At 05:53 PM 12/9/2003, you wrote: 
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.


Jeffrey Silberberg
CompuDesigns, Inc.
Atlanta, GA. 30350

As an Amazon Associate we earn from qualifying purchases.

This thread ...
Replies:
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.