Re: RPG "code crawler and resource resolver"

["Rory Hewitt" <roryhewitt@xxxxxxxxx>]

Aaron,

Could you parse the compilation spooled listing rather than the source
itself?

Rory


On 6/27/07, albartell <albartell@xxxxxxxxx> wrote:
> Hi everyone,
>
> I am working on a project where I need to programmatically gather
> information about an RPG *PGM's/*SRVPGM's input and output
> parameters.  Take
> the following code for example:
>
>     p Cust_getRec     b                   export
>     d Cust_getRec     pi
>     d  pError                             like(Cust_Error)
>     d  pCustRec                           likeds(CM)
>     d  pCustNbr                           like(CM.CUSTNBR)
>      /free
>
>         clear pError;
>         clear pCustRec;
>         chain(n) pCustNbr CUSTMST;
>         if not %found;
>           pError = 'Customer Not Found';
>         else;
>           pCustRec = CM;
>         endif;
>
>      /end-free
>     p                 e
>
> I was confident in the ease of gathering this information until I came
> across keywords LIKEDS/LIKE/etc.  This obviously means that source
> crawlers
> would have to crawl even further to find the definition of the LIKExx
> keywords - pretty much performing the steps of a compiler for resource
> resolution.  I was intrigued by the PCML one could generate during a
> compile
> until I found out it threw errors when "illegal PCML parameters" were used
> (i.e. using a non-int pass-back parm).
>
> Here is what I am wondering... does anybody have code developed to
> appropriately query an existing prototype/procedureinterface/*ENTRY*PLIST
> source that they would be willing to share?  You don't have to post it
> online, if necessary contact me offline: aaronbartell at gmail dot com.
>
> Thanks in advance,
> Aaron Bartell
> http://mowyourlawn.com
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.