abap_gw_contacts_get_entity

gistfile1

METHOD contacts_get_entity.
  DATA:
     ls_key_tab LIKE LINE OF it_key_tab.

  READ TABLE it_key_tab INTO ls_key_tab INDEX 1.

  SELECT SINGLE *
    INTO er_entity
    FROM zat_contacts
    WHERE handle = ls_key_tab-value.

  DATA: lv_host TYPE string,
        lv_port TYPE string,
        lv_protocol TYPE string.

*--- give avatar a fully qualified url
  cl_http_server=>get_location( IMPORTING host = lv_host
                                           port  = lv_port
                                           out_protocol = lv_protocol ).

  er_entity-avatar = |{ lv_protocol }://{ lv_host }:{ lv_port }{ er_entity-avatar }|.

ENDMETHOD.