【SAP Abap】X-DOC:SE18/19 - SAP第四代增强概念理解

1、Tcode

SE18:Business Add-Ins: Definitions(增强点定义/查看),用于增强选项的查看与维护。
在这里插入图片描述
SE19:Business Add-Ins: Implementations(增强实施),基于增强点创建和维护增强实施。
在这里插入图片描述

2、概念

(1)Enhancement Spot(增强容器),用于组织增强选项,一个Spot内可以有多个增强选项,一般一个程序建一个Spot即可。
(2)Enhancement Options(增强选项),包含以下两种类型的增强选项:Point、Section,一个程序可以建多个Option。
(3)Enhancement Implementation Point,在ABAP程序中定义的一个位置,用于插入增强实施代码。
(4)Enhancement Implementation Section,在ABAP程序中定义的一个区域,其中的代码将会被增强实施替换。
在这里插入图片描述

3、增强选项类型

(1)显式增强选项:
ENHANCEMENT-POINT/SECTION zen_name SPOTS zspots_name STATIC .
显式增强选项由增强点管理,必须事先插入到源代码中,并通过增强实现进行增强。
(2)隐式增强选项
隐式增强选项由增强框架提供,不需要开发人员做任何特定准备,它们不必属于容器(增强点)。
它们也通过增强实现得到增强。

4、增强实现类型

(1)静态形式(Declaration):增强选项添加STATIC,对应隐式增强实现时的声明类型,一般用于数据声明的增强。当增强实现所在包的switch状态为开和备用(On & Stand-by)时,代码会被执行;对于ENHANCEMENT-SECTION中的数据声明,可以重新定义。
(2)动态形式(Code):增强选项不添加STATIC,对应隐式增强实现时的代码类型,一般用于可执行代码的增强。当增强实现所在包的switch状态为开(On )时,代码才会被执行。对于ENHANCEMENT-SECTION中的数据声明,为静态全局变量,不能被替换。
两者区别
当增强实施未设置switch时,代码都会执行,但静态形式的效率更高一些。
不建议使用静态SECTION,因为会更改数据声明,可能导致不可预料的问题。
在这里插入图片描述

5、增强操作方式

参考:【SAP Abap】SAP第四代增强开发DEMO
增强Demo:

REPORT yz_demo_enhancement_4g.

WRITE: / 'BEGIN,来自主程序'.
SKIP.

" 静态增强点
ENHANCEMENT-POINT YPOINT1 SPOTS YSPOTS1 STATIC .
*$*$-Start: YPOINT1-----------------------------------------------------------------------------$*$*
ENHANCEMENT 1  YEH001.    "active version
  data: gv_po1(10) VALUE 'Test1'.
  write: / '增强点1-静态YPOINT1实施:' && gv_po1.
ENDENHANCEMENT.
ENHANCEMENT 2  YEH002.    "active version
*
  write: / '增强点1-静态YPOINT1实施2:' && gv_po1.
ENDENHANCEMENT.
*$*$-End:   YPOINT1-----------------------------------------------------------------------------$*$*

SKIP.
" 动态增强点
ENHANCEMENT-POINT YPOINT2 SPOTS YSPOTS1 .
*$*$-Start: YPOINT2-----------------------------------------------------------------------------$*$*
ENHANCEMENT 2  YEH001.    "active version
  write: / '增强点2-YPOINT2实施,获取YPOINT1中的变量:' && gv_po1.
  data: gv_po2(10) VALUE 'Test2'.
  write: / '增强点2-YPOINT2实施:' && gv_po2.
ENDENHANCEMENT.
*$*$-End:   YPOINT2-----------------------------------------------------------------------------$*$*

SKIP.
" 静态增强段(数据能重定义)
ENHANCEMENT-SECTION YSECTION1 SPOTS YSPOTS1 STATIC .
  DATA: gv_sec1(10) VALUE 'SEC1'.
  WRITE: / 'YSECTION1预留代码:' && gv_sec1. " 实施后代码被替代
END-ENHANCEMENT-SECTION.
*$*$-Start: YSECTION1---------------------------------------------------------------------------$*$*
ENHANCEMENT 3  YEH001.    "active version
  DATA: gv_sec1 type d VALUE '20230517'.  " 变更数据定义
  WRITE: / '增强段1-静态YSECTION1实施:' && gv_sec1.
  write: / '增强段1-静态YSECTION1实施,获取YPOINT1中的变量:' && gv_po1.
ENDENHANCEMENT.
*$*$-End:   YSECTION1---------------------------------------------------------------------------$*$*

SKIP.
WRITE: / '主程序-获取YSECTION1中的变量:' && gv_sec1.
SKIP.

" 静态增强段(数据不能重定义)
ENHANCEMENT-SECTION YSECTION2 SPOTS YSPOTS1 .
  DATA: gv_sec2(10) VALUE 'SEC2'.               "此处变量在其定义后全局可用
  WRITE: / 'YSECTION2预留代码:' && gv_sec2.     " 实施后代码被替代,不再执行
END-ENHANCEMENT-SECTION.
*$*$-Start: YSECTION2---------------------------------------------------------------------------$*$*
ENHANCEMENT 4  YEH001.    "active version
  "DATA: gv_sec2(10) VALUE 'SEC2'.              "不能重定义
  "WRITE: / 'YSECTION2预留代码:' && gv_sec2.  "不能获取被替换代码中的变量
  write: / '增强段2-YSECTION2实施:不能重定义变量'.
  write: / '增强段2-YSECTION2实施,获取YPOINT2中的变量:' && gv_po2.
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1) Enhancement Exit YSECTION2, Enhancement YEH001, End                                                                                               A
*$*$-Start: (1)---------------------------------------------------------------------------------$*$*
ENHANCEMENT 1  YEH003S.    "active version
*
  write: / '增强段2-YSECTION2实施,来自静态隐式增强'.
ENDENHANCEMENT.
*$*$-End:   (1)---------------------------------------------------------------------------------$*$*
ENDENHANCEMENT.
ENHANCEMENT 1  YEH002.    "active version
  WRITE: / '增强实施2 YEH002:不能获取被替代代码中的变量'. " 仅此第一个实施生效
ENDENHANCEMENT.
*$*$-End:   YSECTION2---------------------------------------------------------------------------$*$*

SKIP.
WRITE: / '主程序-获取YSECTION2中的变量:' && gv_sec2.     "可以获取

SKIP.
WRITE: / 'END,来自主程序'.

6、增强选项与增强实现关系

一个增强点可以有多个增强实现代码,按创建顺序从上到下排序,执行顺序亦是如此;
一个增强段可以有多个增强实现,按创建顺序从上到下排序,但只有第一个实现生效;
一个增强实现,可以跨多个增强点/段,代码块按实施顺序显示为:ENHANCEMENT 1,2,3,…,它们同属于一个实现,同时生效,其中的代码可以有一定的逻辑连贯性。

7、增强实施建议

相关功能可以在一个实施中实现,不相关的功能建议分开实施。

原创文章,转载请注明来源-X档案

猜你喜欢

转载自blog.csdn.net/XLevon/article/details/130743020
SAP