read a file from application server

[Former Member]

Hi

I want to read a file from application server which is in seperated by '|' symbol.

Please give me some sample coding

[Former Member]

Hi,

Check this sample code...

DATA:

len TYPE i,

text(30) type c,

dir(30) TYPE c VALUE '/tmp/test.txt'.

DATA: begin of data OCCURS 0,

matnr type matnr,

werks type werks_d,

end of data.

START-OF-SELECTION.

CLEAR: text.

OPEN DATASET dir FOR INPUT IN TEXT MODE.

DO.

READ DATASET dir INTO text.

IF SY-SUBRC <> 0.

EXIT.

ENDIF.

SPLIT TEXT AT '|' INTO DATA-MATNR DATA-WERKS.

APPEND DATA.

ENDDO.

WRITE: / text.

CLOSE DATASET dir.

Thanks,

Naren

[Former Member]

Thanks a lot naren. I appreciate your help

[Former Member]

solved