Code: Alles auswählen.
DATA ok_code TYPE sy-ucomm.
DATA number_handle_tab TYPE STANDARD TABLE OF addr1_dia.
DATA number_handle TYPE addr1_dia.
DATA values TYPE STANDARD TABLE OF addr1_data.
DATA value TYPE addr1_data.
number_handle-maint_mode = 'CREATE'.
number_handle-addr_group = 'CA01'.
number_handle-handle = 'TEST'.
APPEND number_handle TO number_handle_tab.
CALL FUNCTION 'ADDR_DIALOG'
IMPORTING
ok_code = ok_code
TABLES
number_handle_tab = number_handle_tab
values = values
EXCEPTIONS
address_not_exist = 1
group_not_valid = 2
parameter_error = 3
internal_error = 4
OTHERS = 5.
IF sy-subrc = 0.
DATA address_selection TYPE addr1_sel.
DATA lt_adtel TYPE STANDARD TABLE OF adtel.
address_selection-addrhandle = number_handle-handle.
CALL FUNCTION 'ADDR_COMM_GET'
EXPORTING
address_handle = address_selection-addrhandle
table_type = 'ADTEL'
TABLES
comm_table = lt_adtel
EXCEPTIONS
parameter_error = 1
address_not_exist = 2
internal_error = 3
OTHERS = 4.