1. 程式人生 > >DATASET 文件的打開、讀取、寫入、關閉 TAB鍵分開

DATASET 文件的打開、讀取、寫入、關閉 TAB鍵分開

out ats 文件 ssa ESS AS open nat 代碼

DATSET 打開、寫入文件數據,代碼如下:

DATA:

CNS_TAB TYPE CHAR1 VALUE CL_ABAP_CHAR_UTILITIES => HORIZONTAL_TAB.

OPEN DATASET W_FILPATH FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.

IF SY-SUBRC <> 0.

MESSAGE E043(ZTHL1) WITH W_FILPATH.

ENDIF.

LOOP AT TD_ERRFILE INTO ST_ERRFILE.

CONCATENATE ST_ERRFILE-MBLNR

ST_ERRFILE-ZEILE

INTO LW_OUTDATA

SEPARATED BY CNS_TAB.

TRANSFER LW_OUTDATA TO W_FILPATH.

ENDLOOP.

CLOSE DATASET W_FILPATH.

讀取.TXT文件內容到內表,TAB鍵分開。

OPEN DATASET P_SVINFL FOR INPUT IN LEGACY TEXT MODE.

READ DATASET P_SVINFL INTO LW_LINE.

IF SY-SUBRC = 0.

SPLIT LW_LINE AT CNS_TAB

INTO TH_INPUT_MATL

TH_INPUT_PLANT.

APPEND TH_INPUT TO TD_INPUT.

ENDIF.

DATASET 文件的打開、讀取、寫入、關閉 TAB鍵分開