Custom tool bar for sorting and summing in alv grid

what is the function module to use the tool bar in the alv output screen which has - summing , sorting and other button above the alv grid control.

It is part of the class CL_GUI_ALV_GRID. Have a look at this class, especially the methods within this class, and search for 'SORT' or 'TOTAL' using the button with 'Binoculars' icon.

Similar Messages

There is no Google tool bar for firefox 5.0 and i want to re-install an older version of firefox so I can use the Google tool bar. please give a link to an older version or make Google update the tool bar:)

There is no Google tool bar for firefox 5.0 and i want to re-install an older version of firefox so I can use the Google tool bar. please give a link to an older version or make Google update the tool bar:)

You can try this extension to override compatibility issues,
* https://addons.mozilla.org/en-US/firefox/addon/add-on-compatibility-reporter/
Once it is installed, open Addons Manager and re-enable Google Toolbar.
Addons Manager URL:    '''about:addons'''

Tool Bar for Adobe PDF Pack

I cannot find the Tool Bar for Opening, File, Pin Bar ect.

There are 2 ways to use PDF Pack service:
Using Web UI
Log into https://createpdf.acrobat.com/signin.html with your Adobe ID and password
Select tool from right hand pane(Export from PDF/Convert to PDF/Combine Files tools
Click “Select Files” button then choose your file
4. Click “Download” button in the progress bar after completion of the process to download the PDF file to your computer.
Using Adobe Reader:
Launch Adobe Reader X or Reader XI
Select “Tools” and click “Sign In” link to sign in with your Adobe ID and password
Select “Create PDF” then click “Select File” button or ExportPDF tool
Click “Convert” after select your file
Click “Download Converted File” link to download the file to your computer after the process is completed.
Note: all converted/exported/combined files are stored at https://files.acrobat.com
Please let me know if I did not answer to your question.
Hisami

How can I down load msn tool bar for Mozilla firefox?

My computer crashed and have lost msn tool bar. How can I down load msn tool bar for Mozilla firefox? edit

It used to be more common to be asked how to uninstall such toolbars. I think It will now be known as a Bing bar, but as far as I know it is no longer supported for Firefox. You may find some unofficial addons with similar types of functions.
You would be better discussing anything further relating to MSN on a specialist MSN forum.

Custom Tool Bar in Adobe

Hi all,
We have an requirement where in we have to provide a tool bar to the end user to edit the PDF at run time. The user should be able to select elements from the tool bar to add to the form. Is it possible through ALD?? or is there any other ADOBE tool through which we can acheive this?
The user's have been using a Standard Template in MS Word till now, in which custom tool bar was created with Visual Basic Macros, which embeds things in doc file, which become place holders for SAP Data. They can freely edit the doc file to keep or delete what they want as per their requirement.
Can we acheive a simmilar requirement in Adobe?
We have to create such a standard template in PDF.
I tried with ALD 8.0, but i guess we cannot add a custom tool bar with it.
Regards,
Runal

Hi,
As of my knowledge on SAP IFBA custom toolbars or tabs or Upload(in online IFBA i.e. through webdynpro ABAP) functionalities are not supported. If your requirement demands to design these kind of forms then on your own you need to have a work arround. If you design these kind of forms then the performance of the adobe forms get decreases.
If you find any workaround to these functionalities it will be nice if you present them in a Blog.
Regards
Pradeep Goli

Bex tool bars 3.X and & BI 7 both are appearing.

Hi,
Whle executing a query in my system Bex tool bars 3.x and BI7 Tool bars combinly available. i would like to use only BI7 tool bars only.
can ane 3.x tool one help how do I dis able the 3.X tool bars.
Regards,
Sharma.

Hi Sharma,
   I was finally able to resolve this Issue
Here is what I did,
1) Installed the Following Front End Patches.
   a) For 3.x = bw350gui710_4-10004473.exe
   b) For 7.0 = bi710sp07p_701-10004472.exe
2) We are using Office 2003 so had to Install the following Office Patch
    office2003-KB907417-FullFile-ENU.exe
