* & ------------------------------------------------ --------------------- ** & report zsap_sw_4 ** & ** & ------------------ -------------------------------------------------- - ** & ** & ** & ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ----------------------------- *
Report zsap_sw_4.
************************* Local to Server *************** *************
* Data: Begin of Itab Occurs 0, * Line (30), * End of itab. ** Data: f_name (20) value 'f: /temp3.csv'. ** itab-line = '1, 1, 1 '. * Append itab. * ITAB-line =' 2, 2, 2 '. * Append itab. * Itab-line =' 3, 3, 3 '. * Append itab. ** Open Dataset F_Name for Output in Text Mode Encoding default. * Loop at itab. * Transfer itab-line to f_name. * Endloop. * Close DataSet f_name.
******************************************************************************************************************************************************************************************************************************************************************************************************* **********************************
Data: Begin of Itab Occurs 0, Line (30), END OF ITAB.
DATA: F_NAME (20) Value 'f: /temp3.csv'.
* DATA: T_STRING (40).
Open DataSet F_Name for Input. Clear: ITAB, ITAB []. Do 3 Times. Read DataSet F_Name Into Itab-line. Append itab. Enddo. Close DataSet F_Name.
Loop at itab. Write: / itab-line. Endloop.