topic Re: Function module to get files from application server into internal table in Application Development and Automation Discussions

Function module to get files from application server into internal table

ram_sahoo — Thu, 26 Jul 2018 07:34:28 GMT

Hello Friends,

I am looking function modules for get files from application server path to internal table, I got some function modules but it is not working. Please suggest.

RZL_READ_DIR_LOCAL

EPS_GET_DIRECTORY_LISTING

both are giving error file not found, but if I go with same path in AL11, I can see the files.

Thanks.

Re: Function module to get files from application server into internal table

ArthurParisius — Thu, 26 Jul 2018 08:51:23 GMT

I don't know of any function modules but here's something I've seen used in the past.

data: begin of lt_tabl occurs 0,
 line type c length 2000,
 end of lt_tabl.
data: ls_line type c length 2000.

data: i_tab type table of string.

data: l_f_dir type c length 128,
 l_t_dir type c length 128,
 l_dir type c length 128,
 l_file type c length 30.
 
 l_file = '*.*'.
 l_t_dir = '/usr/sap/trans/log/'.
 concatenate l_t_dir l_file into l_f_dir.

* get files in directory.
 clear: l_dir.
 l_dir(7) = 'ls -ld '.
 l_dir+7(45) = l_f_dir.

 refresh lt_tabl.
 call 'SYSTEM' id 'COMMAND' field l_dir
 id 'TAB' field lt_tabl-*sys*.

 loop at lt_tabl into ls_line.
 refresh i_tab.
 clear l_file.
 split ls_line at '/' into table i_tab.
 check not i_tab[] is initial.
 loop at i_tab into l_file.
 endloop.

 endloop.

Re: Function module to get files from application server into internal table

retired_member — Thu, 26 Jul 2018 09:38:25 GMT

Very bad idea!

https://blogs.sap.com/2013/03/06/a-word-about-call-system/

Re: Function module to get files from application server into internal table

retired_member — Thu, 26 Jul 2018 09:39:49 GMT

R.t.fantastic.m.

https://help.sap.com/http.svc/rc/abapdocu_752_index_htm/7.52/en-US/index.htm?file=abenabap_language_files.htm

Re: Function module to get files from application server into internal table

ArthurParisius — Thu, 26 Jul 2018 09:51:39 GMT

Hi Horst,

Thanks for the warning. As I said in my answer, it's something I came across in the past that fulfilled the purpose. Knowing the possible issues thanks to your link will have me looking for alternatives.

Regards,
Arthur

Re: Function module to get files from application server into internal table

ArthurParisius — Thu, 26 Jul 2018 11:00:30 GMT

The link you provided is for presentation server not application server.

Re: Function module to get files from application server into internal table

matt — Thu, 26 Jul 2018 12:15:41 GMT

"Not working"

Is that the actual error message you get?

Re: Function module to get files from application server into internal table

ram_sahoo — Thu, 26 Jul 2018 12:17:59 GMT

got solution I was trying in SE37, If we try with program level these function modules will work fine.

Re: Function module to get files from application server into internal table

RaymondGiuseppi — Thu, 26 Jul 2018 13:20:46 GMT

I Suppose lowercase checkbox in SE37 test mode... (again)

Re: Function module to get files from application server into internal table

RaymondGiuseppi — Thu, 26 Jul 2018 13:21:54 GMT

You only read the 2 or 3 first lines?

Re: Function module to get files from application server into internal table

ram_sahoo — Thu, 26 Jul 2018 13:56:22 GMT

Hello Guys,

Now i got new requirement while collecting files from path should filter with date as per user entered. Any one can suggest how to achieve this kind of requirement.

Thanks.

Re: Function module to get files from application server into internal table

matt — Thu, 26 Jul 2018 14:53:38 GMT

Looks like you were right Raymond!

Re: Function module to get files from application server into internal table

matt — Thu, 26 Jul 2018 14:54:59 GMT

Ask a new question as a new question. Don't continue this one. Though you might confirm that your problem was caused because you didn't check the "lower case" check box when testing in SE37.

Re: Function module to get files from application server into internal table

roberto_forti — Thu, 26 Jul 2018 16:33:04 GMT

Hi Sahoo,

Try this FM TXW_FILE_OPEN_FOR_READ or creating "Z" Class~method or FM with below ABAP code.

...
OPEN DATASET <filename> FOR ... IN TEXT MODE ENCODING DEFAULT.

IF sy-subrc NE 0.
   MESSAGE or EXCEPTION...
ELSE.
   DO.
      READ DATASET <filename> INTO work-area.
      IF sy-subrc NE 0.
         EXIT.
      ELSE.
         APPEND work-area TO internal table.
      ENDIF.
      CLEAR: work-area.
   ENDDO.
ENDIF.

CLOSE DATASET <filename>.
IF sy-subrc NE 0.
   MESSAGE or EXCEPTION...
ENDIF.
...

Regards,