Y_TEXT001-(保存长文本)
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 = '*' .
lw_ltxt-tdline = 'this is create by save_text .'.
APPEND lw_ltxt TO gt_ltxts .
CLEAR gs_header .
gs_header-tdobject = 'VBBK' .
gs_header-tdid = '0001'.
gs_header-tdspras = '3'.
gs_header-tdname = '0080000001'.
CALL FUNCTION 'SAVE_TEXT'
EXPORTING
client = sy-mandt
header = gs_header
* INSERT = ' '
* SAVEMODE_DIRECT = ' '
* OWNER_SPECIFIED = ' '
* LOCAL_CAT = ' '
* IMPORTING
* FUNCTION =
* NEWHEADER =
TABLES
lines = gt_ltxts .
* EXCEPTIONS
* ID = 1
* LANGUAGE = 2
* NAME = 3
* OBJECT = 4
* OTHERS = 5
.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'READ_TEXT'
EXPORTING
client = sy-mandt
id = '0001'
language = '3'
name = '0080000001'
object = 'VBBK'
* ARCHIVE_HANDLE = 0
* LOCAL_CAT = ' '
IMPORTING
header = gs_header
TABLES
lines = gt_ltxts
EXCEPTIONS
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
wrong_access_to_archive = 7
OTHERS = 8
.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
LOOP AT gt_ltxts INTO lw_ltxt .
WRITE / lw_ltxt-tdline .
ENDLOOP.
最新文章
- SQLServer数据导入Mongodb
- mysql配置mysql-proxy读写分离
- 自己写的一个Yeoman的Generator-Require-Angularjs
- vi 命令 用法
- 编写高质量代码改善C#程序的157个建议[匿名类型、Lambda、延迟求值和主动求值]
- CL.exe的 /D 选项, Preprocessor Macro预处理器宏定义
- android 横竖屏限制如何配置
- node.js在windows下的学习笔记(10)---URL模块
- (转载)NET流操作
- js 自定义方法 实现停留几秒 sleep
- (1) 类构造块,this(),static,单例模式串讲
- 面向对象编程之super内置函数的用法
- script 有哪个属性可以让它不立即执行 defer,async
- ubuntu16.04+ROS安装kinectV1
- Java的家庭记账本程序(B)
- ASP.NET MVC 路由篇二
- kotlin语法使用笔记
- failed to load class ";org.sl4j.impl.StaticLoggerBinder";
- 浅析java修饰符之public default protected private static final abstract
- cuffquant 定量的结果全部为-nan