IO code/BIFs/C Library

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