Esta funcion te ayudara:
TABLES epsf.
PARAMETERS dir LIKE epsf-epsdirnam DEFAULT '/home/user1/'.
PARAMETERS file LIKE epsf-epsfilnam DEFAULT 'file001.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.
|