Eigenschaften einer Datei

Code: Alles auswählen.

REPORT zforum66 .
TABLES epsf.
PARAMETERS dir  LIKE epsf-epsdirnam DEFAULT '/home/'.
PARAMETERS file LIKE epsf-epsfilnam DEFAULT 'test001.dat'.
DATA mtime TYPE p DECIMALS 0.
DATA time(10).
DATA date LIKE sy-datum.


CALL FUNCTION 'EPS_GET_FILE_ATTRIBUTES'
     EXPORTING
          file_name              = file
          dir_name               = dir
     IMPORTING
          file_size              = epsf-epsfilsiz
          file_owner             = epsf-epsfilown
          file_mode              = epsf-epsfilmod
          file_type              = epsf-epsfiltyp
          file_mtime             = mtime
     EXCEPTIONS
          read_directory_failed  = 1
          read_attributes_failed = 2
          OTHERS                 = 3.





PERFORM p6_to_date_time_tz(rstr0400) USING mtime
                                           time
                                           date.


WRITE: / mtime,
       / date, time.