【转载】ABAP面向对象(Object Orientation)编程8-类的事件(event)

最新推荐文章于 2024-07-19 11:29:34 发布
最新推荐文章于 2024-07-19 11:29:34 发布
阅读量1.3k 收藏 4
点赞数
分类专栏： ABAP4

1, 事件

事件(event)是除去属性, 方法之外的第三类成员. 这三种组件中, 属性用于刻画类对象的状态, 方法用于访问或修改对象状态, 而事件则用于一个类对象发布其状态的改变, 因而其他对象可以捕获该方法并作出响应.

在ABAP Object 中, 事件的触发和处理是通过特定的方法进行的, 一个方法作为触发者触发事件, 而程序中的另一个方法则作为处理者捕获并处理该事件, 处理方法在事件出现进被执行.

2, 声名事件

事件可以在类或接口的声名部分进行声明.

 

1

2

EVENTS|CLASS-EVENTS evt

  EXPORTING ... VALUE(e1) TYPE type [OPTIONAL] ...

 

声明该事件时, 可以使用 EXPORTING 附加项指定需要向事件处理方法中传递的参数, 该参数传递方法恒为值传递. 实例事件总是包含一个隐含的参数 SENDER, 该参数的类型为触发事件的类或接口的对象引用.

3, 触发事件

一个实例事件可以被类中的任意方法触发, 静态事件则可以被静态方法触发.

 

1

RAISE EVENT evt EXPORTING ... e1 = f1 ...

对于每一个没有被指定 OPTIONAL 项的形参 ei, 均必须在实例方法中传递一个实参 fi, 自身引用 ME 对象在被默认的传递到隐含参数 SENDER.

4, 事件处理方法

事件需要通过方法捕获事件并进行处理, 必须首先为该事件定义一个事件处理方法, 然后在运行时为该事件进行注册.

4.1 声明事件处理方法

任何类都可以为其它类中定义的事件进行处理, 同时也可以为自身事件进行处理.

实例事件处理方法的语法格式如下:

 

1

2

METHODS|CLASS-METHODS

  meth FOR EVENT evt OF cif IMPORTING ... ei ...

 

一个事件处理方法的接口中只能包含定义在事件 evt 中的形式参数, 并需遵循事件中的参数属性设定, 但事件处理方法不需要使用所有 RAISE EVENT 中定义的参数.

4.2 注册事件处理方法

要使事件处理方法能够对事件进行响应,必须在运行时为相关事件注册该方法, 语法格式如下:

 

1

SET HANDLER ... hi ... [FOR] ...

该语句将处理方法和相关的触发方法进行链接, 其语法和使用效果部分地取决于事件的类型.

  • 定义在类中的实例事件.
  • 定义在接口中的实例事件.
  • 定义在类中的静态事件.
  • 定义在接口中的静态事件.

对于实例事件, 在进行处理之前必须在注册语句中使用附加项 FOR 指定希望注册到的对象.

可以指定一个单独的对象作为事件触发者.

 

1

SET HANDLER ... hi ... FOR ref.

或者使用 FOR ALL INSTANCES 附加项为处理器注册所有可以触发该事件的实例;

 

1

SET HANDLER ... hi ... FOR ALL INSTANCES.

该注册过程可以作用于目前尚未被创建的实例.

对于静态事件, 则不能使用 FOR 附加项;

 

1

SET HANDLER ... hi ...


该注册自动应用于整个类, 对于接口中的静态事件, 该注册可以应用于目前尚未装载至内在中的类.

 

4.3 事件处理时间

在程序执行到 RAISE EVENT 语句之后, 所有已注册的处理方法都将在下一个语句之前被处理. 如果处理方法本身触发事件, 则该处理方法在原方法继续执行之前被重新调用. 

4.4 事件的触发及处理

事件的触发和处理基本过程如下: 假设有两个类 C1 和 C2, C1中包含事件 E1, 而该事件可能在方法 M1 中通过 RAISE EVENT 语句被触发, 而 C2 中将包含方法 M2, 该方法可以捕获事件 E1, 并进行处理.

在实际操作时, 要使一个对象的事件处理方法能够捕获另一个对象触发事件, 必须先使用 SET HANDLER 语句进行注册, 这个注册过程中形成了触发对象和响应对象之间的对应关系

7c7b1600gd3d81a0d81bc&690

当然, 也可以同时注册多个处理对象与一个触发对象相对应.

SET HANDLER 语句则创建一个系统内部的事件处理表, 为每一个事件注册相应的方法. 该表为系统隐含. 对于实例事件, 事件处理表中包含用于实现处理的方法名称以及注册了的类实例引用, 该表通过 SET HANDLER 语句动态的进行维护. 对于静态事件, 系统为相关类创建一个实例无关的处理表. 一旦事件被触发, 系统将查找相关的事件表并执行对应于该事件的实例方法.

