Quantcast
Channel: SCN : All Content - Web Dynpro ABAP
Viewing all articles
Browse latest Browse all 3667

Scroll bar button position in ALV, ABAP webdynpro

$
0
0

Hi,i have to configure the scroll bar button ALV component.i have attached the DOINT method of my ALV and image for ur reference.

 

 

method WDDOINIT .

   data lo_cmp_usage type ref to if_wd_component_usage.

 

   lo_cmp_usage =   wd_this->wd_cpuse_select_option( ).

   if lo_cmp_usage->has_active_component( ) is initial.

     lo_cmp_usage->create_component( ).

   endif.

 

 

 

   DATA lo_INTERFACECONTROLLER TYPE REF TO IWCI_WDR_SELECT_OPTIONS .

   lo_INTERFACECONTROLLER =   wd_this->wd_cpifc_select_option( ).

 

   DATA  r_helper_class TYPE ref to if_wd_select_options.

   lv_r_helper_class = lo_interfacecontroller->init_selection_screen(

   ).

 

 

     DATA: RT_RANGE_TABLE TYPE REF TO data,

           RT_RANGE_TABLE1 TYPE REF TO data,

           RT_RANGE_TABLE2 TYPE REF TO data,

           RT_RANGE_TABLE3 TYPE REF TO data,

*          RT_RANGE_TABLE4 TYPE REF TO data,

           RT_RANGE_TABLE5 TYPE REF TO data.

 

   CALL METHOD lv_r_helper_class->GET_RANGE_TABLE_OF_SEL_FIELD

     EXPORTING

       I_ID           = 'MATNR'

     RECEIVING

       RT_RANGE_TABLE = RT_RANGE_TABLE.

 

 

   FIELD-SYMBOLS <fs> TYPE table.

   ASSIGN RT_RANGE_TABLE->* TO <fs>.

 

 

   CALL METHOD lv_r_helper_class->GET_RANGE_TABLE_OF_SEL_FIELD

     EXPORTING

       I_ID           = 'MTART'

     RECEIVING

       RT_RANGE_TABLE = RT_RANGE_TABLE1.

   FIELD-SYMBOLS <fs1> TYPE table.

   ASSIGN RT_RANGE_TABLE1->* TO <fs1>.

 

 

   CALL METHOD lv_r_helper_class->GET_RANGE_TABLE_OF_SEL_FIELD

     EXPORTING

       I_ID           = 'MAKTX'

     RECEIVING

       RT_RANGE_TABLE = RT_RANGE_TABLE2.

   FIELD-SYMBOLS <fs2> TYPE table.

   ASSIGN RT_RANGE_TABLE2->* TO <fs2>.

 

 

   CALL METHOD lv_r_helper_class->GET_RANGE_TABLE_OF_SEL_FIELD

     EXPORTING

       I_ID           = 'MATKL'

     RECEIVING

       RT_RANGE_TABLE = RT_RANGE_TABLE3.

   FIELD-SYMBOLS <fs3> TYPE table.

   ASSIGN RT_RANGE_TABLE3->* TO <fs3>.

 

 

   CALL METHOD lv_r_helper_class->GET_RANGE_TABLE_OF_SEL_FIELD

     EXPORTING

       I_ID           = 'DISMM'

     RECEIVING

       RT_RANGE_TABLE = RT_RANGE_TABLE5.

   FIELD-SYMBOLS <fs5> TYPE table.

   ASSIGN RT_RANGE_TABLE5->* TO <fs5>.

 

 

   DATA lo_nd_output TYPE REF TO if_wd_context_node.

 

   DATA lt_output TYPE wd_this->Elements_output.

 

* navigate from <CONTEXT> to <OUTPUT> via lead selection

   lo_nd_output = wd_context->get_child_node( name = wd_this->wdctx_output ).

 

* @TODO handle non existant child

* IF lo_nd_output IS INITIAL.

* ENDIF.

 

   lo_nd_output->bind_table( new_items = lt_output set_initial_elements = abap_true ).

 

 

   SELECT m~MATNR

          d~MAKTX

          m~MTART

          m~MATKL

          c~WERKS

          INTO  TABLE lt_output

    FROM ( ( MARA AS m INNER JOIN MARC AS c ON c~MATNR = m~MATNR )

     INNER join makt as d on d~MATNR = m~MATNR )

      WHERE m~MATNR in <fs>  AND m~MTART IN <fs1> AND m~MATKL IN <fs3> AND c~DISMM IN <fs5>

       .

       SORT lt_output.

       DELETE ADJACENT DUPLICATES FROM lt_output.

   lo_nd_output->bind_table( lt_output ).

****scroll****

 

 

endmethod.


Viewing all articles
Browse latest Browse all 3667

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>