Buttons In Tree ALV

Hi,
I have a docking container in which I need to add a button along with the other buttons in the Tree ALV.
When the button is created I need to give the button name Dynamically according to particular data.
Can someone tell how we can do that?
What class,methods and the events that can be used for this purpose?
How are events handled in OOABAP?
Can someone send some documents on OOABAP?
Thanks,
Supriya Manik.

hi,
May be this piece of code may help u to add a button in alv tree........
Add_Button
data: lr_functions type ref to cl_salv_functions_tree.
lr_functions = mr_tree->get_functions( ).
lr_functions->add_function(
name = '&OPEN_ALL'
icon = l_icon
text = l_text1
tooltip = l_text1
position = if_salv_c_function_position=>right_of_salv_functions ).
<b>here r all the links for OO abap...</b>
http://www.sapgenie.com/abap/OO/index.htm
http://www.geocities.com/victorav15/sapr3/abap_ood.html
http://www.brabandt.de/html/abap_oo.html
Check this cool weblog:
/people/thomas.jung3/blog/2004/12/08/abap-persistent-classes-coding-without-sql
/people/thomas.jung3/blog/2004/12/08/abap-persistent-classes-coding-without-sql
http://help.sap.com/saphelp_nw04/helpdata/en/c3/225b6254f411d194a60000e8353423/frameset.htm
http://www.sapgenie.com/abap/OO/
http://www.sapgenie.com/abap/OO/index.htm
http://help.sap.com/saphelp_nw04/helpdata/en/c3/225b5654f411d194a60000e8353423/content.htm
http://www.esnips.com/doc/375fff1b-5a62-444d-8ec1-55508c308b17/prefinalppt.ppt
http://www.esnips.com/doc/2c76dc57-e74a-4539-a20e-29383317e804/OO-abap.pdf
http://www.esnips.com/doc/5c65b0dd-eddf-4512-8e32-ecd26735f0f2/prefinalppt.ppt
http://www.allsaplinks.com/
http://www.sap-img.com/
http://www.sapgenie.com/
http://help.sap.com
http://www.sapgenie.com/abap/OO/
http://www.sapgenie.com/abap/OO/index.htm
http://www.sapgenie.com/abap/controls/index.htm
http://www.esnips.com/doc/2c76dc57-e74a-4539-a20e-29383317e804/OO-abap.pdf
http://www.esnips.com/doc/0ef39d4b-586a-4637-abbb-e4f69d2d9307/SAP-CONTROLS-WORKSHOP.pdf
http://www.sapgenie.com/abap/OO/index.htm
http://help.sap.com/saphelp_erp2005/helpdata/en/ce/b518b6513611d194a50000e8353423/frameset.htm
http://www.sapgenie.com/abap/OO/
these links
http://help.sap.com/saphelp_47x200/helpdata/en/ce/b518b6513611d194a50000e8353423/content.htm
For funtion module to class
http://help.sap.com/saphelp_47x200/helpdata/en/c3/225b5954f411d194a60000e8353423/content.htm
for classes
http://help.sap.com/saphelp_47x200/helpdata/en/c3/225b5c54f411d194a60000e8353423/content.htm
for methods
http://help.sap.com/saphelp_47x200/helpdata/en/08/d27c03b81011d194f60000e8353423/content.htm
for inheritance
http://help.sap.com/saphelp_47x200/helpdata/en/dd/4049c40f4611d3b9380000e8353423/content.htm
for interfaces
http://help.sap.com/saphelp_47x200/helpdata/en/c3/225b6254f411d194a60000e8353423/content.htm
For Materials:
1) http://help.sap.com/printdocu/core/Print46c/en/data/pdf/BCABA/BCABA.pdf -- Page no: 1291
2) http://esnips.com/doc/5c65b0dd-eddf-4512-8e32-ecd26735f0f2/prefinalppt.ppt
3) http://esnips.com/doc/2c76dc57-e74a-4539-a20e-29383317e804/OO-abap.pdf
4) http://esnips.com/doc/0ef39d4b-586a-4637-abbb-e4f69d2d9307/SAP-CONTROLS-WORKSHOP.pdf
5) http://esnips.com/doc/92be4457-1b6e-4061-92e5-8e4b3a6e3239/Object-Oriented-ABAP.ppt
6) http://esnips.com/doc/448e8302-68b1-4046-9fef-8fa8808caee0/abap-objects-by-helen.pdf
7) http://esnips.com/doc/39fdc647-1aed-4b40-a476-4d3042b6ec28/class_builder.ppt
8) http://www.amazon.com/gp/explorer/0201750805/2/ref=pd_lpo_ase/102-9378020-8749710?ie=UTF8
1) http://www.erpgenie.com/sap/abap/OO/index.htm
2) http://help.sap.com/saphelp_nw04/helpdata/en/ce/b518b6513611d194a50000e8353423/frameset.htm
I am having a good document on OO abap whcih is containing good information regarding the events handling but how can i send it to you....?