5, 例子程序

 

ABAP

 

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

47

48

49

50

51

52

53

54

55

56

57

58

59

60

61

62

63

64

REPORT ZTEST_OO_EVENT.

*&---------------------------------------------------------------------*

*&       Class cl_vehicle

*&---------------------------------------------------------------------*

*        Text

*----------------------------------------------------------------------*

CLASS cl_vehicle DEFINITION.

  PUBLIC SECTION.

*    EVENTS: too_fast.

    EVENTS: too_fast EXPORTING value(p1) TYPE i.

    METHODS:accelerate,show_speed.

    CLASS-DATA speed TYPE i.

ENDCLASS.               "cl_vehicle

*&---------------------------------------------------------------------*

*&       Class (Implementation)  cl_vehicle

*&---------------------------------------------------------------------*

*        Text

*----------------------------------------------------------------------*

CLASS cl_vehicle IMPLEMENTATION.

  METHOD accelerate.

    speed = speed + 1.

    IF speed > 5 .

*      RAISE EVENT too_fast.

      RAISE EVENT too_fast EXPORTING p1 = speed.

    ENDIF.

  ENDMETHOD.                    "accelerate

  METHOD show_speed.

    WRITE: / 'Speed:',speed.

  ENDMETHOD.                    "show_speed

ENDCLASS.               "cl_vehicle

 

*&---------------------------------------------------------------------*

*&       Class cl_handler

*&---------------------------------------------------------------------*

*        Text

*----------------------------------------------------------------------*

CLASS cl_handler DEFINITION.

  PUBLIC SECTION.

*    METHODS handle_excess FOR EVENT too_fast OF cl_vehicle.

    METHODS handle_excess FOR EVENT too_fast OF cl_vehicle IMPORTING p1.

ENDCLASS.               "cl_handler

*&---------------------------------------------------------------------*

*&       Class (Implementation)  cl_handler

*&---------------------------------------------------------------------*

*        Text

*----------------------------------------------------------------------*

CLASS cl_handler IMPLEMENTATION.

  METHOD handle_excess.

    WRITE: / 'Speed can not be too fast.The speed is ', p1

LEFT-JUSTIFIED.

    cl_vehicle=>speed = 1.

  ENDMETHOD.                    "handle_excess

ENDCLASS.               "cl_handler

 

DATA: go_vehicle TYPE REF TO cl_vehicle,

      go_handler TYPE REF TO cl_handler.

 

START-OF-SELECTION.

  CREATE OBJECT: go_vehicle,go_handler.

  SET handler go_handler->handle_excess FOR ALL INSTANCES.

  DO 11 TIMES.

    CALL METHOD go_vehicle->accelerate.

    CALL METHOD go_vehicle->show_speed.

  ENDDO.

运行结果：

2017-03-07_14-01-13

