ABAP中程序类如何转化成全局类

我们在程序中定义的类只能在本程序中使用，如果我们需要该类能被所有程序调用，那么就需要使用全局类。

举例：程序中类：lcl_report，转换成全局类：zcl_report

1、程序代码

1. REPORT y001.
   
2. 
   
3. CLASS lcl_report DEFINITION.
   
4.   PUBLIC SECTION.
   
5.     METHODS:select_data,
   
6.             write_data.
   
7.   PRIVATE SECTION.
   
8.     DATA:lt_t100 TYPE TABLE OF t100.
   
9. ENDCLASS.
   
10. CLASS lcl_report IMPLEMENTATION.
    
11.   METHOD select_data.
    
12.     SELECT * INTO TABLE lt_t100 UP TO 10 ROWS FROM t100 WHERE sprsl = sy-langu.
    
13.   ENDMETHOD.
    
14.   METHOD write_data.
    
15.     FIELD-SYMBOLS: <fs_t100> TYPE t100.
    
16.     LOOP AT me->lt_t100 ASSIGNING <fs_t100>.
    
17.       WRITE:/ <fs_t100>-arbgb,
    
18.               <fs_t100>-text.
    
19.     ENDLOOP.
    
20.   ENDMETHOD.
    
21. ENDCLASS.
    
22. 
    
23. START-OF-SELECTION.
    
24.   DATA:lo_main TYPE REF TO lcl_report.
    
25. 
    
26.   CREATE OBJECT lo_main.
    
27.   lo_main->select_data( ).
    
28.   lo_main->write_data( ).

复制代码

2、T-code：SE24

3、选中需要转换的类，可以重新命名，点击导入

4、激活全局类


编辑更新 类、方法、属性、事件等描述

学习了。

感谢分享