Similar Messages

Add a button choice on alv toolbar in wd4a

Hy everyone i've to add a button choice on alv toolbar. I create a node 'MY_TOOLBAR_FUNCTIONS' where add node and attributes to bind in external mapping in function_elements of alv interface controller.For button_choice I made a node 'CHOICE' and attribute 'WA_VALUE' type string. But the application dumps when create object lr_choice ; the error is WebDynpro Exception: IDs Can Only Contain Characters of Syntactical Character Set .
May you help me? Thanks in advance.
data: ls_choice TYPE ig_componentcontroller=>element_choice,
          nd_choice TYPE REF TO if_wd_context_node,
nd_choice = nd_my_functions->get_child_node( name = wd_this->wdctx_choice ).
el_choice = nd_choice->get_element( ).
ls_choice-wa_value = '01'.
APPEND ls_choice TO lt_choice.
nd_choice->bind_table( lt_choice ).
DATA:lr_button_choice TYPE REF TO cl_salv_wd_fe_button_choice.
DATA:lr_choice TYPE REF TO cl_salv_wd_menu_action_item.
lr_function = l_value->if_salv_wd_function_settings~create_function_right( id = 'MYBUTTONCHOICE' ).
CREATE OBJECT lr_button_choice.
          EXPORTING
            sel_action_item_elementname = 'CHOICE.WA_VALUE'.
lr_button_choice->set_text( value = 'Filter' ).
lr_button_choice->set_tooltip( value = 'Filter').
lr_button_choice->set_sel_action_itm_elementname( 'CHOICE.WA_VALUE' ).
CREATE OBJECT lr_choice
    EXPORTING
      id = ls_CHOICE-WA_VALUE.
lr_choice->set_text( 'Esito Positivo' ).
lr_choice->set_image_source( value = 'ICON_GREEN_LIGHT').
lr_button_choice->add_choice( lr_choice ).
lr_function->set_editor( lr_button_choice ).

in   CREATE OBJECT lr_choice the object id have to refer to name of node.
CREATE OBJECT lr_choice
     EXPORTING
       id = 'CHOICE'.

Add button to QA33 ALV output list

Hi, SAP experts:
I need to add a custom button to the ALV output list display in QA33 transaction.
I´ve only found the BAdi ALV_SWITCH_GRID_LIST, but it doesn´t fit my requirements at all.
Any idea?
Thank you very much!

Hi,
Please check if this explanation helps you,
Custom Butoon in REUSE_ALV_GRID_DISPLAY_LVC
Regards
Ram

How to add a new button in an ALV using factory method

im using factory method to creat an ALV
The reason why I'm doing this is because I want the ALV and the selection screen in the same screen like exemplified here http://help-abap.blogspot.com/2008/10/dispaly-alv-report-output-in-same.html
CALL METHOD cl_salv_table=>factory
            EXPORTING
              list_display   = if_salv_c_bool_sap=>false
              r_container    = lo_cont
              container_name = 'DOCK_CONT'
            IMPORTING
              r_salv_table   = lo_alv
            CHANGING
              t_table        = me->t_data.
The above code already uses every parameter that method as to offer.
Is it possible to add extra buttons to an ALV using that method?

Hi Ann,
The reason you are not able to see any of the new columns as a option to select in your web service block is because when you have published that block, they were not present. Add these two new objects in your block and publish it again. You will be prompted for duplication content. Select the highlighted block for duplicate and now you can see the new added objects in the filter option. Update and this will overwrite your published block. Please note, web services do appear to behave weirdly when used with dashboards so I request you to please try it in a separate test report first.
Hope that helps.
Regards,
Tanisha

Create standard sap "SAVE" button along with ALV grid buttons

I need to create a standard SAP "Save" button in my ALV GRID display in the application tool bard
I copied the PF-Status 'standard' from a SAP program and assinged it here.
When i try to add the SAP save buttion by using this standard pf-status , its not getting displayed in the application tool bar.
But in STandard TOOl bar (in menu painter ) , when i assign save its displayed in the screen .
I need this to be displayed in the application tool ba
Please suggest me how to do this.
Thanks in advance.

