DATA: GS_HEADER TYPE THEAD .
DATA: GT_LTXTS TYPE STANDARD TABLE OF TLINE .
DATA: LW_LTXT TYPE TLINE .
START-OF-SELECTION .
CLEAR GT_LTXTS[] .
CLEAR LW_LTXT .
*
原因在于导入的语言有不相同。
" LW_LTXT-TDFORMAT = '1'.
LW_LTXT-TDLINE = '嘎嘎嘎嘎嘎过过过过'.
APPEND LW_LTXT TO GT_LTXTS .
CLEAR GS_HEADER.
GS_HEADER-TDOBJECT = 'VBBK' .
GS_HEADER-TDID = 'Z003'.
GS_HEADER-TDSPRAS = SY-LANGU.
GS_HEADER-TDNAME = '0080015801'.
CALL FUNCTION 'SAVE_TEXT'
EXPORTING
CLIENT = SY-MANDT
HEADER = GS_HEADER
SAVEMODE_DIRECT = 'X'
TABLES
LINES = GT_LTXTS.
IF SY-SUBRC <> 0.
ROLLBACK WORK .
ELSE.
COMMIT WORK AND WAIT .
ENDIF.