Re: Module source naming schemes

["paul cunnane" <paul@xxxxxxxxxxx>]

> So, all I really need to know is if it's the first time or not, and if it
is the
> first time, what the username and system name are.  Hmm.. perhaps 2 calls
then.
>
> RtvNetFIni(UserName, SysName)
> RtvNetFNxt()

Just prototype RtvNetF with two *NOPASS arguments.  At the start of the
procedure, check the %parms BIF.  If it is 2, get the list of files and
return the first.  If it is 0, return the next file from the current list.
If it is 1, or if the first call has no parameters, you are into exception
handling territory...

--
Paul

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