Hello,
Application of ALV means the place where the buttons(standard for ALV) like sort,add,delete,copy etc are dipslayed.IF u need need to add a save button on the same toolbar/same place u need to copy the standard GUI status of standard ALV program .For that go to SE80 , give the program name as SAPLSLVC_FULLSCREEN
In the GUI status u'll find the status named as STANDARD_FULLSCREEN ....Right click on it and give the "TO Program " as your program.Now once u activate ur program u'll find the same status there.
add ur save button in the status by edidting it. Now u need to write the FORM ENDFORM for user command and assign the form name in caps to the USER_COMMAND parameter in the func module REUSE_ALV_GRID_DISPLAY.
Hope this help.
Regards,
Neeraj

How can we add a button on our ALV Grid

Hello,
I need to add a button on the ALV Grid and write a code on that button to download a file on the desktop of the user's machine.
How can we write a code for the same and what would be the syntax of that code.

Hi,
you should copy the 'STANDARD' GUI status from program SAPLKKBL using transaction SE90 >Programming SubObjects> Gui Status.
ENTER SAPLKKBL PROGRAM
STATUS STANDARD.
exexute.
select standard check box. copy to your zprogram and your gui status.
Enter your Z program name and the name you what for this status - you can keep it as 'STANDARD' to be simple.
then go to se 38 double click on pf status .it goes to me41 screen .
there you can add your button along with predefined buttons on application toolbar.
then write code for button using user command event.
Code:
Form Set_pf_status
Notes: Called by FM REUSE_ALV_GRID_DISPLAY
FORM set_pf_status USING rt_extab TYPE slis_t_extab.
SET PF-STATUS 'ZSTANDARD'.
ENDFORM. "Set_pf_status
In the above case the GUI status copied was named ZSTANDARD and adjusted accordingly, adding and removing the desired buttons. A button was added called '%DELETE'.
3). Create the following report:
Code:
Form User_command
Notes: Called by FM REUSE_ALV_GRID_DISPLAY
       Detects whether the icon/button for
       'Return Tag Deletion' has been pressed. If it has then
       detect whether any rows have been highlighted and then
       set the delete flag.
FORM user_command USING r_ucomm     LIKE sy-ucomm
                        rs_selfield TYPE slis_selfield.
DATA: li_count TYPE I.
IF r_ucomm EQ '%DELETE'.
LOOP AT %g00 WHERE mark EQ 'X'.
    ADD 1 TO li_count.
ENDLOOP.
IF li_count GT 0.
    gc_delete_flag = 'X'.
    r_ucomm = '&F03'. "Back arraow
ELSE.
    MESSAGE W000 WITH 'Please highlight the rows to be deleted!'.
ENDIF.
ENDIF.
ENDFORM. "User_command
*reward points if usefull

ME57 - Convert Purchase Requisitions - New fields to Tree ALV in Overview?

Hello,
From ME57, one can get a list of purchase requisitions, click "Assignments," and then "Process Assignment."
What next appears is a list of requisitions in a Tree ALV grid. The title of the grid is: "Convert Purchase Requisitions."
I would like to add a new field from EBAN to this ALV grid. The field is not currently available in change layout. The structure that I think is displayed is MMPUR_S_DBL_ASSIGNEDREQS.
Is there a BADI or some other way to get additional fields on this Tree report (which, of course, is used to drag requisitions to the right side of the screen in ME21N)????????
Thank you,
-Ken

Hello,
From ME57, one can get a list of purchase requisitions, click "Assignments," and then "Process Assignment."
What next appears is a list of requisitions in a Tree ALV grid. The title of the grid is: "Convert Purchase Requisitions."
I would like to add a new field from EBAN to this ALV grid. The field is not currently available in change layout. The structure that I think is displayed is MMPUR_S_DBL_ASSIGNEDREQS.
Is there a BADI or some other way to get additional fields on this Tree report (which, of course, is used to drag requisitions to the right side of the screen in ME21N)????????
Thank you,
-Ken

How to add the REFRESH button in OOPs ALV grid

how to add the REFRESH button in OOPs ALV grid

Hi Naidu.
Check the below code:
Local Class Definition and implementation For events handeling
CLASS LCL_EVENT DEFINITION .
PUBLIC SECTION.
    METHODS :TOOLBAR FOR EVENT TOOLBAR OF CL_GUI_ALV_GRID
                     IMPORTING E_OBJECT,
             USER_COMMAND FOR EVENT USER_COMMAND OF CL_GUI_ALV_GRID
                     IMPORTING E_UCOMM.
ENDCLASS.
CLASS LCL_EVENT IMPLEMENTATION.
METHOD TOOLBAR.
    WA_TOOL-FUNCTION = 'ZFC1'.
    WA_TOOL-TEXT     = 'TEST'.
    WA_TOOL-ICON     = '@EA@'.
    APPEND WA_TOOL TO E_OBJECT->MT_TOOLBAR.