This Fixed our issues and Bex ( Both Versions ) are working fine.
If you don't want to Install Front End SAP Patches then start with the Office Patch. On your Desktop follow the steps below.
1) START -> Settings -> Control Panel -> Add Remove Programs.
2 ) Click on Show Patches Option on top of the window.
3) Find Office and ensure that above mentioned Patch is present. ( Check Microsoft Site with KB907417 ) for more details
Hope this helps
Datta.

Where is tool bar for pdf documents?

where is tool bar for pdf documents workspace?

Never mind
I just printed the PDF file I couldn't open or type on.
It was my tax organizer to filet taxes.
I'm done w it.
Thanks!
Sent from my iPhone

Custom keyboard shortcuts for Liquify and Vanishing Point filter interfaces in Photoshop CS4?

Is there a way to set custom keyboard shortcuts for Liquify and Vanishing Point filter interfaces in Photoshop CS4? When I change my keyboard shortcuts preferences for Photoshop, they don't change for these filter interfaces. Is there another way?

what is the problem ??
I tried to change the shortcut for the Vanishing Point and Liquify from
Edit -> keyboard shortcuts(button) -> keyboard shortcuts (tab) -> filter (tab)
and you will find these filters :
double click on it and make a new shortcut
but it MUST be Ctrl + (any letter) or you can make it Ctrl + Alt + (any letter)
but if you made it just one lettre like S for example
you will can't make a shortcut.
hope I understood what you ment ???

The dock and safari tool bar have disappeared and i can't minimise safari - can anybody help?

The dock and safari tool bar have disappeared and i can't minimise safari - can anybody help?

Move the mouse pointer to the top of the screen.
Menu bar and Safari toolbar will be visible now.
Click the green button in the toolbar.

How can i install pagerank tool bar for my fire fox

How can i install pagerank tool bar for my fire fox so that i can have an idea that which site holds what page rank during my SEO work
Anjimile Mtila Oponyo

Try with this Add-on
*https://addons.mozilla.org/en-US/firefox/addon/seo-status-pagerankalexa-toolb/

I use the google search bar for everything and since downloading FF4 i can not select any of the suggestions in the google drop down menu

I use the google search bar for everything and since downloading FF4 i can not select any of the suggestions in the google drop down menu.
I have tried to select one of the suggestions that google give me for my search but FF it wont let me. I have type everything out in full. I hate FF4 it is rubbish. I loved firefox before this one came out but now I am seriously thinking of going over to google chrome.

Many thanks for the prompt reply, ideato.
One of the reasons I abandoned Chrome in favour of Firefox was due to the "black band of doom" that appears on the top of the Google page - so setting up my homepage to google.co.uk just puts that back in the ugly spotlight.
I was, though, pleasantly surprised to see a Google search bar on the Mozilla Firefox Start Page (without the black band and Google options that I am just not interested in) but bitterly disappointed that it is Google.fr (due to my ISP being French).
I shall learn to live with Yahoo (or worse case scenario, Bing!)
rgds, PG

How to disable sorting for some columns in a ALV GRID?

Hi i have requirement where I have to disable sorting for some columns in a ALV GRID. i am using REUSE_ALV_GRID_DISPLAY function module.
Can anybody help me. how to acieve this? Any code snippets will really be appreciated.

Hi,
I have tried this but not completely successful. I think this can be done using the OOPS method.
DATA: it_event_exit TYPE slis_t_event_exit.
DATA: w_exit TYPE slis_event_exit.
w_exit-ucomm = '&ODN'.
w_exit-before = 'X'.
CLEAR w_exit-after.
APPEND w_exit TO it_event_exit.
w_exit-ucomm = '&OUP'.
w_exit-before = 'X'.
CLEAR w_exit-after.
APPEND w_exit TO it_event_exit.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 i_callback_program = w_repid
 i_callback_top_of_page = 'ALV_TOP_OF_PAGE'
 i_callback_html_top_of_page = 'ALV_HTML_TOP_OF_PAGE'
 i_callback_user_command = 'USER_COMMAND' <- User command form
 is_layout = wm_layout
 it_fieldcat = wt_fieldcat
 it_events = i_events
 it_event_exit = it_event_exit <- Need to fill
 it_sort = wt_sort
 i_default = 'X'
