Re: IO code/BIFs/C Library

["David Morris" <dmorris@xxxxxxxxxxxxx>]

Tim,

What you describe will work.  The biggest limitation is that your key field 
values cannot 
be passed with operational descriptors.  This means that you cannot easily 
check to see 
that what was passed matches what is expected.  Midrange Computing published an 
article on this technique in December of 1998.  The article describes some of 
the limitations 
and provides a basic example of Mediated I/O.

David Morris

>>> thatzenbeler@clinitech.net 04/24/00 01:04PM >>>
Is there any way to write a procedure wrapper code around the current IO
functions so I can make them work in the examples listed below?  I have
tried but I can seem to make them generic enough.  I don't have file
pointers in rpg (I believe).  But I was thinking there might be a way to use
the C library of routines.  I don't want the Stream IO commands, but I did
notice they had database IO functions.  Does any one know if this approach
will work?


thanks for any insight...
tim


dow     %read(key:file:...) <> %eof
or implied return value.
dow     %read(key:file...)
...
enddo 

and this would be nice...
if          %chain(key:file:...) 
eval       status= 'record found'
else
        if %error 
        eval      status = 'file error of somesort'
        else
        eval      status = 'Record not found'
        endif
endif

+---
| 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
+---