Mainframe, MVS and zOS Discussion

Posted: **Sun Jan 12, 2014 3:59 pm**

Hi,

I'm trying to find out a way of knowing the lines of codes in my program using SyncSort. Actually, for a repository purpose, we've to maintain the lines of codes for a given program and this is a regular task. Could someone please suggest how to proceed?

Posted: **Mon Jan 13, 2014 11:42 am**

Try this

Code: Select all

//S1    EXEC  PGM=SORT                                        
//SYSOUT    DD  SYSOUT=*                                      
//SORTIN DD DSN=<INPUT FILE>,DISP=SHR                                
//SORTOUT DD SYSOUT=*                                          
//SYSIN    DD    *                                            
  SORT FIELDS=COPY                                              
  OUTFIL REMOVECC,                                              
  TRAILER1=('NUMBER OF LINES IN PROGRAM :',COUNT=(M11,LENGTH=8))      
/*

Posted: **Mon Jan 20, 2014 1:34 pm**

Thanks Pandora. This code helps me.

Thanks.

Mainframe, MVS and zOS Discussion

Count the lines of codes in a program and sort.

Count the lines of codes in a program and sort.

Re: Count the lines of codes in a program and sort.

Re: Count the lines of codes in a program and sort.