Now you can capture this events in the user command
FORM user_command USING r_ucomm LIKE sy-ucomm
 rs_selfield TYPE slis_selfield.
IF r_ucomm = '&OUP' and rs_selfield-SEL_TAB_FIELD = 'Your field name'.
ENDIF.
ENDFORM. "user_command
In this form you will get the function code in 'r_ucomm' and the field selected for sorting in 'rs_selfield-SEL_TAB_FIELD'. But reseting 'r_ucomm' will not work.
May be somebody else can give some help on this.
But this will work if you follow the oop method.
Please see this document for more info.
http://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/com.sap.km.cm.docs/library/webas/abap/an easy reference for alv grid control.pdf
Thanks
Vinod

How to write code for totals and subtotals in alv programing?

how to write code for totals and subtotals in alv programing?

hi,
1. TOTAL.
http://www.sapdevelopment.co.uk/reporting/alv/alvgrid_basic.htm
2. How do I add subtotals
http://www.sapfans.com/forums/viewtopic.php?t=20386
http://www.sapfans.com/forums/viewtopic.php?t=85191
http://www.sapfans.com/forums/viewtopic.php?t=88401
http://www.sapfans.com/forums/viewtopic.php?t=17335
Regards
Anver

Total for a Numeric field in ALV Grid display

Hi all,
I am not getting the Total for a Numeric field in ALV Grid output. What might be the problem.
Regards,
Balavardhan.K

Check this code for subtotals and totals..
REPORT ZYFI_REPT007
 NO STANDARD PAGE HEADING
 LINE-SIZE 300
 LINE-COUNT 50
 MESSAGE-ID ZYFI.
TABLES : COOI, " Commitments Management: Line Items
 LFA1, " Vendor master (general section)
 VBEP,
 RKPLN.
 TABLE TYPES AND INTERNAL TABLES *
DATA : BEGIN OF TYP_COOI ,
 OBJNR LIKE COOI-OBJNR,
 SAKTO LIKE COOI-SAKTO,
 MEGBTR LIKE COOI-MEGBTR,
 MEINH LIKE COOI-MEINH,
 WKGBTR LIKE COOI-WKGBTR,
 REFBN LIKE COOI-REFBN,
 RFPOS LIKE COOI-RFPOS,
 SGTXT LIKE COOI-SGTXT,
 BUDAT LIKE COOI-BUDAT,
 LIFNR LIKE COOI-LIFNR,
 END OF TYP_COOI.
DATA : BEGIN OF TYP_LFA1 ,
 LIFNR LIKE LFA1-LIFNR,
 NAME1 LIKE LFA1-NAME1,
 END OF TYP_LFA1.
DATA : BEGIN OF IT_OUTTAB OCCURS 0,
 OBJNR LIKE COOI-OBJNR,
 SAKTO LIKE COOI-SAKTO,
 MEGBTR LIKE COOI-MEGBTR,
 MEINH LIKE COOI-MEINH,
 WKGBTR LIKE COOI-WKGBTR,
 REFBN LIKE COOI-REFBN,
 RFPOS LIKE COOI-RFPOS,
 SGTXT LIKE COOI-SGTXT,
 BUDAT LIKE COOI-BUDAT,
 LIFNR LIKE COOI-LIFNR,
 NAME1 LIKE LFA1-NAME1,
 END OF IT_OUTTAB.
DATA : IT_COOI LIKE TYP_COOI OCCURS 0 WITH HEADER LINE,
 IT_LFA1 LIKE TYP_LFA1 OCCURS 0 WITH HEADER LINE.
*-- ALV Declarations
TYPE-POOLS SLIS.
DATA: IT_EVENTS TYPE SLIS_T_EVENT,
 GS_EVENT TYPE SLIS_ALV_EVENT,
 wa_fldcat type slis_fieldcat_alv.
