Получение мастера клиента

Вы можете попробовать функциональный модуль BAPI_CUSTOMER_GETDETAIL2, он возвращает CUSTOMERADDRESS.

Что еще более важно, я нашел это менее чем за минуту

• Запуск транзакции BAPI
• Нажав на вкладку "Алфавитный"
• Найти клиента (хорошее предположение с моей стороны, но не слишком сложное предположение)
• Посмотрите на методы и убедитесь, что только GETDETAIL, GETDETAIL1 и GETDETAIL2 вероятны.
• Дважды щелкните GETDETAIL2 (цифра в конце означает версию)
• Обратите внимание на имя функционального модуля в правой панели сведений.

Мой напарник по серфингу говорит мне, что вы также могли просто запросить BAPI_CUSTOMER_*, так как BAPI, которые вы нашли, явно следуют шаблону.

Что касается фрагмента, вы должны хотя бы попробовать и сообщить нам, где вы потерпели неудачу.

DATA : wa_address TYPE bapicustomer_04.

PARAMETERS p_kunnr TYPE kunnr.

CALL FUNCTION 'BAPI_CUSTOMER_GETDETAIL2'
  EXPORTING
    customerno      = p_kunnr
  IMPORTING
    customeraddress = wa_address.

WRITE: wa_address-name , wa_address-name_2 , wa_address-city , wa_address-country.

Я бы использовал запрос, попробуйте это:

report  ZKNA1.

tables: kna1.

type-pools slis.

data gt_fieldcat type slis_t_fieldcat_alv with header line.

data: gs_layout type slis_layout_alv,
g_repid type sy-repid.

types: begin of st_output,
    kunnr type kna1-kunnr,
    name1 type kna1-name1,
    city1 type adrc-city1,
    city2 type adrc-city2,
    street type adrc-street,
    tel_number type adrc-tel_number, " If you need more fields add them here and in the field catalog
end of st_output,
gt_tbl_data type standard table of st_output.

data gt_output type standard table of st_output.

data g_count type i.

data  t_heading type slis_t_listheader.

selection-screen: begin of block b2 with frame title text-t01.

select-options s_kunnr for kna1-kunnr.

select-options s_name1 for kna1-name1.

selection-screen: end of block b2.

initialization.
  g_repid = sy-repid.

start-of-selection.

  perform get_data.

  perform build_alv.

form init_layout.
  gs_layout-zebra = 'X'.
  gs_layout-detail_popup = 'X'.
endform.                    "init_layout

form get_data.
  field-symbols <wa_gt_output> type st_output.
  data zlen type i.

  select
    kna1~kunnr
    kna1~name1
    adrc~city1
    adrc~city2
    adrc~street
    adrc~tel_number
    from kna1
    left join adrc on adrc~addrnumber = kna1~adrnr
    into corresponding fields of table gt_output
    where
    kna1~kunnr in s_kunnr and
    kna1~name1 in s_name1
    order by
     kna1~kunnr
    .

  g_count = sy-dbcnt.

endform. " GET DATA

form build_alv.

* ALV required data objects.
  data: w_title   type lvc_title,
        w_comm    type slis_formname,
        w_status  type slis_formname,
        x_layout  type slis_layout_alv,
        t_event    type slis_t_event,
        t_fieldcat type slis_t_fieldcat_alv,
        t_sort     type slis_t_sortinfo_alv.

  refresh t_fieldcat.
  refresh t_event.
  refresh t_sort.
  clear x_layout.
  clear w_title.

* Layout
  perform init_layout.

* Field Catalog
  perform set_fieldcat using:
 1 'KUNNR' 'KUNNR' 'KNA1'           25 space  space  space space  space space space space space space space t_fieldcat,
 2 'NAME1' 'NAME1' 'KNA1'           25 space  space  space space  space space space space space space space t_fieldcat,
 3 'CITY1' 'CITY1' 'ADRC'           25 space  space  space space  space space space space space space space t_fieldcat,
 4 'CITY2' 'CITY2' 'ADRC'           25 space  space  space space  space space space space space space space t_fieldcat,
 5 'STREET' 'STREET' 'ADRC'         25 space  space  space space  space space space space space space space t_fieldcat,
 6 'TEL_NUMBER' 'TEL_NUMBER' 'ADRC' 25 space  space  space space  space space space space space space space t_fieldcat.

* Top of page heading
  perform set_top_page_heading using t_heading[] t_event.

* Events
  perform set_events using t_event.

* GUI Status
  w_status = ''.
  g_repid = sy-repid.

* User commands
  w_comm   = 'USER_COMMAND'.

* Order
* Example
*  PERFORM set_order USING '<field>' 'IT_DATA' 'X' space space t_sort.

  call function 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program       = g_repid
      is_layout                = gs_layout
      it_fieldcat              = t_fieldcat
      it_sort                  = t_sort
      i_callback_pf_status_set = w_status
      i_callback_user_command  = w_comm
      i_save                   = 'X'
      it_events                = t_event
      i_grid_title             = w_title
    TABLES
      t_outtab                 = gt_output
    EXCEPTIONS
      program_error            = 1
      others                   = 2.
  if sy-subrc <> 0.
    message id sy-msgid type sy-msgty number sy-msgno with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  endif.

