RE: Having problems accessing IFS from RPGIV

[Alan Campin <Alan.Campin@xxxxxxxxxxxxx>]

The thing that comes up for me in this discussion is why are we reinventing
the same code again and again?

A week ago, I put out a message on an IFS service program that I would be
glad to send to anyone who wants it, compiled and ready to use. The library
has been in use for over a year and others have written the same thing. 

We shouldn't be having to write the same stuff again and again. That is the
whole concept of ILE. Build it once and reuse.

As I have said before, we need a GNU library for AS/400 ILE programs.

Almost wonder if this should come from or lead by IBM. 

-----Original Message-----
From: Joel Fritz [mailto:JFritz@sharperimage.com]
Sent: Thursday, January 13, 2000 11:21 AM
To: 'RPG400-L@midrange.com'
Subject: RE: Having problems accessing IFS from RPGIV


Helps if you are familiar with C file I/O.  

I think it's the only way to get at files in the IFS through RPG without
copying them to a database file first.  I like this kind of thing because it
shows how ILE give us useful tools we never had before and enables us to use
them in a language we do know.  

The scary thing for me is that I still haven't learned to use the old tools
very well.

-------------------------------------------
A mind is a terrible thing to use.

Joel Fritz 
> -----Original Message-----
> From: boothm@earth.goddard.edu [mailto:boothm@earth.goddard.edu]
> Sent: Thursday, January 13, 2000 9:39 AM
> To: RPG400-L@midrange.com
> Subject: Re: Having problems accessing IFS from RPGIV
> 
> 
> I know, I know, we gotta keep up, we can't be old-fashioned, 
> we gotta get 
> with the program...  but gee whizzzzz... 
> 
> where's there any RPG at all in this mystifying piece of 
> RPGized-C++ code? 
>  I'd bet that there are not 5 out of 100 qualified RPG 
> programmers that 
> can even begin to understand what is happening here.
> 
> If someone asked me to do the same function in real RPG code 
> I would be 
> absolutely stuck. 
> 
> _______________________
> Booth Martin
> boothm@earth.goddard.edu
> http://www.spy.net/~booth
> _______________________
> 
> 
> 
> 
> MSievers@promega.com
> Sent by: owner-rpg400-l@midrange.com
> 01/13/2000 11:11 AM
> Please respond to RPG400-L
> 
>  
>         To:     RPG400-L@midrange.com
>         cc: 
>         Subject:        Having problems accessing IFS from RPGIV
> 
> 
> D errnoP          S               * 
> D errno           S             10I 0 BASED(errnoP)
> 
> C                   Eval      FileHandle=open(%addr(FilePath):oflag)
> C                   EVAL      errnoP = errnoF 
> 
> 
>> 
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---