DATA: S_LAYOUT TYPE SLIS_LAYOUT_ALV,
 GT_PRINT TYPE SLIS_PRINT_ALV.
DATA: IT_FLDCAT TYPE SLIS_T_FIELDCAT_ALV.
DATA: IT_SORT TYPE SLIS_T_SORTINFO_ALV.
DATA: V_REPID LIKE SY-REPID.
 SELECTION SCREEN *
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS : S_KOKRS FOR COOI-KOKRS NO-EXTENSION NO INTERVALS,
 " Controlling Area
 S_BUKRS FOR COOI-BUKRS NO-EXTENSION NO INTERVALS,
 " Company code
 S_GJAHR FOR COOI-GJAHR NO-EXTENSION NO INTERVALS,
 " Fiscal Year
 S_OBJNR FOR RKPLN-AUFNR MATCHCODE OBJECT ORDE,
 " Internal order
 S_SAKTO FOR COOI-SAKTO MATCHCODE OBJECT KART,
 " Cost Element
 S_BUDAT FOR COOI-BUDAT, " Debit Date
 S_LIFNR FOR COOI-LIFNR. " Vendor
SELECTION-SCREEN END OF BLOCK B1.
 S T A R T O F S E L E C T I O N *
START-OF-SELECTION.
*-- Read data
PERFORM GET_DATA.
 E N D O F S E L E C T I O N *
END-OF-SELECTION.
*-- Process the data and prepare the output data
PERFORM CALCULATE_FINAL_INFO.
*--Display Report output
PERFORM DISPLAY_REPORT.
 FORM CALCULATE_FINAL_INFO *
 Process the data and prepare final internal table *
FORM CALCULATE_FINAL_INFO.
DATA : L_OBJNR LIKE COOI-OBJNR.
SORT IT_LFA1 BY LIFNR.
DELETE ADJACENT DUPLICATES FROM IT_LFA1 COMPARING LIFNR.
LOOP AT IT_COOI.
 L_OBJNR = IT_COOI-OBJNR+2(20).
 SHIFT L_OBJNR LEFT DELETING LEADING '0'.
 IF L_OBJNR IN S_OBJNR.
 READ TABLE IT_LFA1 WITH KEY LIFNR = IT_COOI-LIFNR.
 IF SY-SUBRC EQ 0.
 IT_OUTTAB-NAME1 = IT_LFA1-NAME1.
 ENDIF.
 MOVE-CORRESPONDING IT_COOI TO IT_OUTTAB.
 CLEAR IT_OUTTAB-OBJNR.
 IT_OUTTAB-OBJNR = L_OBJNR.
 APPEND IT_OUTTAB.
 CLEAR IT_OUTTAB.
 CLEAR IT_LFA1.
 CLEAR L_OBJNR.
 ENDIF.
ENDLOOP.
ENDFORM.
*& Form GET_DATA
 Fetch the Data from the table COOI and LFA1
FORM GET_DATA.
SELECT OBJNR
 SAKTO
 MEGBTR
 MEINH
 WKGBTR
 REFBN
 RFPOS
 SGTXT
 BUDAT
 LIFNR
 FROM COOI
 INTO TABLE IT_COOI
 WHERE BUDAT IN S_BUDAT
 AND LIFNR IN S_LIFNR
 AND KOKRS IN S_KOKRS
 AND BUKRS IN S_BUKRS
 AND GJAHR IN S_GJAHR
 AND SAKTO IN S_SAKTO.
IF SY-SUBRC EQ 0 .
Get the Vendor name from LFA1
 SELECT LIFNR
 NAME1
 FROM LFA1
 INTO TABLE IT_LFA1
 FOR ALL ENTRIES IN IT_COOI
 WHERE LIFNR EQ IT_COOI-LIFNR.
ELSE.
 MESSAGE I999 WITH TEXT-013.
ENDIF.
ENDFORM. " GET_DATA
*& Form DISPLAY_REPORT
 Display the output
