报告zrtext。

TABLES：rs38m，文本池。

数据：i_tab发生次数0的开始，

名称TYPE程序名称。

包括结构文本池。

数据：i_tab的结尾。

数据：文本（如带有标题行的文本池OCCURS 50）

w_text LIKE文本池。

DATA：就像i_tab发生的行数0，

第TYPE I行，

myalv类型参考cl_salv_table，

myfunctions类型参考cl_salv_functions_list，

mycolumns类型参考cl_salv_columns_table。

SELECTION-SCREEN：以图块标题文本001开始的b块。

SELECT-OPTIONS：用于rs38m程序的zprg。

SELECTION-SCREEN：块b的结尾。

开始选择。

从reposrcSELECT progname到i_tab-name在zprg中的progname。

READ TEXTPOOL i_tab-name INTO文本语言'E'。

循环输入文本到w_text。 " ID EQ'I'。

将w_text移动到i_tab。

APPEND i_tab到i_tab。

ENDLOOP。

ENDSELECT。

it [] = i_tab []。

尝试。

呼叫方法cl_salv_table =>工厂

导入

r_salv_table = myalv

改变

t_table = it []。

捕获cx_salv_msg。

ENDTRY。

描述表i_tab的行数。

消息s375（po）带有行'''找到记录..'。

mycolumns = myalv-> get_columns（）。

mycolumns-> set_optimize（）。

myfunctions = myalv-> get_functions（）。

myfunctions-> set_all（）。

调用方法myalv->显示。

此代码将向您显示所有文本符号和选择文本以及报告标题。

给予喜欢和奖励..????

只是一个小小的集成即可管理更多语言的文本…:-)

报告zrtext。

TABLES：rs38m，textpool。
数据：i_tab的开始OCCURS 0，
name TYPE progname，
像sy-langu这样的spras。
包含结构化textpool。
数据：END OF i_tab。
数据：文本形式的文本池OCCURS 50，带有标题行，
w_text LIKE文本池的文本。
数据：它像i_tab OCCURS的行0，
行类型i，
myalv类型参考 cl_salv_table，
myfunctions类型参考至cl_salv_functions_list，
mycolumns类型参考，cl_salv_columns_table。 rs38m-programm。
选择项：sy-langu的S_spras没有间隔。
选择画面：b块的结尾。


数据：tb_langu类似于t002发生0 WITH HEADER LINEER 。

初始化。


s_spras-sign ='I'。
s_spras-option ='EQ'。

s_spras-low ='I' 。 "意大利语
附加s_spras。

s_spras-low ='E'。"英语
附加s_spras。

s_spras-low ='S'。 "西班牙语
附加s_spras。

选择开始。

清除tb_langu。

从t002中选择*到表tb_langu中，其中s_spras中出现了spras。


检查tb_langu []是否为INITIAL。

从proposname从reposrcINTO选择i_tab-name WHERE progname在s_prg。
在tb_langu处循环。 语言tb_langu-spras。
将文本循环插入w_text。
将w_text移动到i_tab。
i_tab-spras = tb_langu-spras。
APPEND i_tab到i_tab。
ENDLOOP。 > ENDLOOP。
ENDSELECT。

按名称ID键spras排序i_tab。

it [] = i_tab []。
尝试。
调用方法cl_salv_table => factory
导入
r_salv_table = myalv
更改
t_table = it []。
捕获cx_salv_msg。
ENDTRY。

描述表i_tab LINES行。
消息 s375（po）带有行'''找到记录..'。
mycolumns = myalv-> get_columns（）。
mycolumns-> set_optimize（）。
myfunctions = myalv-> get_functions（）。< br> myfunctions-> set_all（ ）。
调用方法myalv->显示。

这些不会存储在可以在se11中查看的SAP表中。

这些以原始格式存储。

您可以使用READ TEXTPOOL语句进行读取

READ_TEXTELEMENT_FROM_REPORT FM可能有用。

嗨

所有这些文本都存储在文本池中，而不存储在任何std中。 桌子。

要检索这些信息，您必须使用如下语句：

读取文本池到itab语言<语言> [STATE状态]。

此语句从存储库中读取lang中指定语言的文本池和prog中指定的程序的文本元素，并将它们放入内部表itab中。 Itab的先前内容已删除。 如果无法读取文本元素，则itab的内容保持不变。

对于prog，必须指定一个类似于扁平字符的数据对象，其中包含要读取的文本元素的程序名称； 名称不区分大小写。 内部表可以具有任何表类型，并且其行类型必须与ABAP字典中的结构TEXTPOOL相对应。

对于lang，您必须指定一个类似扁平字符的数据对象，该对象包含最多一个字符的语言键，其值必须包含在数据库表T002的SPRAS列中。 如果lang包含空白，则行为未定义。

成功读取后，itab在ENTRY列中包含文本符号的文本，选择文本，列表标题和程序属性的标题。 对于指定语言存在的每个文本元素都占据内部表的一行，并由ID和KEY列唯一标识。 LENGTH列包含文本元素的长度。 下表显示了ID和KEY列的可能值及其含义：

ID密钥输入

H 001至004列表标题：列标题

I文本符号标识符文本符号文本

R-程序标题

S参数或选择标准的名称选择文本

T-列表标题：Titlebar

HI ....

也许您可以签出以'TVAR'开头的表。

在se11中，检查所有以TVARV * ...开头的表。

您会找到必要的信息。

使用此..fm

WB2B_GET_REPORT_TEXTELEMENT