* Adressnummer mit führenden Nullen
PARAMETERS: p_adr TYPE adrc-addrnumber.
START-OF-SELECTION.
DATA(lv_addr1_sel) = VALUE addr1_sel( addrnumber = p_adr ).
DATA(lv_addr1_val) = VALUE addr1_val( ).
CALL FUNCTION 'ADDR_GET'
EXPORTING
address_selection = lv_addr1_sel
IMPORTING
address_value = lv_addr1_val
EXCEPTIONS
parameter_error = 1
address_not_exist = 2
version_not_exist = 3
internal_error = 4
OTHERS = 5.
IF sy-subrc = 0.
* Daten im Inline-Browser im SAP-Fenster anzeigen
cl_abap_browser=>show_html( EXPORTING
title = 'Adressdaten'
html_string = cl_demo_output=>new( )->write_data( lv_addr1_sel )->write_data( lv_addr1_val )->get( )
container = cl_gui_container=>default_screen ).
* cl_gui_container=>default_screen erzwingen
WRITE: space.
ENDIF.
Links