FORM DISPLAY_REPORT.
PERFORM BUILD_CATALOG.
PERFORM FRM_PREPARE_EVENT_LIST TABLES IT_EVENTS.
IF NOT IT_OUTTAB[] IS INITIAL.
 CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
 EXPORTING
 I_CALLBACK_PROGRAM = V_REPID
 I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
 IT_FIELDCAT = IT_FLDCAT
 IT_SORT = IT_SORT
 IT_EVENTS = IT_EVENTS
 TABLES
 T_OUTTAB = IT_OUTTAB
 EXCEPTIONS
 PROGRAM_ERROR = 1
 OTHERS = 2.
ELSE.
 MESSAGE I999 WITH TEXT-013.
ENDIF.
ENDFORM. " DISPLAY_REPORT
*& Form BUILD_CATALOG
 Build the Field catalog for the ALV Report
FORM BUILD_CATALOG.
DATA: V_INDEX LIKE SY-TABIX.
V_REPID = SY-REPID.
DATA: LS_SORT TYPE SLIS_SORTINFO_ALV.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
 EXPORTING
 I_PROGRAM_NAME = V_REPID
 I_INTERNAL_TABNAME = 'IT_OUTTAB'
 I_INCLNAME = V_REPID
 CHANGING
 CT_FIELDCAT = IT_FLDCAT
 EXCEPTIONS
 INCONSISTENT_INTERFACE = 1
 PROGRAM_ERROR = 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.
READ TABLE IT_FLDCAT WITH KEY FIELDNAME = 'WKGBTR'
 TABNAME = 'IT_OUTTAB' INTO WA_FLDCAT.
IF SY-SUBRC EQ 0.
 WA_FLDCAT-DO_SUM = 'X'.
 MODIFY IT_FLDCAT FROM WA_FLDCAT INDEX SY-TABIX.
ENDIF.
READ TABLE IT_FLDCAT WITH KEY FIELDNAME = 'OBJNR'
 TABNAME = 'IT_OUTTAB' INTO WA_FLDCAT.
IF SY-SUBRC EQ 0.
 WA_FLDCAT-SELTEXT_L = 'Order'.
 WA_FLDCAT-COL_POS = 1.
 WA_FLDCAT-DDICTXT = 'L'.
 MODIFY IT_FLDCAT FROM WA_FLDCAT INDEX SY-TABIX.
ENDIF.
LS_SORT-FIELDNAME = 'OBJNR'.
LS_SORT-SPOS = 1.
LS_SORT-UP = 'X'.
LS_SORT-SUBTOT = 'X'.
APPEND LS_SORT TO IT_SORT.
ENDFORM. " BUILD_CATALOG
*& Form FRM_PREPARE_EVENT_LIST
 Build the Events
FORM FRM_PREPARE_EVENT_LIST TABLES IT_EVENTS TYPE SLIS_T_EVENT.
CLEAR GS_EVENT.
GS_EVENT-NAME = SLIS_EV_TOP_OF_PAGE.
GS_EVENT-FORM = 'TOP_OF_PAGE_REPORT'.
APPEND GS_EVENT TO IT_EVENTS.
ENDFORM. " FRM_PREPARE_EVENT_LIST
 TOP OF PAGE
FORM TOP_OF_PAGE_REPORT.
CALL FUNCTION 'Z_YREPORT_HEADER'
 EXPORTING
 DL_TITLE = SY-TITLE
 DL_REPID = SY-CPROG
 DL_LINSZ = SY-LINSZ
 EXCEPTIONS
 OTHERS = 1.
ENDFORM. " FRM_TOP_OF_PAGE_REPORT
*& Form USER_COMMAND
Drill Down Functionality to Call the Transaction ME23
FORM USER_COMMAND USING P_UCOMM LIKE SY-UCOMM
 P_SELFIELD TYPE SLIS_SELFIELD.
DATA : L_INDEX LIKE SY-INDEX,
 L_REFBN LIKE COOI-REFBN.
L_INDEX = P_SELFIELD-TABINDEX. " holds the selected table index
CLEAR L_REFBN.
CASE P_UCOMM.
*-- On Double Click
 WHEN '&IC1'.
 CLEAR L_REFBN.