ENDMETHOD.             "DISPLAY
METHOD USER_COMMAND.
    IF E_UCOMM = 'ZFC1'.
          ENDIF.
ENDMETHOD.                    "USER_COMMAND
ENDCLASS.                    "LCL_EVENT IMPLEMENTATION
MODULE STATUS_0200 OUTPUT.
SET PF-STATUS 'ZALV_BTON'.
SELECT * FROM VBAK INTO TABLE GT_VBAK
           UP TO 30 ROWS.
**** CREATE CONTAINER OBJECT
CREATE OBJECT MY_CONTAINER
    EXPORTING
      CONTAINER_NAME              = 'CC1'
     EXCEPTIONS
      CNTL_ERROR                  = 1
      CNTL_SYSTEM_ERROR           = 2
      CREATE_ERROR                = 3
      LIFETIME_ERROR              = 4
      LIFETIME_DYNPRO_DYNPRO_LINK = 5
      OTHERS                      = 6 .
****** GRID TO CONTAINER
CREATE OBJECT ALV
      EXPORTING
      I_PARENT          = MY_CONTAINER
     EXCEPTIONS
      ERROR_CNTL_CREATE = 1
      ERROR_CNTL_INIT   = 2
      ERROR_CNTL_LINK   = 3
      ERROR_DP_CREATE   = 4
      OTHERS            = 5.
CREATE OBJECT OBJ.
SET HANDLER : OBJ->TOOLBAR FOR ALV.
SET HANDLER : OBJ->USER_COMMAND FOR ALV.
****** ALV DISPLAY
CALL METHOD ALV->SET_TABLE_FOR_FIRST_DISPLAY
    EXPORTING
      I_STRUCTURE_NAME              = 'VBAK'
    CHANGING
      IT_OUTTAB                     = GT_VBAK[]
    EXCEPTIONS
      INVALID_PARAMETER_COMBINATION = 1
      PROGRAM_ERROR                 = 2
      TOO_MANY_LINES                = 3
      OTHERS                        = 4.
ENDMODULE.                 " STATUS_0200 OUTPUT
*&      Module USER_COMMAND_0200 INPUT
*       text
MODULE USER_COMMAND_0200 INPUT.
IF SY-UCOMM EQ 'BACK'.
    LEAVE PROGRAM.
ENDIF.
ENDMODULE.                 " USER_COMMAND_0200 INPUT
Regards
Kumar M

How to do subtotal and grand total as per currency in a tree ALV

Hi Experts,
I am doing a tree ALV for SD output. I met an urgent problem that is how to do subtotal and grand total on the field (netwr) as per currency (waerk) in the tree ALV. I am using below codes to create the tree ALV.
    l_tree_container_name = 'CCONTAINER1'.
    CREATE OBJECT objCustomContainer
        EXPORTING
              container_name = l_tree_container_name
        EXCEPTIONS
              cntl_error                  = 1
              cntl_system_error      = 2
              create_error               = 3
              lifetime_error              = 4
              lifetime_dynpro_dynpro_link = 5.
create tree control
    CREATE OBJECT objTree1
      EXPORTING
          parent              = objCustomContainer
          node_selection_mode = cl_gui_column_tree=>node_sel_mode_single
          item_selection      = ' '
          no_html_header      = 'X'
          no_toolbar          = ''
      EXCEPTIONS
          cntl_error                   = 1
          cntl_system_error       = 2
          create_error                = 3
          lifetime_error               = 4
          illegal_node_selection_mode = 5
          failed                       = 6
          illegal_column_name          = 7.
    DATA l_hierarchy_header TYPE treev_hhdr.
    call method buildHierarchyHeader
      IMPORTING
        p_hierarchy_header = l_hierarchy_header.
Build fieldcatalog
    call method buildFieldcatalog.
    CALL METHOD objTree1->set_table_for_first_display
        EXPORTING
          is_hierarchy_header = l_hierarchy_header
        CHANGING
          it_fieldcatalog     = l_fieldcatalog
          it_outtab            = lt_order.
    CALL METHOD objTree1->update_calculations.
    CALL METHOD objTree1->frontend_update.
filling fieldcatalog,
      LS_FIELDCATALOG-FIELDNAME = 'NETWR'.
      LS_FIELDCATALOG-SCRTEXT_S = 'Net Value'.
      LS_FIELDCATALOG-COL_POS = l_pos.
      LS_FIELDCATALOG-OUTPUTLEN = 15.
      LS_fieldcatalog-do_dum= 'X'.
      LS_FIELDCATALOG-DATATYPE = 'CURR'.
      APPEND LS_FIELDCATALOG TO l_FIELDCATALOG.
      CLEAR LS_FIELDCATALOG.
      l_pos = l_pos + 1.
