Google Search - Blog...........

Showing posts with label open dataset for input in text mode encoding default.. Show all posts
Showing posts with label open dataset for input in text mode encoding default.. Show all posts

Split Command In Files ABAP Report

report zsplit_command_in_files .


parameters: p_file type localfile default '/usr/sap/TST/SYS/Test.txt'.

data: begin of itab occurs 0,
fielp_file(20) type c,
field2(20) type c,
field3(20) type c,
end of itab.
data: wa type string.

CONSTANTS: con_tab TYPE x VALUE '09'.

* if you have a newer version, then you can use this instead.
* constants:
* con_tab type c value cl_abap_char_utilities=>HORIZONTAL_TAB.[/b]


start-of-selection.

open dataset p_file for input in text mode encoding default.
if sy-subrc = 0.
do.
read dataset p_file into wa.
if sy-subrc ne 0.
exit.
endif.

* Here you are splitting at the hex value of "tab" not at
* the # sign.

split wa at con_tab into itab-fielp_file itab-field2 itab-field3.
append itab.
enddo.
endif.
close dataset p_file.