*-- Read the Current Line
 READ TABLE IT_OUTTAB INDEX L_INDEX.
 IF SY-SUBRC EQ 0.
 L_REFBN = IT_OUTTAB-REFBN.
 IF NOT L_REFBN IS INITIAL.
*-- Set the BES Paramater Id to the Current line Purchase Order Number
 SET PARAMETER ID 'BES' FIELD L_REFBN.
*-- Call the Transaction Purchase Order Display with the above PO Number
 CALL TRANSACTION 'ME23' AND SKIP FIRST SCREEN.
 ENDIF.
 ELSE.
 MESSAGE E999 WITH TEXT-014.
 ENDIF.
ENDCASE.
ENDFORM. " USER_COMMAND

ALV OO and refreshing the ALV grid

Hi,
i have some problems with my ALV 00 program.
On screen 1 i have to fill in a material number.
For that material i'm getting some data and show in screen 2 in a ALV grid.
Via BACK-button i'm getting back to screen 1 and can fill in another material number.
But the 2nd (and 3rd, etc) time i fill a material, the ALV grid data from material 1 is shown. Even if the internal table I_ALV where the data is, is changed.
What should i do ?
I have initialized the customer container and the grid, but that didn't solved the problem.
regards,
Hans

Hi,
Try clearing and refreshing the alv grid data table in screen 2.
Check with this code. this code is working fine. If we go back and change the input, it is showing the output corresponding to the second input only.
Have you use this method?
 GR_ALVGRID->REFRESH_TABLE_DISPLAY
TYPE-POOLS : SLIS.
* Tables *
TABLES:
VBRK,
VBRP.
* Parameters and select options OR SELECTION SCREEN
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS:
 S_VBELN FOR VBRK-VBELN.
SELECTION-SCREEN END OF BLOCK B1.
* Internal Tables *
* work areas
DATA: BEGIN OF IT_VBRP OCCURS 0,
 VBELN LIKE VBRK-VBELN,
 POSNR LIKE VBRP-POSNR,
 UEPOS LIKE VBRP-UEPOS,
 FKIMG LIKE VBRP-FKIMG,
 NETWR LIKE VBRP-NETWR,
 MEINS LIKE VBRP-MEINS.
DATA : END OF IT_VBRP.
* Variables *
DATA : GR_ALVGRID TYPE REF TO CL_GUI_ALV_GRID,
 GC_CUSTOM_CONTROL_NAME TYPE SCRFNAME VALUE 'CC_ALV',
 GR_CCONTAINER TYPE REF TO CL_GUI_CUSTOM_CONTAINER,
 GT_FIELDCAT TYPE LVC_T_FCAT,
 GS_LAYOUT TYPE LVC_S_LAYO,
 V_FLAG VALUE 'X'.
* Start of Program *
* INITIALIZATION. *
INITIALIZATION.
S_VBELN-LOW = 1.
S_VBELN-HIGH = 1000000000.
S_VBELN-OPTION = 'EQ'.
S_VBELN-SIGN = 'I'.
APPEND S_VBELN.
* SELECTION-SCREEN *
AT SELECTION-SCREEN.
PERFORM VALIDATION.
* START-OF-SELECTION *
START-OF-SELECTION.
PERFORM GET_DATA.
CALL SCREEN 0100.
* END-OF-SELECTION *
END-OF-SELECTION.
* TOP-OF-PAGE *
TOP-OF-PAGE.
* END-OF-PAGE *
END-OF-PAGE.
* AT USER-COMMAND *
*& Form VALIDATION
* text
* --> p1 text
* <-- p2 text
FORM VALIDATION .
SELECT SINGLE VBELN
FROM VBRK
INTO VBRK-VBELN
WHERE VBELN IN S_VBELN.
IF SY-SUBRC <> 0.
 MESSAGE E000 WITH 'no billing documents found'.
ENDIF.
ENDFORM. " VALIDATION
*& Form GET_DATA
* text
* --> p1 text
* <-- p2 text
FORM GET_DATA .
SELECT VBELN
 POSNR
 UEPOS
 FKIMG
 NETWR
 MEINS
