Code listing for: GET_URL_CONTENT

Description: Get url of url type attachment

**************************************************************************
*   Method attributes.                                                   *
**************************************************************************
Instantiation: Public
**************************************************************************

METHOD get_url_content.

  DATA:
    ls_key TYPE skwf_io,
    ls_error TYPE skwf_error,
    lv_dummy_message TYPE string,
    lv_url TYPE saeuri.

* Create physical key for this attachment
  ls_key-objtype = me->key-objtypeph.
  ls_key-class = me->key-classph.
  ls_key-objid = me->key-objidph.

* Get URL of physical document
  CALL METHOD cl_crm_documents=>get_with_url
    EXPORTING
      phio     = ls_key
      url_type = crmkw_url-standard
    IMPORTING
      error    = ls_error
      url      = lv_url
    EXCEPTIONS
      no_io    = 1
      OTHERS   = 2.

  IF sy-subrc <> 0 OR ls_error IS NOT INITIAL.
    MESSAGE ID ls_error-id TYPE ls_error-type NUMBER ls_error-no
      WITH ls_error-v1 ls_error-v2 ls_error-v3 ls_error-v4
      INTO lv_dummy_message.
    RAISE EXCEPTION TYPE zcx_gos_attachment_exception.
  ENDIF.

  url = lv_url.

ENDMETHOD.