endform. " build_alv

form set_top_page_heading using t_heading type slis_t_listheader
                                t_events  type slis_t_event.

  data: x_heading type slis_listheader,
        x_event   type line of slis_t_event.

  clear x_heading.
  x_heading-typ = 'S'.
  x_heading-key = 'Count: '.
  x_heading-info = g_count.
  append x_heading to t_heading.

* Top of page event
  x_event-name = slis_ev_top_of_page.
  x_event-form = 'TOP_OF_PAGE'.
  append x_event to t_events.

endform.                    "set_top_page_heading

form set_events using t_events type slis_t_event.

  data: x_event   type line of slis_t_event.

**
* Example
* -------
*  clear x_event.
*  x_event-name = .
*  x_event-form = .
*  append x_event to t_event.
**

endform.                    "set_events

form set_order using p_fieldname p_tabname p_up p_down p_subtot
                     t_sort type slis_t_sortinfo_alv.

  data: x_sort type slis_sortinfo_alv.

  clear x_sort.
  x_sort-fieldname = p_fieldname.
  x_sort-tabname   = p_tabname.
  x_sort-up = p_up.
  x_sort-down = p_down.
  x_sort-subtot = p_subtot.
  append x_sort to t_sort.


endform.                    "set_order

form set_fieldcat using
      p_colpos          "Column position.
      p_fieldname       "Field of internal table
      p_ref_fieldname   "(Optional) Table field / data element
      p_ref_tabname     "(Optional) Table which holds the field referenced
      p_outputlen       "(Optional) Column width
      p_noout           "(Optional) If set to 'X', states that the field is not showed initially
      p_seltext_m       "(Optional) Medium label
      p_seltext_l       "(Optional) Long label
      p_seltext_s       "(Optional) Small label
      p_reptext_ddic    "(Optional) Extra small (heading) label
      p_ddictxt         "(Optional) Set to 'L', 'M', 'S' or 'R'
      p_hotspot         "(Optional) If set to 'X', this field will be used as a hotspot area for cursor
      p_showasicon      "(Optional) If set to 'X', this field will be shown as an icon
      p_checkbox        "(Optional) If set to 'X', this field will be shown as a checkbox
      p_edit            "(Optional) If set to 'X', this field will be editable.
      p_dosum           "(Optional) If set to 'X', this field will be summed (aggregation function)
      t_fieldcat type slis_t_fieldcat_alv. "Table which contains the whole fieldcat.

  data: wa_fieldcat type slis_fieldcat_alv.

  clear wa_fieldcat.

* General settings
  wa_fieldcat-fieldname = p_fieldname.
  wa_fieldcat-col_pos = p_colpos.
  wa_fieldcat-no_out = p_noout.
  wa_fieldcat-hotspot = p_hotspot.
  wa_fieldcat-checkbox = p_checkbox.
  wa_fieldcat-icon = p_showasicon.
  wa_fieldcat-do_sum = p_dosum.

  if p_ref_tabname is initial.
    wa_fieldcat-rollname =   p_ref_fieldname.
  else.
    wa_fieldcat-ref_tabname = p_ref_tabname.
    if p_ref_fieldname eq space.
      wa_fieldcat-ref_fieldname =   wa_fieldcat-fieldname.
    else.
      wa_fieldcat-ref_fieldname =   p_ref_fieldname.
    endif.
  endif.

* Set output length.
  if not p_outputlen is initial.
    wa_fieldcat-outputlen = p_outputlen.
  endif.

* Set text headers.
  if not p_seltext_m is initial.
    wa_fieldcat-seltext_m = p_seltext_m.
  endif.

  if not p_seltext_l is initial.
    wa_fieldcat-seltext_l = p_seltext_l.
  endif.

  if not p_seltext_s is initial.
    wa_fieldcat-seltext_s = p_seltext_s.
  endif.

  if not p_reptext_ddic is initial.
    wa_fieldcat-reptext_ddic = p_reptext_ddic.
  endif.

  if not p_ddictxt is initial.
    wa_fieldcat-ddictxt = p_ddictxt.
  endif.

* Set as editable or not.
  if not p_edit is initial.
    wa_fieldcat-input     = 'X'.
    wa_fieldcat-edit     = 'X'.
  endif.

  append wa_fieldcat to t_fieldcat.

endform.                   "set_fieldcat2

form top_of_page.
  call function 'REUSE_ALV_COMMENTARY_WRITE'
    exporting
*     i_logo             = <<If you want to set a logo, please,
*                          uncomment and edit this line>>
      it_list_commentary = t_heading.
endform.                    " alv_top_of_page

form user_command using r_ucomm     like sy-ucomm
                        rs_selfield type slis_selfield.

* Executes a command considering the sy-ucomm.
  case r_ucomm.
    when '&IC1'.

      if rs_selfield-fieldname eq 'KUNNR'.

        set parameter id 'KUN' field rs_selfield-value.
        call transaction 'XD03' and skip first screen. " Call transaction

      else.
        message 'Wrong column' type 'I'.
      endif.

  endcase.
endform.                    "user_command

Убедитесь, что вы можете дважды щелкнуть код клиента, и программа отправит вам транзакцию «XD03».