PARAMETERS: p_rfc TYPE rscat-rfcdest.
START-OF-SELECTION.
DATA: lv_rfc_subrc TYPE sy-subrc.
DATA: lv_msg1 TYPE sy-msgv1.
DATA: lv_msg2 TYPE sy-msgv2.
* CATT: Prüfen einer RFC Destination auf Definition und Ping
CALL FUNCTION 'CAT_CHECK_RFC_DESTINATION'
EXPORTING
rfcdestination = p_rfc
IMPORTING
msgv1 = lv_msg1
msgv2 = lv_msg2
rfc_subrc = lv_rfc_subrc.
* Hier Objekte für die Ausgabe hinzufügen
cl_demo_output=>write_data( lv_msg1 ).
cl_demo_output=>write_data( lv_msg2 ).
cl_demo_output=>write_data( lv_rfc_subrc ).
* HTML-Code vom Demo-Output holen
DATA(lv_html) = cl_demo_output=>get( ).
* Daten im Inline-Browser im SAP-Fenster anzeigen
cl_abap_browser=>show_html( EXPORTING title = 'RFC'
html_string = lv_html
container = cl_gui_container=>default_screen ).
* cl_gui_container=>default_screen erzwingen
WRITE: space.