Number of records in given path of application server

Question

How
to find number of records in given path of
application server

Answer 1

I think that this almost works.
report zrich_0001.
data: begin of itab occurs 0,
      rec(1000) type c,
      end of itab.
data: wa(1000) type c.
data: number_of_files type i.
data: number_of_records type i.
data: tot_size type i.
data: tot_number_of_records  type i.
data: p_file type localfile.
data: ifiles type table of  salfldir with header line.
data: file type string.
parameters: p_path type salfile-longname
                    default '/usr/sap/TST/DVEBMGS01/data/'.
call function 'RZL_READ_DIR_LOCAL'
     exporting
          name           = p_path
     tables
          file_tbl       = ifiles
     exceptions
          argument_error = 1
          not_found      = 2
          others         = 3.
loop at ifiles.
  clear itab. refresh itab.
  concatenate p_path ifiles-name into file.
  catch system-exceptions dataset_read_error  = 1.
    open dataset file for input in text mode.
    if sy-subrc = 0.
      do.
        read dataset file into itab.
        if sy-subrc <> 0.
          exit.
        endif.
        append itab.
      enddo.
    endif.
    close dataset file.
  endcatch.
  if sy-subrc = 0.
    number_of_files = number_of_files + 1.
    describe table itab lines number_of_records .
    tot_number_of_records
        = tot_number_of_records  + number_of_records .
    tot_size = tot_size + ifiles-size.
    write:/ ifiles-name, ifiles-size,  number_of_records.
  endif.
endloop.
Regards,
Rich Heilman