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



midrange-l-request@xxxxxxxxxxxx wrote:

>   4. RE: Paging software for the iSeries (Scott Klement)
>
>> I have a CL program that uses the IBM Custom Technology Center socket
>> APIs to send SMTP mail regardless of the state of my SMTP Server. I
>> could also write an ILE RPG program to do the same if I wanted to take
>> the time.
>
>Heh.  I wouldn't even consider doing something like that in CL.  But
>that's neither here nor there :)

Scott:

Sigh. If you can't have first-best, ya' take second-best or go hungry. Someday 
maybe I'll cost-justify compilers beyond CL and others that are "free"; I 
suppose divorce is always possible... :-) In the meantime, with commands like:

  tcptrc     mode( *DATA    ) 

  tcpopen    server( &SERVER ) svrport( &SVRPORT ) +
              netccsid( *ASCII ) +
              retcode( &RETCODE )

  tcpsend    data( &DTABUF ) dtasiz( &DTASIZ ) sndopt( *CRLF ) +
              retcode( &RETCODE )

  tcprecv    buffer( &RCVBUF ) rcvlen( &RCVLEN ) +
              bufsiz( *BASIC ) rcvopt( *CRLF ) +
              retcode( &RETCODE )

  tcprecvw   buffer( &RCVBUF ) rcvlen( &RCVLEN ) +
              bufsiz( *BASIC ) rcvopt( *CRLF ) +
              wait( 5 ) +
              retcode( &RETCODE )

  tcpclose   retcode( &RETCODE )

  tcptrc     mode( *NONE    )

...among quite a few others and appropriate <help> text, a working sockets 
program can be tossed out quickly even by a novice. These make superb 
prototypes for functionality and can then be recast in a different suitable HLL 
-- not to mention that they actually work. (All CPPs courtesy IBM Custom 
Technology Center. CDOs and <help> text were mine.)

Amazing what can be done by searching out freebies, even from IBM.

Tom Liotta

-- 
Tom Liotta
The PowerTech Group, Inc.
19426 68th Avenue South
Kent, WA 98032
Phone  253-872-7788 x313
Fax    253-872-7904
http://www.powertech.com


__________________________________________________________________
McAfee VirusScan Online from the Netscape Network.
Comprehensive protection for your entire computer. Get your free trial today!
http://channels.netscape.com/ns/computing/mcafee/index.jsp?promo=393397

Get AOL Instant Messenger 5.1 free of charge.  Download Now!
http://aim.aol.com/aimnew/Aim/register.adp?promo=380455

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.