I could see the subtotal and grandtotal in tree ALV but they are simply sumed up regardless different currency.
Thank you very much for your kindly helps.
Yu

hi
good
go through this report and work accordingly.
REPORT ZALV.
TYPE-POOLS: SLIS.
DATA: G_REPID LIKE SY-REPID,
GS_PRINT            TYPE SLIS_PRINT_ALV,
GT_LIST_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER,
GT_EVENTS           TYPE SLIS_T_EVENT,
GT_SORT             TYPE SLIS_T_SORTINFO_ALV,
GS_LAYOUT           TYPE SLIS_LAYOUT_ALV,
GT_FIELDCAT         TYPE SLIS_T_FIELDCAT_ALV,
FIELDCAT_LN LIKE LINE OF GT_FIELDCAT,
COL_POS TYPE I.
DATA: BEGIN OF ITAB,
FIELD1(5) TYPE C,
FIELD2(5) TYPE C,
FIELD3(5) TYPE P DECIMALS 2,
END OF ITAB.
DATA: BEGIN OF ITAB1 OCCURS 0.
INCLUDE STRUCTURE ITAB.
DATA: END OF ITAB1.
DATA: BEGIN OF ITAB_FIELDCAT OCCURS 0.
INCLUDE STRUCTURE ITAB.
DATA: END OF ITAB_FIELDCAT.
Print Parameters
PARAMETERS:
            P_PRINT AS CHECKBOX DEFAULT ' ', "PRINT IMMEDIATE
            P_NOSINF AS CHECKBOX DEFAULT 'X', "NO SELECTION INFO
            P_NOCOVE AS CHECKBOX DEFAULT ' ', "NO COVER PAGE
            P_NONEWP AS CHECKBOX DEFAULT ' ', "NO NEW PAGE
            P_NOLINF AS CHECKBOX DEFAULT 'X', "NO PRINT LIST INFO
            P_RESERV TYPE I.                  "NO OF FOOTER LINE
INITIALIZATION.
G_REPID = SY-REPID.
PERFORM PRINT_BUILD    USING GS_PRINT.      "Print PARAMETERS
START-OF-SELECTION.
TEST DATA
MOVE 'TEST1' TO ITAB1-FIELD1.
MOVE 'TEST1' TO ITAB1-FIELD2.
MOVE '10.00' TO ITAB1-FIELD3.
APPEND ITAB1.
MOVE 'TEST2' TO ITAB1-FIELD1.
MOVE 'TEST2' TO ITAB1-FIELD2.
MOVE '20.00' TO ITAB1-FIELD3.
APPEND ITAB1.
DO 50 TIMES.
APPEND ITAB1.
ENDDO.
END-OF-SELECTION.
PERFORM BUILD.
PERFORM EVENTTAB_BUILD CHANGING GT_EVENTS.
PERFORM COMMENT_BUILD CHANGING GT_LIST_TOP_OF_PAGE.
PERFORM CALL_ALV.
FORM BUILD.
DATA FIELD CATALOG
Explain Field Description to ALV
DATA: FIELDCAT_IN TYPE SLIS_FIELDCAT_ALV.
CLEAR FIELDCAT_IN.
FIELDCAT_LN-FIELDNAME = 'FIELD1'.
FIELDCAT_LN-TABNAME   = 'ITAB1'.
*FIELDCAT_LN-NO_OUT    = 'X'. "FIELD NOT DISPLAY, CHOOSE FROM LAYOUT
FIELDCAT_LN-KEY       = ' '.   "SUBTOTAL KEY
FIELDCAT_LN-NO_OUT    = ' '.
FIELDCAT_LN-SELTEXT_L = 'HEAD1'.
APPEND FIELDCAT_LN TO GT_FIELDCAT.
CLEAR FIELDCAT_IN.
FIELDCAT_LN-FIELDNAME = 'FIELD2'.
FIELDCAT_LN-TABNAME   = 'ITAB1'.
FIELDCAT_LN-NO_OUT    = 'X'.
FIELDCAT_LN-SELTEXT_L = 'HEAD2'.
APPEND FIELDCAT_LN TO GT_FIELDCAT.
CLEAR FIELDCAT_IN.
FIELDCAT_LN-FIELDNAME     = 'FIELD3'.
FIELDCAT_LN-TABNAME       = 'ITAB1'.
FIELDCAT_LN-REF_FIELDNAME = 'MENGE'. "<- REF FIELD IN THE DICTIONNARY
FIELDCAT_LN-REF_TABNAME   = 'MSEG'. "<- REF TABLE IN THE DICTIONNARY
FIELDCAT_LN-NO_OUT        = ' '.
FIELDCAT_LN-DO_SUM        = 'X'.   "SUM UPON DISPLAY
APPEND FIELDCAT_LN TO GT_FIELDCAT.
DATA SORTING AND SUBTOTAL
DATA: GS_SORT TYPE SLIS_SORTINFO_ALV.
CLEAR GS_SORT.
GS_SORT-FIELDNAME = 'FIELD1'.
GS_SORT-SPOS      = 1.
GS_SORT-UP        = 'X'.
GS_SORT-SUBTOT    = 'X'.
APPEND GS_SORT TO GT_SORT.
CLEAR GS_SORT.
GS_SORT-FIELDNAME = 'FIELD2'.
GS_SORT-SPOS      = 2.
GS_SORT-UP        = 'X'.
*GS_SORT-SUBTOT    = 'X'.
APPEND GS_SORT TO GT_SORT.
ENDFORM.
FORM CALL_ALV.
ABAP List Viewer
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
I_BYPASSING_BUFFER =
I_BUFFER_ACTIVE = ' '
I_CALLBACK_PROGRAM = G_REPID
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
I_STRUCTURE_NAME = 'ITAB1'
IS_LAYOUT = GS_LAYOUT
IT_FIELDCAT = GT_FIELDCAT[]
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT = GT_SORT[]
IT_FILTER =
IS_SEL_HIDE =
I_DEFAULT = 'X'
I_SAVE = ' '
IS_VARIANT =
IT_EVENTS = GT_EVENTS[]
IT_EVENT_EXIT =
IS_PRINT = GS_PRINT
IS_REPREP_ID =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
TABLES
T_OUTTAB = ITAB1
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2.
ENDFORM.
HEADER FORM
FORM EVENTTAB_BUILD CHANGING LT_EVENTS TYPE SLIS_T_EVENT.
CONSTANTS:
GC_FORMNAME_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE'.
*GC_FORMNAME_END_OF_PAGE TYPE SLIS_FORMNAME VALUE 'END_OF_PAGE'.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
       EXPORTING
            I_LIST_TYPE = 0
       IMPORTING
            ET_EVENTS   = LT_EVENTS.