FROM VBRP
INTO TABLE IT_VBRP
WHERE VBELN IN S_VBELN.
ENDFORM. " GET_DATA
*& Module DISPLAY_ALV OUTPUT
* text
MODULE DISPLAY_ALV OUTPUT.
IF V_FLAG = 'X'.
 PERFORM DISPLAY_ALV.
 PERFORM PREPARE_FIELD_CATALOG CHANGING GT_FIELDCAT.
 PERFORM PREPARE_LAYOUT CHANGING GS_LAYOUT.
 CALL METHOD GR_ALVGRID->SET_TABLE_FOR_FIRST_DISPLAY
 EXPORTING
* I_BUFFER_ACTIVE =
* I_BYPASSING_BUFFER =
* I_CONSISTENCY_CHECK =
* I_STRUCTURE_NAME = 'VBRP'
* IS_VARIANT =
* I_SAVE =
* I_DEFAULT = 'X'
 IS_LAYOUT = GS_LAYOUT
* IS_PRINT =
* IT_SPECIAL_GROUPS =
* IT_TOOLBAR_EXCLUDING =
* IT_HYPERLINK =
* IT_ALV_GRAPHICS =
* IT_EXCEPT_QINFO =
 CHANGING
 IT_OUTTAB = IT_VBRP[]
 IT_FIELDCATALOG = GT_FIELDCAT
* IT_SORT =
* IT_FILTER =
 EXCEPTIONS
 INVALID_PARAMETER_COMBINATION = 1
 PROGRAM_ERROR = 2
 TOO_MANY_LINES = 3
 OTHERS = 4
 IF SY-SUBRC <> 0.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 CALL METHOD GR_ALVGRID->SET_READY_FOR_INPUT
 EXPORTING
 I_READY_FOR_INPUT = 1.
 ELSE.
 CALL METHOD GR_ALVGRID->REFRESH_TABLE_DISPLAY
* EXPORTING
* IS_STABLE =
* I_SOFT_REFRESH =
 EXCEPTIONS
 FINISHED = 1
 OTHERS = 2
 IF SY-SUBRC <> 0.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
 ENDIF.
 CLEAR V_FLAG.
ENDIF.
ENDMODULE. " DISPLAY_ALV OUTPUT
*& Form DISPLAY_ALV
* text
* --> p1 text
* <-- p2 text
FORM DISPLAY_ALV .
IF GR_ALVGRID IS INITIAL.
 CREATE OBJECT GR_ALVGRID
 EXPORTING
* I_SHELLSTYLE = 0
* I_LIFETIME =
 I_PARENT = GR_CCONTAINER
* I_APPL_EVENTS = space
* I_PARENTDBG =
* I_APPLOGPARENT =
* I_GRAPHICSPARENT =
* I_NAME =
 EXCEPTIONS
 ERROR_CNTL_CREATE = 1
 ERROR_CNTL_INIT = 2
 ERROR_CNTL_LINK = 3
 ERROR_DP_CREATE = 4
 OTHERS = 5
 IF SY-SUBRC <> 0.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
ENDIF.
ENDFORM. " DISPLAY_ALV
*& Form PREPARE_FIELD_CATALOG
* text
* <--P_GT_FIELDCAT text
FORM PREPARE_FIELD_CATALOG CHANGING P_GT_FIELDCAT TYPE LVC_T_FCAT.
DATA : LS_FCAT TYPE LVC_S_FCAT,
 L_POS TYPE I.
