RE: Search for SELECT / FROM parameters in a CGI source from RPG

>>Easiest way, read a single character
>>at a time into a buffer until you hit
>>an End of line character.  Then you
>>have a line.  Create this in a
>>subroutine once and be done with it.
>
>Sounds a bit time consuming.  If you
>can read one character at a time, can
>you specify to pull in a block at a time.
>Kind of like, %subst(IFSFILE: 501: 500)

And when your search string spans blocks?

500 501 502 503
S   E   L   E

The first block ends with "S" whilst the second block begins with "ELECT"  a
%scan will not find "SELECT"  Back to the first amplification of the
original question:

>I DO NOT have the stream file physically
>on the AS400 and is not defined in anyway
>on the RPG program.  I am NOT doing open,
>read,close to the source.  What I was
>referring to is that I am reading the
>directory path and I am reading the valid
>link of the source I have to read but that
>is it.  I do not know how to get into the
>source and check for these strings...from
>the RPG program and without creating a
>copy of the stream file on the AS400.

You wouldn't describe the stream file in RPG; it's a stream of bytes.  It
has no innate "layout" like a QSYS.LIB file does.  How are you reading the
directory if it isn't on your iSeries?  Generally I would say that if your
program can read the directory it can do an open() on the file.  If that
doesn't work in this instance, perhaps you could you describe the
environment a bit more to help us understand your requirements better.

  --buck

"This box Rocks!" - related to 2002 NE IBM
Conference attendees by IBM's Stephanie Joy