Re: RE: COUNTING LINES OF CODE

Thanks, Mike; so much easier, as not all our source files begin with Q.

Fiona




"Mike Naughton" <mnaughton@juddwire.com>@midrange.com on 11/07/2001
19:03:46

Please respond to MIDRANGE-L@midrange.com

Sent by:  owner-midrange-l@midrange.com


To:   MIDRANGE-L@midrange.com
cc:
Subject:  Re: RE: COUNTING LINES OF CODE


THIS MESSAGE ORIGINATED ON THE INTERNET - Please read the detailed
disclaimer below.
----------------------------------------------------------------------

Hi Fiona,

If you use the command DSPFD FILE(<YourSourceLib>/*ALL) TYPE(*BASATR)
OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(<YourLib>/<OutFileName>), you'll get
an output file that has a field "ATDTAT" whose value is "D" for data files
and "S" for source files. Just select all the "S"es and you'll be all set.
. .

hth

MIDRANGE-L@midrange.com writes:
>I would have started off with a dspobjd to obtain a list of source files,
>but realised that which an object may have a distinct PF-SRC attribute
>in PDM, a dspobjd gives a type of *FILE & a truncated attribute of PF.
>Very helpful, Rochester.


Mike Naughton
Senior Programmer/Analyst
Judd Wire, Inc.
124 Turnpike Road
Turners Falls, MA  01376
413-863-4357 x444
mnaughton@juddwire.com

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to
MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---



----------------------------------------------------------------------
The following message has been automatically added by the mail gateway to
comply with a Royal & Sun Alliance IT Security requirement:

As this email arrived via the Internet you should be cautious about its
origin and content. Replies which contain sensitive information or
legal/contractual obligations are particularly vulnerable. In these cases
you should not reply unless you are authorised to do so, and adequate
encryption is employed.

If you have any questions, please speak to your local desktop support team
or IT security contact.
----------------------------------------------------------------------



+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---