hubaichun
关注
专栏目录
【SAP】ABAP——面向对象，本地类事件
Mona_1220的博客
04-23 305
背景：使用类的事件，输出0-50之间的10的倍数 *&---------------------------------------------------------------------* *& Report Y_TEST_MONA_1026 *& *&---------------------------------------------------------------------* *& 面向对象，创建本地类，事件 *& *&-
5.4 SAP ABAP 面向对象概念 - 多态 - 摘自 《SAP ABAP面向对象程序设计：原则、模式及实践》
kindsavage的博客
11-25 2098
5.4 多态 5.4.1 多态的概述 多态是一个生物学和化学中的专有名词，被面计算机科学家引用到面向对象的程序设计中。 我们用柯林斯英语词典看一下多态一词的原始意义： polymorphism：n.    多型现象，多态性; 多机组合形式; 多形性; 1. Biology - the occurrence of more than one form of individual in a ...
ABAP EVENT 事件
昊宇的笔记本
11-19 2496
ABAP EVENT 事件 2017年09月03日 21:33:52 zxkyyf 阅读数：443更多 个人分类： ABAP-EVENT CLASS class1 DEFINITION INHERITING FROM object. PUBLIC SECTION. EVENTS: too_fast. ” 声明事件,如果有参数恒为值传递 METHODS: accelerate, show_speed...
ABAP中如何取消对于某一事件（EVENT）的监听？
SAP领域技术博客
07-12 469
本文简介了ABAP中事件EVENT的用法，并介绍了如何取消对于某一事件的监听。
关于 ABAP EVENT 事件
最新发布
月阴荒的博客
07-19 369
ALV框架提供了多种标准事件，例如 ,TOP_OF_PAGE(页头信息)、END_OF_PAGE（页尾信息）、USER_COMMAND（用户按钮）这些事件允许开发者在特定的时刻执行自定义的逻辑代码，例如当用户执行某个命令时或者页面状态发生变化时。可以通过向内表it_events 添加事件来注册想要的事件，每个事件由一个数据类型为slis_alv_event的结构体表示，它包含了事件的名称和处理该事件的表单（Form）的名称。下面是网上手机的一些关于ALV的 IT_EVENT事件的一些说明。
Event
我的SAP空间
01-31 695
Occurrence of a change of state in an object, which is published throughout the system. An event is an object type component. The list of possible events is defined with the relevant object type in th
abap 面向对象编程方法-CLASS创建 step by step
07-24
本文档详细介绍了在ABAP中创建面向对象类的过程，特别是关于局部类导入到全局类的具体步骤及其限制。通过遵循本文档提供的指南，您可以更加熟练地掌握ABAP面向对象编程的基础知识和技术。同时，了解这些限制也有助于...
object-oriented-design-w-abap:James E. McDonough的“ ABAP面向对象设计”的源代码-ab source code
03-24
Apress源代码 该存储库James E.McDonough（Apress，2017）进行。 使用绿色按钮将文件下载为zip格式，或使用Git将存储库克隆到您的计算机上。 发行版 版本v1.0对应于已出版书籍中的代码，没有更正或更新。...
ABAP面向对象
f346348157的博客
04-08 2456
ABAP面向对象 1、面向对象基础 一切皆对象，对象的三要素：封装、多态、继承 abap继承只支持单继承 2、类的定义和实现 ABAP定义类方法是分两部分：先定义、后实现， 最后…最后才是调用方法 2.1、类的定义 不同于java等程序，abap类的定义和实现是分开写的，按如下格式 REPORT zcsdn_lion_obj02. * 类(CLASS)—定义 CLASS my_ftion DEFINITION. PUBLIC SECTION."公共的，可定义方法、属性
sap ABAP 事件 event 的声明及调用
12-14
sap中ABAP开发常用事件的定义及调用 文档展示了逻辑关系
ABAP面向对象的开发
热门推荐
少年休闲海
04-20 1万+
在程序中, 对象的识别和寻址是通过对象引用来实现的, 对象引用变量可以访问对象的属性和方法。 ABAP 中的类也有程序内部的局域类和全局类之分, 其作用范围不同。 ABAP中的全局类是通过ABAP工作台中的类创建工具 Class Builder  SE24开发的, 保存在系统类库程序 Class Pool 中, 可供所有程序作用。 一. 程序中类的定义. 1. 类声明及实现 *
ABAP 面向对象
wx774891的博客
03-30 1042
在程序中, 对象的识别和寻址是通过对象引用来实现的, 对象引用变量可以访问对象的属性和方法. ABAP 中的类也有程序内部的局域类和全局类之分, 其作用范围不同. ABAP中的全局类是通过ABAP工作台中的类创建工具 Class Builder 开发的, 保存在系统类库程序 Class Pool 中, 可供所有程序作用. 一. 程序中类的定义. 1. 类声明及实现 *ClassDeclarations CLASSapplicationDEFINITION. PUBLICSE...
ABAP面向对象之EVENT处理
liangziyisheng的专栏
01-22 4386
ABAP不没有JAVA那样灵活的异常处理机制，它是通过触发一系列事件去处理异常，但事件必须通常写在一个HANDER类里面去
ABAP 的事件
liangziyisheng的专栏
01-06 3047
深刻理解abap事件触发机制是保证程序健壮的必要条件
ABAP 面向对象事件处理
weixin_30781631的博客
06-05 208
面向对象事件在ABAP中十分重要，并且很容易处理。 我们需要handler方法来注册事件： METHODS : handle_event_raised FOR EVENT event_raised OF lcl_event_raiser. 然后把它设置为事件处理器： SET HANDLER me->handle_event_raised ...
abap 面向对象　syntax
weixin_34250434的博客
04-19 120
面向对象 面向对象是以模拟现实世界中的对象及其交互关系为问题解决方案的一种软件设计思想， 其强大的优越性已经在无数成功的软件研究和工程实践得到印证，可以毫不夸张的说，面向对象是软件工程思想和实践领域的一种进化和革命。 面向过程为主的abap体系为了适应现代软件工程发展的趋势和ERP的进化，也逐渐，应该是不得不，推出一些面向对象的机制。尽管与其它纯粹为OO而生的语言体系比显得幼稚和笨拙，但...
SAP ABAP OO Event
HK with SAP天天向上
03-26 1738
1. Define Event: Event would be defined at the time of class declaration. When using standard SAP class, this is need not required generally. However for custom classes you can define events.
ABAP面向对象编程：全面指南(初级入门)
"本资源是一本面向初学者的ABAP面向对象编程标准教材，它详细介绍了SAP NetWeaver环境下的对象编程技术。主要内容包括对ABAP Objects概念的深入解析，这些对象是构建复杂业务逻辑的基础。学习者将接触到诸如Date...
评论 1
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值