READ TABLE LT_EVENTS WITH KEY NAME = SLIS_EV_TOP_OF_PAGE
                           INTO LS_EVENT.
IF SY-SUBRC = 0.
    MOVE GC_FORMNAME_TOP_OF_PAGE TO LS_EVENT-FORM.
    APPEND LS_EVENT TO LT_EVENTS.
ENDIF.
define END_OF_PAGE event
READ TABLE LT_EVENTS WITH KEY NAME = SLIS_EV_END_OF_PAGE
                         INTO LS_EVENT.
IF SY-SUBRC = 0.
MOVE GC_FORMNAME_END_OF_PAGE TO LS_EVENT-FORM.
APPEND LS_EVENT TO LT_EVENTS.
ENDIF.
ENDFORM.
FORM COMMENT_BUILD CHANGING GT_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER.
DATA: GS_LINE TYPE SLIS_LISTHEADER.
CLEAR GS_LINE.
GS_LINE-TYP = 'H'.
GS_LINE-INFO = 'HEADER 1'.
APPEND GS_LINE TO GT_TOP_OF_PAGE.
CLEAR GS_LINE.
GS_LINE-TYP = 'S'.
GS_LINE-KEY = 'STATUS 1'.
GS_LINE-INFO = 'INFO 1'.
APPEND GS_LINE TO GT_TOP_OF_PAGE.
GS_LINE-KEY = 'STATUS 2'.
GS_LINE-INFO = 'INFO 2'.
APPEND GS_LINE TO GT_TOP_OF_PAGE.
CLEAR GS_LINE.
GS_LINE-TYP = 'A'.
GS_LINE-INFO = 'ACTION'.
APPEND GS_LINE TO GT_TOP_OF_PAGE.
ENDFORM.
FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
       EXPORTING
            IT_LIST_COMMENTARY = GT_LIST_TOP_OF_PAGE.
WRITE: SY-DATUM, 'Page No', SY-PAGNO LEFT-JUSTIFIED.
ENDFORM.
FORM END_OF_PAGE.
WRITE at (sy-linsz) sy-pagno CENTERED.
ENDFORM.
PRINT SETTINGS
FORM PRINT_BUILD USING LS_PRINT TYPE SLIS_PRINT_ALV.
LS_PRINT-PRINT              = P_PRINT. "PRINT IMMEDIATE
LS_PRINT-NO_PRINT_SELINFOS = P_NOSINF. "NO SELECTION INFO
LS_PRINT-NO_COVERPAGE       = P_NOCOVE. "NO COVER PAGE
LS_PRINT-NO_NEW_PAGE        = P_NONEWP.
LS_PRINT-NO_PRINT_LISTINFOS = P_NOLINF. "NO PRINT LIST INFO
LS_PRINT-RESERVE_LINES      = P_RESERV.
ENDFORM.
thanks
mrutyun^

