Drag and Drop in Web dynpro ALV

Question

I have a requirement in wda where I am supposed to select few records from source table and drop it in target table. The dropped records should be inserted at the right index /destination, dropped at.  I see SAP examples but they are all associated with tables and none of them are ALV grids.
Could anyone of you please share steps or code to achieve drap and drop in SALV_WD_TABLE.

Answer 1

Hi Kiran,
I am in 703 so drag and drop should work good .
I am required to drag and drop records from ALV1(bottom) to ALV2(top) (and not table UI). I could create drag source but somehow the whole piece is not working .
Drop target field is dynamic. Wherever the user drops, the data in ALV2 should be inserted/updated exactly at that spot/cell . Here, I am not sure how to fill target row/field details runtime.
Just to simplify, I am doing 1 column move. Hard coded the target field ‘AUFNR3’ but still than My “On drop event” is not triggering. I always see a prohibitory sign when trying to move the ghost image across areas as if the column is not defined as DropTarget.
My code looks something like this:
Drop from AUFNR of ALV2 to AUFNR3 of ALV1 :
In WDDOINIT:*...get alv models
  lr_dd_alv1 ?= wd_this->r_model_calen.
  lr_dd_alv2 ?= wd_this->r_model_operlist.
l_tags_alv2 = 'AUFNR'.* create or enable/disable alvs as drag source
  IF NOT lr_dd_alv2->r_drag_source_info IS BOUND.
    lr_dd_alv2->create_drag_source_info(
      EXPORTING
        data = 'ALV2'
        tags = l_tags_alv2 "'alv2'
        enabled = abap_true ).
  ELSE.
    lr_dd_alv2->r_drag_source_info->set_enabled( abap_true ).
  ENDIF.
l_tags_alv1 = 'AUFNR3'.
  lr_dd_alv1->set_drop_row_name_fieldname( 'AUFNR3' ).
  lr_dd_alv1->set_drop_row_name( ' ' ).
  lr_dd_alv1->create_drop_row_target_info(
    EXPORTING
      id   = 'ALV1'
      name = 'alv1'
      tags = l_tags_alv1
      enabled = abap_true ).
In drop event: I am trying to fetch the selected row and update the ALV2 accordingly
lr_element = lr_node->get_lead_selection( ).
  IF lr_element IS BOUND.
    lr_element->get_attribute(
        EXPORTING
          name = 'AUFNR'
        IMPORTING
          value = l_value ).
  ENDIF.
    lo_nd_nd_calendar = wd_context->get_child_node( name = wd_this->wdctx_nd_calendar ).
  lo_nd_nd_calendar->bind_table( new_items = lt_nd_calendar set_initial_elements = abap_true ).
ENDMETHOD.
Any help is greatly appreciated..