2、LUDE zsave_text_pbo.INCLUDE zsave_text_pai.START-OF-SELECTION. SET SCREEN 0100.*&---------------------------------------------------------------------**& 包含 ZSAVE_TEXT_TOP*&---------------------------------------------------------------------**---------------------表申明---------------
3、--------**---------------------表申明-----------------------**-----------------内表/结构/工作区------------------**存联通卡描述的内表DATA: gt_text TYPE TABLE OF char256.DATA: gs_text TYPE char256.*文本保存DATA: header TYPE thead.DATA: lines TYPE TABLE OF tline WITH HEADER LINE.DATA: lines_old TYPE TABLE OF tline WITH HEAD
4、ER LINE.*-----------------内表/结构/工作区------------------**------------------------变量-----------------------**套餐类别DATA: ztclb TYPE char2.*套餐类别文本DATA: ztclb_t TYPE char40.DATA: gv_message TYPE char30.*CONTAINER相关DATA: gv_text_container TYPE REF TO cl_gui_custom_container, gv_text_editor TYPE REF
5、TO cl_gui_textedit.*读取文本关键字DATA: tdobname TYPE tdobname.*------------------------变量-----------------------**&---------------------------------------------------------------------**& 包含 ZSAVE_TEXT_PBO*&---------------------------------------------------------------------**&-----------
6、----------------------------------------------------------**& Module STATUS_0100 OUTPUT*&---------------------------------------------------------------------** text*----------------------------------------------------------------------*MODULE status_0100 OUTPUT. SET PF-STATUS 'STATUS_
7、0100'.* SET TITLEBAR 'xxx'.*为套餐文本赋值* SELECT SINGLE ztclb_t INTO ztclb_t* FROM zt1520* WHERE ztclb = ztclb. IF gv_text_container IS INITIAL. CREATE OBJECT gv_text_container EXPORTING