/ Published in: Other
Expand |
Embed | Plain Text
TYPES t_reservation_tab TYPE HASHED TABLE OF zreservation WITH UNIQUE KEY reservation_id. DATA: licence_plate TYPE zcars-licence_plate, reservation_wa LIKE LINE OF reservation_tab, reservation_num TYPE i, mess TYPE string. DATA text TYPE string VALUE 'HELLO WORLD'. DATA oref TYPE REF TO myclass. DATA vehicle_tab TYPE TABLE OF REF TO zcl_vehicle. DATA array TYPE STANDARD TABLE OF i WITH KEY table_line TYPES: BEGIN OF foo, eins TYPE zcatest-id, zwei TYPE zcatest-bezeichnung, END OF foo. DATA bar TYPE foo. DATA zcatest_tab TYPE TABLE OF zcatest. SELECT * from zcatest into TABLE zcatest_tab. DATA zcatest_wa TYPE zcatest. SELECT * from zcatest into zcatest_wa. MESSAGE 'foo' TYPE 'I'. ENDSELECT. MESSAGE text TYPE 'I' CREATE OBJECT oref. DO 3 TIMES. CREATE OBJECT vehicle. APPEND vehicle TO vehicle_tab ENDDO. LOOP AT vehicle_tab INTO vehicle. vehicle->show_speed(). ENDLOOP.
You need to login to post a comment.
