How to calculate Lines of code

mahapatra · New User Joined: 16 Aug 2006 Posts: 3

Can any body tell me how to calculate the total lines of code in an application...I dont want the comments in the program...only the valid codes..

vicky10001 · Active User Joined: 13 Jul 2005 Posts: 136

Please Use below comments

Please Should use View mode onlY

1- x all "*" 7:
2- del x all;
3. num on/off

ofer71 · Posted: Wed Aug 16, 2006 4:48 pm

Try the following edit-macro:

mahapatra · New User Joined: 16 Aug 2006 Posts: 3

Thanks Vicky...I tried with 1st step and then deduct the no of comments line from Size and got the actual Lines of code including the Blank line....So Do u know any command to elliminate those blank lines from count...

mahapatra · New User Joined: 16 Aug 2006 Posts: 3

Thanks Ofer...thanx for the MACRO...really a nice one to count....I appriciate ur effort..

ofer71 · Posted: Wed Aug 16, 2006 6:46 pm

To count blank lines, try the following edit-macro:

vicky10001 · Active User Joined: 13 Jul 2005 Posts: 136

Q)Do u know any command to elliminate those blank lines from count...

Del X all;

ofer71 · Posted: Thu Aug 17, 2006 6:51 pm

In the same manner:

vicky10001 · Active User Joined: 13 Jul 2005 Posts: 136

Please Use command

1 step -x all ' ';
2 step - Del x all;

If you have any questions let me know

ofer71 · Posted: Thu Aug 17, 2006 7:26 pm

vicky10001 - You can't just exclude all lines with ' '. It will exclude every line... You have to delete only lines that contain all blanks...

O.

vicky10001 · Active User Joined: 13 Jul 2005 Posts: 136

Sorry .....Typed mistake

1 step - X all " Need to give maximum space ";

2 step -Del x all;

Ex :

X all " ";
Del x all;

Sridevi_C · Posted: Thu Aug 17, 2006 8:28 pm

Vicky,

It doesn't work as the command line is less than column 8 to 72 range of executable code :-(

Thanks.

ofer71 · Posted: Thu Aug 17, 2006 9:31 pm

True, and you can't expand the command line in ISPF editor.

O.

baidyanath_biswas · New User Joined: 04 Sep 2006 Posts: 11

In the above macro,where do u mention the file name containing the program?

ofer71 · Posted: Wed Sep 20, 2006 1:13 pm

This is an Edit-Macro. You invoke it from within your editor while editing the program.

O.

DavidatK · Posted: Fri Sep 22, 2006 12:53 am

Try this:

X ALL
F P'?' ALL
X '*' 7 ALL
DELETE ALL X
RENUM

You can see the number of lines of code

CANCEL <=== be sure to do this

Dave

mmwife · Super Moderator Joined: 30 May 2003 Posts: 1592

For those that are prohibited/discouraged from using edit macros, you can try this variation on Vicky's suggestion:

Be sure to use VIEW or V not EDIT (E).

enter cmd line: x all;f all ' ' 7
enter cmd line: x all 7 'put as many spaces here as can fit the cmd line '
f all nx ' ' 7

The edit msg in the upper RH corner of the screen will tell you the # of lines found. This is the # of lines of code in the pgm, excluding code generated by copybooks.

You may pick up a few compiler directing stmts that technically aren't "code".

Oops, I didn't see David's entry till I edited this post. I kind of like this variation of his better than mine:

Use View.
x all;f all 7 72 p'^';x all 7 P'^';f all nx 7 ' '

The found cnt in the upper RH of the screen s/b the # of code lines.

The 7 72 above makes sure you don't pick up a blank line that has info in 1-6 or 73-80.

PL1user · New User Joined: 26 Nov 2008 Posts: 13 Location: UK

Hi,

Just came through this post...

Would it be possible to get the total lines of code for the programs in the entire program library.

E.G: If there are 10k programs in my library, would I be able to calculate the lines of code for the entire set in one go?

I am completely new to REXX but I now have a quick requirement to calculate the lines of code...and REXX should be the quickest and easiest way.

Any sort of help would be of great help.

Thanks.