to get the tel and fax number and add a custom field to Address Dialog box

Hi All;

I am calling the Address maintenance dialog and try to returning back the values via the code below.

The name, street, salutation etc. is ok. but the tel number and fax number areas are returning empty altough I fill these areas.

Furhermore I need to add a custom field to this address dialog pop up.

How can I solve these problems?

Thanks in advance?

DATA:

     h_adress_data_new LIKE addr1_data            OCCURS 1 WITH HEADER LINE,

     " h_adress_data_new LIKE /SAPHT/DRM_ADDR_DATA  OCCURS 1 WITH HEADER LINE,

     h_address_dialog  LIKE addr1_dia             OCCURS 1 WITH HEADER LINE,

     h_titlebar        LIKE sy-title.

CALL FUNCTION 'ADDR_DIALOG_PREPARE'

     EXPORTING

       titlebar           = h_titlebar

  "    field_selection    = gs_fisel

     TABLES

       excluded_functions = h_tab_excluded_functions

     EXCEPTIONS

       internal_error     = 1

       OTHERS             = 2.

CALL FUNCTION 'ADDR_DIALOG'

     EXPORTING

       check_address     = 'X'

     IMPORTING

       ok_code           = h_fcode

     TABLES

       number_handle_tab = h_address_dialog

       values            = h_adress_data_new

     EXCEPTIONS

       address_not_exist = 1

       group_not_valid   = 2

       parameter_error   = 3

       internal_error    = 4

       OTHERS            = 5.