abap编程的一些例子接口的实现

最新推荐文章于 2024-12-16 15:43:50 发布

fanweijun

最新推荐文章于 2024-12-16 15:43:50 发布

阅读量917

点赞数

文章标签：编程 methods class interface object table

本文通过两个具体的类实现案例，展示了如何使用面向对象的设计方法来定义和操作类。首先定义了一个计数器类，用于增加计数值并显示；其次定义了一个自行车类，用于增加速度并显示。通过创建这些类的对象，并调用它们的方法，最终将状态信息输出。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

interface status.
methods write.
endinterface. "status

class counter definition.
public section.
interfaces status.
methods increment.
private section.
data count type i.
endclass. "counter definition

class counter implementation.
method status~write.
write: / 'count in counter is', count.
endmethod. "status~write
method increment.
add 1 to count.
endmethod. "increment
endclass. "counter implementation

class bicycle definition.
public section.
interfaces status.
methods drive.
private section.
data speed type i.
endclass. "bicycle definition

class bicycle implementation.
method status~write.
write: / 'speed of bicycle is', speed.
endmethod. "status~write
method drive.
add 10 to speed.
endmethod. "drive
endclass. "bicycle implementation

data: count type ref to counter,
bike type ref to bicycle,
status type ref to status, "接口的引用作为工作区
status_tab type table of ref to status.

start-of-selection.

create object: count, bike.
do 5 times.
call method: count->increment,
bike->drive.
enddo.

append: count to status_tab,
bike to status_tab.

loop at status_tab into status.
call method status->write.
endloop.