Re: Source name vs Object name was: module/pgm analysis (lines of code)

Rob

Exactly - I chose not to mention that. Especially in a shop that might use a 'C' suffix for CLLE or an 'R' for RPGLE - the actual program is neither, and I've created the program without a suffix. Not always - another approach is to use the name of the entry module - eh - you pays your money, etc.

The example I gave came from a System 36 shop.

Now once you're down to the module level, I submit that the names and objects should match for simplest maintenance.

Vern

At 12:52 PM 12/17/2007, you wrote:

Vern,

There may be a good reason NOT to name the source after an object.
If I have a multiple module ILE program, even if one of the modules is
"primary" I won't name the program after it. That makes it too easy for
someone to "assume" that I compile the main module alone to make that
program. If the person tries to work outside of the change management
software I want to at least force them to look at the modules composing
that program.

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





Vernon Hamberg <vhamberg@xxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
12/17/2007 12:08 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Re: module/pgm analysis (lines of code)






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

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


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