Adding image/logo on selection screen

Question

How can I add image or logo on my selection - screen??

Answer 1

Hi,
in AT-SELECTION-OUTPUT EVENT put these codes:
  data: lv_docking           type ref to cl_gui_docking_container,
        lv_picture_control_1 type ref to cl_gui_picture,
        lv_url(256)          type c ,
        li_query_table       type w3query occurs 1 with header line,
        li_html_table        type w3html occurs 1,
        lv_return_code       type w3param-ret_code,
        lv_content_type      type w3param-cont_type,
        lv_content_length    type w3param-cont_len,
        li_pic_data          type w3mime occurs 0,
        lv_pic_size          type i.
  refresh :li_query_table ,li_html_table , li_pic_data.
  clear   :
  lv_url,
  lv_return_code,
  lv_pic_size,
  lv_picture_control_1,
  lv_docking,
  lv_content_type,
  lv_content_length.
  create object lv_picture_control_1
    exporting
      parent = lv_docking.
  check sy-subrc = 0.
  call method lv_picture_control_1->set_3d_border
    exporting
      border = 5.
  call method lv_picture_control_1->set_display_mode
    exporting
      display_mode = cl_gui_picture=>display_mode_stretch.
  call method lv_picture_control_1->set_position
    exporting
      height = 75
      left   = 1200
      top    = 250
      width  = 250.
  if lv_url is initial.
    refresh li_query_table.
    li_query_table-name  = '_OBJECT_ID'.
*IMAGE UPLOADED IN SWO0
    li_query_table-value = 'ZLOGO'.
    append li_query_table.
    call function 'WWW_GET_MIME_OBJECT'
      tables
        query_string        = li_query_table
        html                = li_html_table
        mime                = li_pic_data
      changing
        return_code         = lv_return_code
        content_type        = lv_content_type
        content_length      = lv_content_length
      exceptions
        object_not_found    = 1
        parameter_not_found = 2
        others              = 3.
    if sy-subrc <> 0.
     MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
             WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    endif.
    call function 'DP_CREATE_URL'
      exporting
        type     = 'image'
        subtype  = cndp_sap_tab_unknown
        size     = lv_pic_size
        lifetime = cndp_lifetime_transaction
      tables
        data     = li_pic_data
      changing
        url      = lv_url
      exceptions
        others   = 1.
  endif.
  call method lv_picture_control_1->load_picture_from_url
    exporting
      url = lv_url.