L_POS = L_POS + 1.
LS_FCAT-FIELDNAME = 'VBELN'.
LS_FCAT-TABNAME = 'IT_VBRP'.
LS_FCAT-COL_POS = L_POS.
LS_FCAT-SCRTEXT_M = 'Billing Document'.
LS_FCAT-OUTPUTLEN = '10'.
APPEND LS_FCAT TO P_GT_FIELDCAT.
CLEAR LS_FCAT.
L_POS = L_POS + 1.
LS_FCAT-FIELDNAME = 'POSNR'.
LS_FCAT-TABNAME = 'IT_VBRP'.
LS_FCAT-COL_POS = L_POS.
LS_FCAT-SCRTEXT_M = 'Billing Item'.
LS_FCAT-OUTPUTLEN = '6'.
APPEND LS_FCAT TO P_GT_FIELDCAT.
CLEAR LS_FCAT.
L_POS = L_POS + 1.
LS_FCAT-FIELDNAME = 'UEPOS'.
LS_FCAT-TABNAME = 'IT_VBRP'.
LS_FCAT-COL_POS = L_POS.
LS_FCAT-SCRTEXT_M = 'Higher Level Item'.
LS_FCAT-OUTPUTLEN = '6'.
APPEND LS_FCAT TO P_GT_FIELDCAT.
CLEAR LS_FCAT.
L_POS = L_POS + 1.
LS_FCAT-FIELDNAME = 'FKIMG'.
LS_FCAT-TABNAME = 'IT_VBRP'.
LS_FCAT-COL_POS = L_POS.
LS_FCAT-SCRTEXT_M = 'Invoice Quantity'.
LS_FCAT-OUTPUTLEN = '13'.
APPEND LS_FCAT TO P_GT_FIELDCAT.
CLEAR LS_FCAT.
L_POS = L_POS + 1.
LS_FCAT-FIELDNAME = 'NETWR'.
LS_FCAT-TABNAME = 'IT_VBRP'.
LS_FCAT-COL_POS = L_POS.
LS_FCAT-SCRTEXT_M = 'Net Value'.
LS_FCAT-OUTPUTLEN = '15'.
APPEND LS_FCAT TO P_GT_FIELDCAT.
CLEAR LS_FCAT.
L_POS = L_POS + 1.
LS_FCAT-FIELDNAME = 'MEINS'.
LS_FCAT-TABNAME = 'IT_VBRP'.
LS_FCAT-COL_POS = L_POS.
LS_FCAT-SCRTEXT_M = 'Unit of Measure'.
LS_FCAT-OUTPUTLEN = '3'.
APPEND LS_FCAT TO P_GT_FIELDCAT.
CLEAR LS_FCAT.
L_POS = L_POS + 1.
ENDFORM. " PREPARE_FIELD_CATALOG
*& Form PREPARE_LAYOUT
* text
* <--P_GS_LAYOUT text
FORM PREPARE_LAYOUT CHANGING P_GS_LAYOUT TYPE LVC_S_LAYO.
P_GS_LAYOUT-ZEBRA = 'X'.
P_GS_LAYOUT-GRID_TITLE = 'INVOICE DETAILS'.
P_GS_LAYOUT-SMALLTITLE = 'X'.
P_GS_LAYOUT-EDIT = 'X'.
ENDFORM. " PREPARE_LAYOUT
*& Module STATUS_0100 OUTPUT
* text
MODULE STATUS_0100 OUTPUT.
SET PF-STATUS 'CANCEL'.
* SET TITLEBAR 'xxx'.
ENDMODULE. " STATUS_0100 OUTPUT
*& Module USER_COMMAND_0100 INPUT
* text
MODULE USER_COMMAND_0100 INPUT.
CASE SY-UCOMM.
 WHEN 'BACK'.
 LEAVE TO SCREEN 0.
 WHEN 'CANCEL'.
 LEAVE TO SCREEN 0.
 WHEN 'EXIT'.
 CALL TRANSACTION 'SE38'.
 WHEN 'CHANGE'.
 IF GR_ALVGRID->IS_READY_FOR_INPUT( ) = 0.
 CALL METHOD GR_ALVGRID->SET_READY_FOR_INPUT
 EXPORTING
 I_READY_FOR_INPUT = 1.
 ELSE.
 CALL METHOD GR_ALVGRID->SET_READY_FOR_INPUT
 EXPORTING
 I_READY_FOR_INPUT = 0.
 ENDIF.
ENDCASE.
Regards,
Aswin

Custom tool bar for sorting and summing in alv grid

Similar Messages

Maybe you are looking for