How to add a button to an alv standar report

Hi all,
I've got a requiremnt to modify the behaviour of the edit button of the ALV in TX vfx3.
When the edit button pressed, the requiered behaviour is to navigate to a Z TX. Is it possible to edit the ALV without creating a new Z alv? Just changing the standard?
Edited by: Iñaki Nolte Usparicha on Dec 29, 2010 12:18 PM

Hi Iñaki, you have to copy (using transaction SE41) Status-GUI "standard" from program SAPLSALV, with the same name as our program. Delete all unnecessary components and add your custom button.
In the program you have to add:
Form F_SET_PF_STATUS USING rt_extab TYPE slis_t_extab.
     SET PF-STATUS 'STANDARD'.
Endform.
Form f_user_command USING      r_ucomm LIKE sy-ucomm
                                                              rs_selfield TYPE slis_selfield.
     CASE r_ucomm.
              WHEN '%NF'. "NF is the name of the button
                    PERFORM f_do_something.
     ENDCASE.
Endform.

How to add a button on the ALV LIST pop up

Hi ,
Can any one help me to add a button on the ALV list which is a pop up using ABAP Objects.
Thanks in advance.
Regards,
Kavya.

HI ,
I want to add a push button on the ALV list out put which is comming as a pop up and I want this using classes and methods.
I have got a method IF_SREL_BROWSER_COMMANDS~ADD_BUTTONS from class cl_gos_attachment_list but still I am unable to get any additional button on the output ALV popup.
Please help.
Regards,
Kavya.

How to use selection buttons in an ALV created without abap objects?

Hi, I use an alv created without ABAP Objects to show some information. Can I introduce inside the alv, the top buttons to select all rows / none row? And the second question, how may I introduce lateral buttons in the ALV to select indidividual rows?
Thanks!

HI
i think you use REUSE_ALV_LIST_DISPLAY or REUSE_ALV_GRID_DISPLAY FMs.
Try to calling the function in this way
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
      EXPORTING
*      I_INTERFACE_CHECK              = ' '
*      I_BYPASSING_BUFFER             =
*      I_BUFFER_ACTIVE                = ' '
       i_callback_program             = 'YOURREPORT'
       i_callback_pf_status_set       = 'SET_PF_STATUS'
       i_callback_user_command        = 'USER_COMAND'
*      I_STRUCTURE_NAME               =
       is_layout                      = ls_layout
       it_fieldcat                    = fieldcat
*      IT_EXCLUDING                   =
*      IT_SPECIAL_GROUPS              =
*      IT_SORT                        =
*      IT_FILTER                      =
*      IS_SEL_HIDE                    =
*      I_DEFAULT                      = 'X'
       i_save                         = 'A'
      is_variant                     = gt_variant
      it_events                      = event_tab
*      IT_EVENT_EXIT                  =
*      IS_PRINT                       =
*      IS_REPREP_ID                   =
*      I_SCREEN_START_COLUMN          = 0
*      I_SCREEN_START_LINE            = 0
*      I_SCREEN_END_COLUMN            = 0
*      I_SCREEN_END_LINE              = 0
*    IMPORTING
*      E_EXIT_CAUSED_BY_CALLER        =
*      ES_EXIT_CAUSED_BY_USER         =
       TABLES
         t_outtab                     = tb_output
      EXCEPTIONS
        program_error                  = 1
        OTHERS                         = 2.
ENDFORM.                    " LISTA
where
'SET_PF_STATUS'
'USER_COMAND'
are two form like this.
FORM set_pf_status USING rt_extab TYPE slis_t_extab.
SET PF-STATUS 'ZSTANDARD'. " EXCLUDING rt_extab.
ENDFORM.                               " SET_PF_STATUS
FORM user_comand USING r_ucomm     LIKE sy-ucomm
                         rs_selfield TYPE slis_selfield.
CASE r_ucomm.
    WHEN '&CPR'.
    WHEN 'YOUR CODE FUNCTION'
endcase.
I hope it can help you.
Bye
enzo

Can we disable the default push buttons on the ALV Grid

Hi,
    Can we disable the default push buttons on the ALV
Grid Control...
    If so, pls send me the procedure...
thanks and regards
   raghu

