The Retrieve Program Information returns source information only for OPM programs, I believe. It only gives module counts for ILE programs. To get source for ILE programs, one needs to use the List ILE Program Information. There is a format for listing modules and their source information. Similarly, there is also a List Service Program Information.

Of course, one first needs to do a DSPOBJD to an outfile, perhaps, to get the list of programs and service programs and whether they are OPM or ILE. The object attribute field will tell you that. Could also use the List Objects API. There you want the extended object attribute field of format OBJL0200 or higher.

Then there is the matter of embedded SQL - but at least one should be able to get to the original source - unless you use a scheme where the source is not the same name as the object - don't laugh - saw that once - and also saw the contractor who did it, escorted out the door summarily.

HTH
Vern

At 10:16 AM 12/17/2007, you wrote:

See APIs.

There are some Retrieve Program Information API's. Based on those you
should be able to ascertain what modules make up those programs. Where
those source members were (at compile time). Then use the Retrieve Member
Description API to find out how many lines of source were in that.

Should be comparable to
DSPPGM PGM(ROUTINES/ACCTDEL) DETAIL(*MODULE)
and
RTVMBRD FILE(ROUTINES/QRPGLESRC) MBR(ACCTDEL)

Rob Berendt
--
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





"Jay Vaughn" <jayv@xxxxxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
12/17/2007 11:07 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
rpg400-l@xxxxxxxxxxxx
cc

Subject
module/pgm analysis (lines of code)






I have been given the task (with a very short deadline) of examining
different programs and figuring out the total lines of code that make up
that pgm. Program and all modules are to be included.

Any quick way to do this via os/400 commands?

Thanks,

Jay Vaughn
Senior I5 Programmer/Analyst
RateWatch
(P) 251.633.8929
(F) 251.633.8929
www.rate-watch.com


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.