Re: MIDRANGE-L Digest V3 #720 -- MIDRANGE-L

> Hi there,
>   Some of you may recongnize me I was at Progisys inc. a few weeks ago.
> I would like to take some outputs from a PC Delphi application (I don't 
> know the version of delphi yet), and insert them into an AS/400 database.  
> Now it's the first time I'm going to do this and I guess it won't be the 
> last.
>   How could this be done? I've thought of having the Delphi application
> calling an RPG program that would receive the data through some parameters.
> But then I started wonder if there was a limit for the lenght of the
> parameters passed to an RPG program.  And finally I wondered if I was at
> least able to pass parameters to a RPG program through a Delphi program.
> And is there data conversion process to do?(ex :ASCII to EBCDIC).
> 
>   Anyway maybe I'm focusing on the wrong solution.
> 
> Anybody has an idea?
> 
> Thanks In advance!
> 
> 
> Pascal Bellerose
> Programmeur-Analyste
> Portbec inc.


 Hi Pascal,

   I did two major projects with Delphi and the AS/400; one with Advanced
BusinessLink's Windows communications DLL to their AS/400 server and one with
Delphi/400.  Both were very successful and were rolled out to access the
AS/400 over our WAN intranet and to customers to access by phone or Internet.

   The Delphi/400 product supported calls to RPG programs passing buffers and
ASCII to EBCDIC translation was performed.  But I haven't dealt with the
product for a couple of years.  The Delphi/400 programming was turned over to
Windows programmers who knew nothing about the AS/400, and they had no problem
other than a sign on problem when the password expired.  Supposed to have been
fixed a long time ago.  When I wrote my Delphi stuff, all the business logic
was on the AS/400 but the Delphi program provided powerful drill downs and tab
navigation.  Each button was an API call to an AS/400 server that cased to a
different API routines.  The only translation I ever did was writing a Delphi
routine to convert negative numbers from a trailing alpha character to a
preceding - and the correct trailing number.  I'll e-mail you that routine if
you don't already do that.

   I know the usual approach is SQL and running programs through SQL but I
prefer the dedicated TCP/IP sockets servers of Delphi/400 and ASNA Caviar
VRPG.  Just my opinion.

 Regards,
 Ralph
+---
| 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
+---