Skip to Content
0
Former Member
Feb 19, 2009 at 05:06 PM

Graphic in ABAP Adobe form from SE78

368 Views

Hi All,

I am trying to display image(SE78) in ABAP Adobe interactive form.

But it is not displaying any image in run time.

I use following code. Can any one guide what could be the problem

method WDDOINIT .
  DATA lo_nd_adobe TYPE REF TO if_wd_context_node.
  DATA lo_el_adobe TYPE REF TO if_wd_context_element.
  DATA ls_adobe TYPE wd_this->element_adobe.
* navigate from <CONTEXT> to <ADOBE> via lead selection
  lo_nd_adobe = wd_context->get_child_node( name = wd_this->wdctx_adobe ).

* get element via lead selection
  lo_el_adobe = lo_nd_adobe->get_element(  ).

* get all declared attributes
  lo_el_adobe->get_static_attributes(
    IMPORTING
      static_attributes = ls_adobe ).



*---------Code To select LOGO & PERNR

CONSTANTS:    c_graphics    TYPE   tdobjectgr  VALUE 'GRAPHICS',
              c_bmap        TYPE   tdidgr      VALUE 'BMAP' ,
              c_bcol        TYPE   tdbtype     VALUE 'BCOL'.
  DATA:       lv_logo       TYPE   tdobname.

*--pernr
  ls_adobe-pernr = '80000086'.

*--Get the Logo
  lv_logo = 'OURSOURCE_LOGO'.

  CALL METHOD cl_ssf_xsf_utilities=>get_bds_graphic_as_bmp
    EXPORTING
      p_object       = c_graphics
      p_name         = lv_logo
      p_id           = c_bmap
      p_btype        = c_bcol
    RECEIVING
      p_bmp          = ls_adobe-logo
    EXCEPTIONS
      not_found      = 1
      internal_error = 2
      OTHERS         = 3.


*--Send the values back to the node
  lo_el_adobe->set_static_attributes(
    EXPORTING
      static_attributes = ls_adobe ).

endmethod.