SAP SE24实战：从零构建一个可复用的全局类

1. 为什么需要全局类？

在SAP开发中，我们经常会遇到需要重复使用的功能模块。比如物料主数据校验这个场景，可能在采购订单、生产订单、库存管理等多个模块都需要调用相同的校验逻辑。如果每次都重新编写代码，不仅效率低下，而且维护起来也非常麻烦。

全局类（Global Class）就是为解决这类问题而生的。它就像是一个功能完备的工具箱，把相关的属性和方法封装在一起，可以在任何需要的地方调用。想象一下，如果你每次拧螺丝都要重新发明螺丝刀，那得多费劲？全局类就是那把可以反复使用的螺丝刀。

在SE24中创建的全局类与局部类最大的区别在于可见性范围。局部类只能在定义它的程序中使用，就像是你家里的工具箱，只有在家才能用；而全局类则像是放在公司公共区域的工具箱，所有同事都可以使用。这种特性使得全局类成为SAP系统中实现代码复用的重要手段。

2. 创建全局类的基本步骤

2.1 进入SE24事务码

打开SAP系统，在命令框输入SE24回车，就进入了类构建器的界面。这里是你创建和修改全局类的"工作间"。第一次进入时可能会觉得有点复杂，但别担心，跟着步骤走很快就能上手。

在初始界面，你会看到一个"类"输入框。这里要输入你打算创建的类名，按照SAP命名规范，建议以Z或Y开头，比如ZCL_MATERIAL_CHECK。输入完类名后点击"创建"按钮，系统会弹出一个对话框让你选择类的类型。

2.2 选择正确的类类型

在弹出的对话框中，你会看到几个选项：

• 普通类：最常用的选择
• 异常类：专门用于错误处理
• 持久性类：与数据库表直接绑定的特殊类

对于我们这个物料校验的例子，选择"普通类"就可以了。点击确认后，系统会进入类定义的详细界面。这个界面分为几个主要区域：

• 顶部是类的属性区
• 中间是方法列表
• 底部是类的实现区域

2.3 定义类的基本属性

在属性区域，有几个关键字段需要填写：

• 描述：用简明扼要的语言说明这个类的用途，比如"物料主数据校验工具类"
• 最终：如果勾选，表示这个类不能被继承
• 抽象：如果勾选，表示这个类不能被实例化

对于大多数业务场景，我们既不勾选"最终"也不勾选"抽象"，保持默认即可。这样创建的类既可以被实例化，也可以被继承，灵活性最高。

3. 设计类的属性和方法

3.1 属性的定义与分类

属性是类的数据成员，相当于类的"记忆"。在物料校验的例子中，我们可能需要记录物料编号、校验结果等信息。在SE24中定义属性时，需要考虑两个维度：

首先是可见性维度：

• Public（公共）：任何地方都可以访问，就像公司公告栏
• Protected（受保护）：只有类内部和子类可以访问，像是部门内部文件
• Private（私有）：只有类内部可以访问，相当于个人笔记

其次是存储特性维度：

• 实例属性（DATA）：每个对象实例都有自己的一份
• 静态属性（CLASS-DATA）：所有实例共享同一份

举个例子，物料编号应该是实例属性，因为每个物料对象都有自己的编号；而系统配置参数可能是静态属性，因为所有实例都使用相同的配置。

3.2 方法的定义与实现

方法是类的行为，定义了类能做什么。在SE24中创建方法时，同样需要考虑可见性。对于物料校验类，我们可能需要以下方法：

• CHECK_MATERIAL：校验物料基本数据
• VALIDATE_UNIT：校验物料单位
• GET_ERROR_MESSAGE：获取校验错误信息

方法的参数设置也很关键，常见的参数类型有：

• IMPORTING：输入参数
• EXPORTING：输出参数
• CHANGING：既可输入又可输出的参数
• RETURNING：返回值
• EXCEPTIONS：异常处理

在方法实现时，要注意ABAP的语法规范。比如使用IS BOUND检查对象引用是否有效，使用TRY-CATCH处理异常等。好的方法实现应该像是一个黑盒子：外部只需要知道输入什么、输出什么，不需要关心内部如何实现。

4. 类的实际应用示例

4.1 物料校验类的完整实现

让我们通过一个具体的例子来演示如何构建物料校验类。假设我们需要校验以下内容：

1. 物料编号是否存在
2. 物料类型是否符合要求
3. 基本计量单位是否有效

首先在SE24中创建类ZCL_MATERIAL_CHECK，然后定义以下属性：

abap复制CLASS-DATA: gv_debug TYPE abap_bool VALUE abap_false. " 静态属性，控制调试模式

DATA: mv_matnr TYPE matnr,      " 实例属性，存储物料编号
      mv_mtart TYPE mtart,      " 实例属性，存储物料类型
      mv_meins TYPE meins,      " 实例属性，存储基本单位
      mt_errors TYPE TABLE OF string. " 实例属性，存储错误信息

接着定义公共方法：

abap复制METHODS: 
  constructor IMPORTING iv_matnr TYPE matnr
                        iv_mtart TYPE mtart
                        iv_meins TYPE meins,
  check_material RETURNING VALUE(rv_valid) TYPE abap_bool,
  get_errors EXPORTING et_errors TYPE string_table.

方法的实现可能如下：

abap复制METHOD constructor.
  me->mv_matnr = iv_matnr.
  me->mv_mtart = iv_mtart.
  me->mv_meins = iv_meins.
ENDMETHOD.

METHOD check_material.
  " 清空错误信息
  CLEAR me->mt_errors.

  " 校验物料是否存在
  SELECT SINGLE matnr FROM mara INTO @DATA(lv_matnr) 
    WHERE matnr = @me->mv_matnr.
  IF sy-subrc <> 0.
    APPEND '物料编号不存在' TO me->mt_errors.
  ENDIF.

  " 校验物料类