Code: Alles auswählen.
case io_event->mv_event_id.
when GC_EVENT_OPEN_LINK.
*Hier soll z.B. Googel geöffnet werden.
endcase.
Code: Alles auswählen.
REPORT ztest_cl_gui_execute.
DATA gv_app TYPE string VALUE 'iexplore.exe'.
DATA gv_par TYPE string VALUE 'http://google.de'.
CALL METHOD cl_gui_frontend_services=>execute
EXPORTING
* document =
application = gv_app
parameter = gv_par
* default_directory =
* maximized =
* minimized =
* synchronous =
* operation = 'OPEN'
EXCEPTIONS
cntl_error = 1
error_no_gui = 2
bad_parameter = 3
file_not_found = 4
path_not_found = 5
file_extension_unknown = 6
error_execute_failed = 7
synchronous_failed = 8
not_supported_by_gui = 9
OTHERS = 10.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.
Code: Alles auswählen.
...
CALL METHOD cl_gui_frontend_services=>execute
EXPORTING
document = 'http://www.heise.de'
* application =
* parameter =
* default_directory =
...
Code: Alles auswählen.
if io_event->MV_EVENT_ID = 'EVT_LINK_TO'(001).
DATA: lo_fpm TYPE REF TO if_fpm, "Instance du FPM manager
lo_navigate_to TYPE REF TO if_fpm_navigate_to,
ls_url_fields TYPE fpm_s_launch_url,
lv_url TYPE string.
lo_fpm = cl_fpm_factory=>get_instance( ).
lv_url = 'http://scn.sap.com/welcome'.
CALL METHOD lo_fpm->get_navigate_to
RECEIVING
ro_navigate_to = lo_navigate_to.
* Prepare URL to the external catalogin lv_url.
ls_url_fields-url = lv_url. " lv_url type string
ls_url_fields-use_suspend_resume = abap_true.
CALL METHOD lo_navigate_to->launch_url
EXPORTING
is_url_fields = ls_url_fields.
ENDIF.