REPORT ZWTEST.
class class1 definition.
public section.
events: event1.
methods: method1 for event event1 of class1.
methods: trigger1.
endclass.
class class1 implementation.
method: method1.
write: /5 'I am the event handler method'.
endmethod.
method:trigger1.
write: /5 'I am trigger1, going to raise event event1'.
raise event event1.
endmethod.
endclass.
start-of-selection.
data: OBJ type ref to class1.
create object:OBJ.
set handler OBJ->method1 for All INSTANCES.
call method OBJ->trigger1.
转自:http://www.saptechnical.com/Tutorials/OOPS/Events/Index.htm