Hi,
In the PBO:
PERFORM f9100_exclude_functions USING :
                         i_exclude[] '&CHECK',
                         i_exclude[] '&REFRESH',
                         i_exclude[] '&LOCAL&CUT' ,
                         i_exclude[] '&LOCAL&COPY',
                         i_exclude[] '&LOCAL&PASTE',
                         i_exclude[] '&LOCAL&PASTE_NEW_ROW',
                         i_exclude[] '&LOCAL&UNDO' ,
                         i_exclude[] '&LOCAL&APPEND',
                         i_exclude[] '&LOCAL&INSERT_ROW',
                         i_exclude[] '&LOCAL&DELETE_ROW',
                         i_exclude[] '&SORT_ASC',
                         i_exclude[] '&SORT_DSC',
                         i_exclude[] '&FIND',
                         i_exclude[] '&SUMC',
                         i_exclude[] '&SUBTOT',
                         i_exclude[] '&MINIMUM',
                         i_exclude[] '&MAXIMUM' ,
                         i_exclude[] '&VGRID' ,
                         i_exclude[] '&VEXCEL' ,
                         i_exclude[] '&VCRYSTAL',
                         i_exclude[] '&HTML',
                         i_exclude[] '&MAINTAIN',
                         i_exclude[] '&SAVE',
                         i_exclude[] '&GRAPH',
                         i_exclude[] '&HELP',
                         i_exclude[] '&ALL' ,
                         i_exclude[] '&SAL' .
*                         i_exclude[] '&EXCLALLFC'.
*&      Form f9100_exclude_functions
* This form exclude buttons from the toolbar.
*      -->P_IEXCLUDE text
*      -->P_1150   text
FORM f9100_exclude_functions USING   pexclude LIKE i_exclude
                               value(pfunction).
DATA: l_exclude TYPE ui_func.
l_exclude = pfunction.
APPEND l_exclude TO pexclude.
ENDFORM.                    " f9100_exclude_functions
This will exculde the default push buttons.
Let us know if it works for you.
Regards,
Anjali

Help on Button Choice of alv tool bar

Hai , i created a button choice on the ALV tool bar .
and now problem is how to capture the choices i.e how to check which choice is selected on the button?
i defined an event handler methos with refernce to the event ON_FUNCTION of the alv.
Please help me , its urgent,
Madhuh

Hi Madhuh,
could you help me? I have a similar issue. It seems that you are one step ahead cause for me it is not possible to see the button choice in ALV.
How did you set the button choice object to the ALV toolbar?
I tried following:
DATA: lr_interfacecontroller TYPE REF TO iwci_salv_wd_table,
        lr_alv_conf            TYPE REF TO cl_salv_wd_config_table,
        lr_func_settings       TYPE REF TO if_salv_wd_function_settings,
        lr_function            TYPE REF TO cl_salv_wd_function,
        lr_menu_action         TYPE REF TO cl_salv_wd_menu_action_item,
        lr_button_choice       TYPE REF TO cl_salv_wd_fe_button_choice,
* create button choice
CREATE OBJECT lr_button_choice.
* function ID (need for field propeties?!)
lr_function = lr_func_settings->create_function( 'BTN_CREATE_ETA' ).
* set text
lv_text = cl_wd_utilities=>get_otr_text_by_alias( '/SCMTMS/UI_COMMON/CREATE_ETA' ).
lr_button_choice->set_text( lv_text ).
* create menu objects for the categories depending on allowed categories:
LOOP AT lt_value_set INTO ls_value_set.
    CONCATENATE 'CREATE_ETA' ls_value_set-key INTO lv_id.
    lv_text = ls_value_set-value.
*   create menu action now
    CREATE OBJECT lr_menu_action
      EXPORTING
        id = lv_id.
    lr_menu_action->set_text( lv_text ).
*   Add action menu to button choice
    lr_button_choice->add_choice( lr_menu_action ).
ENDLOOP.
lr_function->set_editor( lr_button_choice ).
But that dumps in my case inside wd salv coding because of last statement. Is that the right way to do?
Do you have a context mapping to the interface controller of ALV for that function? If yes how does it look like.
Thanks in advance for your help!
Regards Rico

How to add a push button on an ALV grid ?

Hi,
How to add a push button on an ALV grid, using ON_TOOLBAR, ON_USERCOMMAND Methods. Clicking on that push button, a new screen has to be displayed.

Hi,
Assuming that you want to have a "push-button" column, i.e. push-buttons within an ALV grid then you need to implement the following steps:
(1) Set the style of the column as button
ls_fcat-style = CL_GUI_ALV_GRID => MC_STYLE_BUTTON.
(2) When the user pushes the button event BUTTON_CLICK is triggered. Thus, define an appropriate event handler method.
<b>Reward points</b>
Regards

Buttons In Tree ALV

Similar Messages

Maybe you are looking for