Adding TOTAL icon in the ALV

Hi,
I am using ALV grid display in my program. I have used the FM 'REUSE_ALV_GRID_DISPLAY'. I am unable to get the TOTAL icon in the toolbar. Please suggest me how to get the functionality.
Thanks in advance.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = sy-repid
*I_GRID_TITLE = TIT
*IS_LAYOUT = GD_layout
it_fieldcat = fieldcatalog[]
*i_callback_user_command = 'USER_COMMAND'
i_callback_pf_status_set = 'SET_PF_STATUS'
i_save = 'A'
*IS_VARIANT = LS_VARIANT
TABLES
t_outtab = itab
EXCEPTIONS
program_error = 1
OTHERS = 2
form set_pf_status USING rt_extab TYPE slis_t_extab.
set pf-status 'ZSTANDARD'.
endform.
Double click on the 'ZSTANDARD' and create the object.
Then Goto menu-- extras->Adjust Template
select List Viewer radio button. then click on ok. It will give u all menus...Select the required menus....
Edited by: mujib tirandaz on Apr 13, 2009 2:57 PM

Similar Messages

How to put up the traffic lights icon in the ALV Grid. OO output

Hi all,
I have a requriement that after all the report execution parts are done, i need to display the posted or unposted document using the Traffic light icon in the report output, i am displaying the report in ALV OO form and i already geta field with a conent X of the document is posted else that field is blank currently.
Regards

Sample code here for this.
*& Report Z_50657_ALV_EX2 *
*& Program Name: Test Program for ALV *
* Developer Name: ADCDEV (Rahul Kavuri ) *
* Description: ALV Report to Display Vendor Details *
*& Date:7th April 2006 *
REPORT Z_50657_ALV_EX2
 NO STANDARD PAGE HEADING
 LINE-COUNT 65(3)
 LINE-SIZE 220
 MESSAGE-ID ZZ.
* Type Pools *
TYPE-POOLS: SLIS, ICON.
* Tables *
TABLES: VBAK. "Sales Document Data
* Internal Tables *
* TABLE TO HOLD DATA OF SALES DOCUMENT
DATA: BEGIN OF IT_VBAK OCCURS 0,
 VBELN LIKE VBAK-VBELN, "Sales Document
 VBTYP LIKE VBAK-VBTYP, "SD document category
 AUDAT LIKE VBAK-AUDAT, "Document date (date received/sent)
 AUGRU LIKE VBAK-AUGRU, "Order reason (reason for the business)
 AUART LIKE VBAK-AUART, "Sales Document Type
 NETWR LIKE VBAK-NETWR, "Net Sales Order in Doc. Currency
 WAERK LIKE VBAK-WAERK, "SD document currency
 ICON TYPE ICON-ID, "traffic lights
 END OF IT_VBAK.
* Work Areas *
*WORK AREAS DEFINED FOR ALV'S
DATA: WA_FIELDCAT TYPE SLIS_FIELDCAT_ALV, "field catalog
 IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV, "field catalog ITAB
 WA_SORT TYPE SLIS_SORTINFO_ALV, "SORT work area
 IT_SORT TYPE SLIS_T_SORTINFO_ALV, "SORT ITAB
 LAYOUT TYPE SLIS_LAYOUT_ALV, "LAYOUT
 WA_FCODE TYPE SLIS_EXTAB, "FUN CODE
 I_FCODE_EXTAB TYPE SLIS_T_EXTAB,
 WA_EVENTS TYPE SLIS_ALV_EVENT,
 IT_EVENTS TYPE SLIS_T_EVENT.
* Selection-Screen *
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME.
SELECT-OPTIONS: S_VBELN FOR VBAK-VBELN.
PARAMETERS: P_VBTYP LIKE VBAK-VBTYP DEFAULT 'C'.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME.
PARAMETERS: LIST RADIOBUTTON GROUP G1,
 GRID RADIOBUTTON GROUP G1.
SELECTION-SCREEN END OF BLOCK B2.
* At Selection-Screen *
*VALIDATION
* Start of Selection *
START-OF-SELECTION.
*POPULATION OF DATA INTO INTERNAL TABLE ITAB
PERFORM GET_DATA.
*DEFINE USER DEFINED FIELDCATALOG
PERFORM DEFINE_FIELDCATALOG.
*SUBTOTALS AND TOTALS DISPLAY USING SORT
PERFORM SORT_LIST.
*CHANGE FCODE OF STATUS
PERFORM CHANGE_FCODE.
*CHECK RADIOBUTTON OPTION AND ACCORDINGLY FINAL DISPLAY
PERFORM CHECK_OPTION.
*& Form GET_DATA
* text
FORM GET_DATA.
SELECT VBELN
 VBTYP
 AUDAT
 AUGRU
 AUART
 NETWR
 WAERK FROM VBAK INTO TABLE IT_VBAK
 WHERE VBELN IN S_VBELN AND VBTYP = P_VBTYP
 AND ERDAT > '01.01.2004' AND NETWR > 0.
LOOP AT IT_VBAK.
 IF IT_VBAK-NETWR < 10000.
 IT_VBAK-ICON = '@08@'.
 ELSEIF IT_VBAK-NETWR > 100000.
 IT_VBAK-ICON = '@0A@'.
 ELSE.
 IT_VBAK-ICON = '@09@'.
 ENDIF.
 MODIFY IT_VBAK INDEX SY-TABIX.
ENDLOOP.
ENDFORM. "GET_DATA
*& Form CHECK_OPTION
* text
FORM CHECK_OPTION.
WA_EVENTS-NAME = 'TOP_OF_PAGE'.
WA_EVENTS-FORM = 'TOP'.
APPEND WA_EVENTS TO IT_EVENTS.
CLEAR WA_EVENTS.
WA_EVENTS-NAME = 'END_OF_LIST'.
WA_EVENTS-FORM = 'END_LIST'.
APPEND WA_EVENTS TO IT_EVENTS.
CLEAR WA_EVENTS.
IF LIST = 'X'.
 PERFORM LIST_DISP.
ENDIF.
IF GRID = 'X'.
 PERFORM GRID_DISP.
ENDIF.
ENDFORM. "CHECK_OPTION
*& Form DEFINE_FIELDCATALOG
* text
FORM DEFINE_FIELDCATALOG.
WA_FIELDCAT-COL_POS = 1.
WA_FIELDCAT-FIELDNAME = 'ICON'.
WA_FIELDCAT-SELTEXT_L = 'ICON'.
WA_FIELDCAT-ICON = 'X'.
WA_FIELDCAT-OUTPUTLEN = 8.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 2.
WA_FIELDCAT-FIELDNAME = 'VBELN'.
WA_FIELDCAT-SELTEXT_L = 'SALES DOC NO.'.
WA_FIELDCAT-OUTPUTLEN = 10.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 3.
WA_FIELDCAT-FIELDNAME = 'AUDAT'.
WA_FIELDCAT-SELTEXT_L = 'CREATED ON'.
WA_FIELDCAT-OUTPUTLEN = 10.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 4.
WA_FIELDCAT-FIELDNAME = 'VBTYP'.
WA_FIELDCAT-SELTEXT_L = 'CATEGORY'.
WA_FIELDCAT-OUTPUTLEN = 1.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 6.
WA_FIELDCAT-FIELDNAME = 'AUGRU'.
WA_FIELDCAT-SELTEXT_L = 'REASON'.
WA_FIELDCAT-OUTPUTLEN = 3.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 5.
WA_FIELDCAT-FIELDNAME = 'AUART'.
WA_FIELDCAT-SELTEXT_L = 'DOC TYPE'.
WA_FIELDCAT-OUTPUTLEN = 4.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 7.
WA_FIELDCAT-FIELDNAME = 'NETWR'.
WA_FIELDCAT-SELTEXT_L = 'NET VALUE'.
WA_FIELDCAT-OUTPUTLEN = 17.
WA_FIELDCAT-DECIMALS_OUT = 2.
* WA_FIELDCAT-DO_SUM = 'X'.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 8.
WA_FIELDCAT-FIELDNAME = 'WAERK'.
WA_FIELDCAT-SELTEXT_L = 'UNIT'.
WA_FIELDCAT-OUTPUTLEN = 50.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
ENDFORM. "DEFINE_FIELDCATALOG
*& Form DEFINE_LAYOUT
* text
FORM DEFINE_LAYOUT.
LAYOUT-ZEBRA = 'X'.
LAYOUT-SUBTOTALS_TEXT = 'SUBTOTAL SUM'.
LAYOUT-WINDOW_TITLEBAR = 'EXERCISE 2'.
LAYOUT-TOTALS_TEXT = 'TOTAL'.
ENDFORM. "DEFINE_LAYOUT
*& Form SORT_LIST
* text
FORM SORT_LIST.
WA_SORT-FIELDNAME = 'VBELN'.
WA_SORT-TABNAME = 'IT_VBAK'.
WA_SORT-SPOS = 1.
WA_SORT-UP = 'X'.
WA_SORT-SUBTOT = 'X'.
APPEND WA_SORT TO IT_SORT.
CLEAR WA_SORT.
WA_SORT-FIELDNAME = 'NETWR'.
WA_SORT-TABNAME = 'IT_VBAK'.
WA_SORT-UP = 'X'.
WA_SORT-SPOS = 2.
WA_SORT-SUBTOT = 'X'.
APPEND WA_SORT TO IT_SORT.
CLEAR WA_SORT.
ENDFORM. "SORT_LIST
*& Form LIST_DISP
* text
FORM LIST_DISP.
PERFORM DEFINE_LAYOUT.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
 EXPORTING
 I_CALLBACK_PROGRAM = SY-REPID
 IT_FIELDCAT = IT_FIELDCAT
 IS_LAYOUT = LAYOUT
 IT_SORT = IT_SORT
 I_CALLBACK_PF_STATUS_SET = 'STATUS'
 IT_EXCLUDING = I_FCODE_EXTAB
 I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
 IT_EVENTS = IT_EVENTS[]
* IMPORTING
* E_EXIT_CAUSED_BY_CALLER =
* ES_EXIT_CAUSED_BY_USER =
 TABLES
 T_OUTTAB = IT_VBAK
* EXCEPTIONS
* PROGRAM_ERROR = 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.
ENDFORM. "LIST_DISP
*& Form GRID_DISP
* text
FORM GRID_DISP.
PERFORM DEFINE_LAYOUT.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 I_CALLBACK_PROGRAM = SY-REPID
 IS_LAYOUT = LAYOUT
 IT_FIELDCAT = IT_FIELDCAT
 IT_SORT = IT_SORT
 I_CALLBACK_PF_STATUS_SET = 'STATUS'
 IT_EXCLUDING = I_FCODE_EXTAB
 I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
 IT_EVENTS = IT_EVENTS[]
 TABLES
 T_OUTTAB = IT_VBAK.
* EXCEPTIONS
* PROGRAM_ERROR = 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.
ENDFORM. "GRID_DISP
*& Form STATUS
* text
* -->P_EXTAB text
FORM STATUS USING P_EXTAB TYPE SLIS_T_EXTAB.
SET PF-STATUS 'STATUS' EXCLUDING P_EXTAB.
ENDFORM. "STATUS
*& Form USER_COMMAND
* text
* -->R_UCOMM text
* -->RS_SELFIELD text
FORM USER_COMMAND USING R_UCOMM LIKE SY-UCOMM
 RS_SELFIELD TYPE SLIS_SELFIELD.
CASE R_UCOMM.
 WHEN 'BACK' OR 'CANC' OR 'EXIT'.
 LEAVE TO SCREEN 0.
 WHEN '&IC1'.
 SET PARAMETER ID 'AUN' FIELD RS_SELFIELD-VALUE.
 CALL TRANSACTION 'VA03' AND SKIP FIRST SCREEN.
ENDCASE.
ENDFORM. "USER_COMMAND
*& Form CHANGE_FCODE
* text
FORM CHANGE_FCODE.
WA_FCODE = 'PRNT'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&OAD'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&AVE'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&EB9'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&SUM'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&UMC'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&XPA'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&OMP'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
ENDFORM. "CHANGE_FCODE
*& Form TOP
* text
FORM TOP.
IF LIST = 'X'.
 WRITE:/ SY-ULINE.
 WRITE:/ 'DATE:', SY-DATUM,55 'INTELLIGROUP ASIA PVT LTD'.
 WRITE:/ 'TIME:', SY-UZEIT.
 WRITE:/ 'USER NAME:', SY-UNAME,60 SY-TITLE.
 WRITE:/ 'PAGE', SY-PAGNO.
 WRITE:/ SY-ULINE.
ENDIF.
IF GRID = 'X'.
 DATA: LS_LINE TYPE SLIS_LISTHEADER,
 E04_LT_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER.
* Listenüberschrift: Typ H
 CLEAR LS_LINE.
 LS_LINE-TYP = 'H'.
* LS_LINE-KEY: not used for this type
 LS_LINE-INFO = 'Summary'.
 APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
* Kopfinfo: Typ S
 CLEAR LS_LINE.
 LS_LINE-TYP = 'S'.
 LS_LINE-KEY = 'Intelligroup'.
 LS_LINE-INFO = ''.
 APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
 LS_LINE-KEY = 'ASIA'.
 LS_LINE-INFO = 'PVT LTD'.
 APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
* Aktionsinfo: Typ A
 CLEAR LS_LINE.
 LS_LINE-TYP = 'A'.
* LS_LINE-KEY: not used for this type
 LS_LINE-INFO = 'truman'.
 APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
 CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
 EXPORTING
 IT_LIST_COMMENTARY = E04_LT_TOP_OF_PAGE
 I_LOGO = 'ENJOY_SAP_LOGO'.
ENDIF.
ENDFORM. "TOP
*& Form END_LIST
* text
FORM END_LIST.
IF LIST = 'X'.
 SKIP 2.
 WRITE:/60 'END OF PAGE'.
ENDIF.
IF GRID = 'X'.
 DATA: LS_LINE TYPE SLIS_LISTHEADER,
 E04_LT_END_OF_LIST TYPE SLIS_T_LISTHEADER.
* Listenüberschrift: Typ H
 CLEAR LS_LINE.
 LS_LINE-TYP = 'H'.
* LS_LINE-KEY: not used for this type
 LS_LINE-INFO = 'Summary'.
 APPEND LS_LINE TO E04_LT_END_OF_LIST.
* Kopfinfo: Typ S
 CLEAR LS_LINE.
 LS_LINE-TYP = 'S'.
 LS_LINE-KEY = 'Intelligroup'.
 LS_LINE-INFO = ''.
 APPEND LS_LINE TO E04_LT_END_OF_LIST.
 LS_LINE-KEY = 'ASIA'.
 LS_LINE-INFO = 'PVT LTD'.
 APPEND LS_LINE TO E04_LT_END_OF_LIST.
* Aktionsinfo: Typ A
 CLEAR LS_LINE.
 LS_LINE-TYP = 'A'.
* LS_LINE-KEY: not used for this type
 LS_LINE-INFO = TEXT-105.
 APPEND LS_LINE TO E04_LT_END_OF_LIST.
 CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
 EXPORTING
 IT_LIST_COMMENTARY = E04_LT_END_OF_LIST.
ENDIF.
ENDFORM. "END_LIST

ADDING A COLUMN TO THE ALV

HI Experts,
          im here with a problem , i want to know if its possible to add an extra column to the ALV display my problem is im using the dictionary table directly not using any structures and hence iv not declared any field catalog....the output of this one extra field has to be hard coded and added to the display so it appears with the displayed alv at all times.
is this possible can i get help pls?
Thanks & Regards,
Goldie.

Hi,
Append one more field to the field catalog & populate the same in the output internal table of ALV.
fieldcatalog-fieldname   = 'NETPR'.
fieldcatalog-seltext_m   = 'Net Price'.
fieldcatalog-col_pos     = 7.
fieldcatalog-outputlen   = 15.
fieldcatalog-datatype     = 'CURR'.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.

Hiding sub total values in the ALV o/p

Hi,
I have a requirement wherein i have to display some fields for sub total based on the sorting field.
I my report, i have G/L Account, GR value, IR value, Amt in Doc Curr and Doc currency.
Initially, i have to do the subtotal based on G/L account. For e.g. If we have two G/L account 1 and 2, then after the G/L account 1 and G/L account 2, i have to display the subtotals for GR value and IR value. This part is aboslutely working fine.
Now, In one G/L account, we are having multiple currencies. Suppose G/L account 1 has USD and EUR. Now within the G/L account 1, i have to display the subtotal for Amt in Doc Curr based on the currency key, but when i am passing this field to slis_sortinfo_alv, it is calculating the subtotals for GR value, IR value, Amt in Doc Curr.
Here, i need to hide the subtotal values for GR value, IR value.
Any pointers to this will be highly appreciated.
Thank you.

Hi,
I have a requirement wherein i have to display some fields for sub total based on the sorting field.
I my report, i have G/L Account, GR value, IR value, Amt in Doc Curr and Doc currency.
Initially, i have to do the subtotal based on G/L account. For e.g. If we have two G/L account 1 and 2, then after the G/L account 1 and G/L account 2, i have to display the subtotals for GR value and IR value. This part is aboslutely working fine.
Now, In one G/L account, we are having multiple currencies. Suppose G/L account 1 has USD and EUR. Now within the G/L account 1, i have to display the subtotal for Amt in Doc Curr based on the currency key, but when i am passing this field to slis_sortinfo_alv, it is calculating the subtotals for GR value, IR value, Amt in Doc Curr.
Here, i need to hide the subtotal values for GR value, IR value.
Any pointers to this will be highly appreciated.
Thank you.

Total display in the ALV output

Hi
Is do_sum in the field catalog has some restriction to display SUM in the report output. In my report around 4000 records are displaying. For some of the fields do_sum functionality used to display the total in the ouput. But for some fields it showing Total and remaining fields Total is not coming and it gives one messag in the output "The field cannot be totalled because of field overflow". Message is coming from standard Include LSKBHF__ . Is there any way to display for all the fields other than writting logic for that.
Regards
Raj

Example:
TYPE-POOLS SLIS.
DATA: BEGIN OF ITAB OCCURS 0,
       BELNR LIKE BSEG-BELNR,
       GJAHR TYPE I,
       WRBTR TYPE I,
       WAERS LIKE BKPF-WAERS,
       TOTAL TYPE P,
       AUGDT type BSEG-AUGDT,
      END OF ITAB.
DATA: LAYOUT     TYPE SLIS_LAYOUT_ALV,
      IT_EVENTS TYPE SLIS_T_EVENT,
      FCAT       TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
      REC_FCAT   TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE.
START-OF-SELECTION.
FCAT-COL_POS       = 1.
FCAT-FIELDNAME     = 'BELNR'.
FCAT-TABNAME       = 'ITAB'.
FCAT-REF_FIELDNAME = 'BELNR'.
FCAT-REF_TABNAME   = 'BSEG'.
APPEND FCAT.
FCAT-COL_POS       = 2.
FCAT-FIELDNAME     = 'GJAHR'.
FCAT-TABNAME       = 'ITAB'.
FCAT-REF_FIELDNAME = 'GJAHR'.
FCAT-DATATYPE      = 'INT4'.
FCAT-INTTYPE       = 'I'.
FCAT-DO_SUM        = 'X'.
APPEND FCAT.
FCAT-COL_POS       = 3.
FCAT-FIELDNAME     = 'WRBTR'.
FCAT-TABNAME       = 'ITAB'.
FCAT-DATATYPE      = 'INT4'.
FCAT-INTTYPE       = 'I'.
FCAT-DO_SUM        = 'X'.
APPEND FCAT.
FCAT-COL_POS       = 4.
FCAT-FIELDNAME     = 'TOTAL'.
FCAT-TABNAME       = 'ITAB'.
* FCAT-DATATYPE      = 'INT4'.
FCAT-INTTYPE       = 'P'.
FCAT-DO_SUM        = 'X'.
APPEND FCAT.
FCAT-COL_POS       = 5.
FCAT-FIELDNAME     = 'AUGDT'.
FCAT-TABNAME       = 'ITAB'.
FCAT-REF_FIELDNAME = 'AUGDT'.
FCAT-REF_TABNAME   = 'BSEG'.
APPEND FCAT.
BREAK DEVELOPER.
DO 100 TIMES.
    ITAB-WRBTR = SY-INDEX.
    ITAB-GJAHR = SY-INDEX + 1.
   ITAB-TOTAL = ITAB-WRBTR / ITAB-GJAHR.
   itab-AUGDT = sy-datum.
    APPEND ITAB.
ENDDO.
*CALLING ALV
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
    EXPORTING
      I_CALLBACK_PROGRAM = 'Z_TOT_ALV'.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
    EXPORTING
      IS_LAYOUT   = LAYOUT
      IT_FIELDCAT = FCAT[]
      I_TABNAME   = 'ITAB'
      IT_EVENTS   = IT_EVENTS[]
    TABLES
      T_OUTTAB    = ITAB[].
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'.

Reg: passing totals /subtotals of a ALV to a smartform

I have a editable ALV report which has a button to call a smartform . Once the user edits some fields I need to pass the refreshed total to the smartform. I want to know - in what structure the totals/subtotals of the ALV report are stored.

Banu,
Even if you figure out how to get the subtotals / totals from a ALV, I would still suggest you to use the features of SMART Forms to calculate the same again in the form.
http://help.sap.com/saphelp_nw04/helpdata/en/55/610e2db57911d4b62c006094192fe3/content.htm
So, that way if your form is triggered even without doing the subtotalling done by the user you are on the safer side as the form will still display what you have designed it for.
Regards,
Ravi
Note :Please mark all the helpful answers

Displaying Total Text in an ALV Grid

Hi Experts,
              Please suggest me how to display the Total text in the alv grid using CL_SALV_FACTORY method.
             Example Output:
             Field1            Field2         Field3
             a                    b                100
             b                    c                100
             Total                                 200
Regards,
Sunil Kumar

Hi Avinash,
                It will not work since am using cl_salv_factory method. whatever links you have sent are using reuse_alv_grid_display or set_first_table_display.
Regards,
Sunil Kumar

Problem with subtotal, and the total icon is not displayed at the toolbar

Hi all,
I'm currentlyhaving difficulties working with the subtotal and the grandtotal. I have the code in the right place like the sort table
CLEAR k_sort.
ADD 1 TO k_sort-spos.
k_sort-fieldname = pv_fieldname.
k_sort-up = c_x.
k_sort-subtot = pv_subtot.
APPEND k_sort TO i_sort.
and the fieldcatalog
CLEAR k_fieldcat.
add 1 to k_fieldcat-col_pos.
k_fieldcat-fieldname = pv_fieldname.
k_fieldcat-tabname = c_tabname.
k_fieldcat-seltext_l = pv_seltext.
k_fieldcat-outputlen = pv_outputlen.
k_fieldcat-datatype = pv_datatype.
k_fieldcat-do_sum = pv_dosum.
APPEND k_fieldcat TO i_fieldcat.
but it didn't seems to show both the total and subtotal. Even the icon is not displayed at the ALV toolbar. The field which I need the total is a currency field. I even try other fields (interger fields) but with no luck. I'm using REUSE_ALV. Any help is greatly appreciated.

hi,
In field catalog for the particular column which you want to sum make that as 'X'.
say
WHEN'MATNR'.
it_fcat-do_sum = 'X'.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 i_callback_program = report_id
 i_grid_title = ws_title
* i_callback_top_of_page = 'TOP-OF-PAGE'
 is_layout = wa_layout
 it_fieldcat = i_fieldcat[]
 it_sort = i_sortcat
 i_save = 'A'
 it_events = i_events
 TABLES
 t_outtab = i_reportdata1
 EXCEPTIONS
 program_error = 1
 OTHERS = 2.
IF sy-subrc <> 0.
This will enable.

How can i get the Icons in the output of ALV?

Hi,
I am trying to get the Icons in my report output using ALVs.
i am adding the following line
 line_fieldcat-icon = 'ICON_GREEN_LIGHT'. in my field catalog for getting the respective Icon in the list. but the Icon is not getting displayed?
May i know whether the above specified line is correct or not? if not, how can i get the Icons in my output using ALVs?
Thanks and regards,
Ramesh.

Hi,
take idea from this code :
INCLUDE ICONs.
WRITE : / icon_green_light AS ICON.
WRITE : / icon_red_light AS ICON.
write : / icon_yellow_light AS ICON.
OR
add code as per steps below in your ALV report :
FIRST :
INCLUDE ICONs.
Second : in your internal table add :
icon type icon-id,
Third :
add this value in icon field for green light.
itab-icon = '@08@'.
append itab.
Fourth : display
is_fieldcat-tabname = 'IT_FINAL'.
is_fieldcat-fieldname = 'ICON'.
is_fieldcat-col_pos = '1'.
is_fieldcat-outputlen = '12'.
is_fieldcat-seltext_l = 'ICON'.
APPEND is_fieldcat TO it_fieldcat.
CLEAR is_fieldcat.
Reward points, if helpful,
Sandeep Kaushik
Message was edited by:
 Sandeep Kaushik
null

How to insert the new toolbar icons to a ALV report in custom container

Hi,
I found the exporting parameter for excluding the toolbar icons in the method "set_table_for_first_display" but I didn't find any parameter for including the new toolbar icons. I do not want to include the toolbar icons through the PF-Status, but want to include them with the method. Please tell me is there any option of including toolbar icons with using the above method.
Thanks,
Srinivas.

Hi Srinivas,
Refer to the link
Adding buttons to standard alv toolbar in OOALV
Thanks

Total is not getting displayed in the ALV output.

Hi,
Total is not getting displayed in the ALV output.
I m using :REUSE_ALV_BLOCK_LIST_APPEND & REUSE_ALV_BLOCK_LIST_DISPLAY
Are there any issues with it as the same settings are working fine with REUSE_ALV_LIST_DISPLAY
source code:
DATA: layout TYPE slis_layout_alv,
 IT_eventS TYPE slis_t_event,
 fcat TYPE slis_t_fieldcat_alv WITH HEADER LINE,
 rec_fcat TYPE slis_t_fieldcat_alv WITH HEADER LINE.
TYPES: BEGIN OF ty_tab,
 belnr TYPE dberchz-belnr,
 belzart TYPE dberchz-belzart,
 net TYPE dberchz-nettobtr,
 END OF ty_tab.
DATA: lt_tab TYPE STANDARD TABLE OF ty_tab.
SELECT belnr belzart nettobtr
FROM dberchz
INTO TABLE lt_tab[]
WHERE belnr eq '000000000001'.
if sy-subrc ne 0.
ENDIF.
* defining layout
layout-colwidth_optimize = 'X'.
layout-def_status = 'X'.
*defning event
*event
*defining field catalog
fcat-col_pos = 1.
fcat-fieldname = 'BELNR'.
fcat-tabname = 'LT_TAB'.
APPEND fcat.
fcat-col_pos = 2.
fcat-fieldname = 'BELZART'.
fcat-tabname = 'LT_TAB'.
APPEND fcat.
fcat-col_pos = 3.
fcat-fieldname = 'NET'.
fcat-tabname = 'LT_TAB'.
fcat-do_sum = 'X'.
APPEND fcat.
*calling alv
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
EXPORTING
 i_callback_program = 'YZ_PLR'
* I_CALLBACK_PF_STATUS_SET = ' '
* I_CALLBACK_USER_COMMAND = ' '
* IT_EXCLUDING =
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
 is_layout = layout
 it_fieldcat = fcat[]
 i_tabname = 'LT_TAB'
 it_events = IT_EVENTS[]
* IT_SORT =
* I_TEXT = ' '
tables
 t_outtab = lt_tab[]
* EXCEPTIONS
* PROGRAM_ERROR = 1
* MAXIMUM_OF_APPENDS_REACHED = 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.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'
Thanks,
Gaurav

Hi
No I don't think, this is my code (based on your code) and it works fine:
TYPE-POOLS SLIS.
DATA: BEGIN OF LT_TAB OCCURS 0,
 BELNR LIKE BSEG-BELNR,
 GJAHR LIKE BSEG-GJAHR,
 WRBTR LIKE BSEG-WRBTR,
 WAERS LIKE BKPF-WAERS,
 END OF LT_TAB.
DATA: LAYOUT TYPE SLIS_LAYOUT_ALV,
 IT_EVENTS TYPE SLIS_T_EVENT,
 FCAT TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
 REC_FCAT TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE.
START-OF-SELECTION.
FCAT-COL_POS = 1.
FCAT-FIELDNAME = 'BELNR'.
FCAT-TABNAME = 'LT_TAB'.
FCAT-REF_FIELDNAME = 'BELNR'.
FCAT-REF_TABNAME = 'BSEG'.
APPEND FCAT.
FCAT-COL_POS = 2.
FCAT-FIELDNAME = 'GJAHR'.
FCAT-TABNAME = 'LT_TAB'.
FCAT-REF_FIELDNAME = 'GJAHR'.
FCAT-REF_TABNAME = 'BSEG'.
APPEND FCAT.
FCAT-COL_POS = 3.
FCAT-FIELDNAME = 'WRBTR'.
FCAT-TABNAME = 'LT_TAB'.
FCAT-CFIELDNAME = 'WAERS'.
FCAT-REF_FIELDNAME = 'WRBTR'.
FCAT-REF_TABNAME = 'BSEG'.
FCAT-DO_SUM = 'X'.
APPEND FCAT.
FCAT-COL_POS = 4.
FCAT-FIELDNAME = 'WAERS'.
FCAT-TABNAME = 'LT_TAB'.
FCAT-REF_FIELDNAME = 'WAERS'.
FCAT-REF_TABNAME = 'BKPF'.
FCAT-DO_SUM = SPACE.
APPEND FCAT.
SELECT * FROM BSEG INTO CORRESPONDING FIELDS OF TABLE LT_TAB
 WHERE BUKRS = 'MAAB'
 AND BELNR = '0000000001'.
LT_TAB-WAERS = 'EUR'.
MODIFY LT_TAB FROM LT_TAB TRANSPORTING WAERS WHERE WAERS = SPACE.
*CALLING ALV
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
 EXPORTING
 I_CALLBACK_PROGRAM = 'ZPROVAMAX5'.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
 EXPORTING
 IS_LAYOUT = LAYOUT
 IT_FIELDCAT = FCAT[]
 I_TABNAME = 'LT_TAB'
 IT_EVENTS = IT_EVENTS[]
 TABLES
 T_OUTTAB = LT_TAB[].
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'.
I've also inserted a currency field
Max

Short dump when I do total or sub total in the ALV report

Hi,
When I do total or sub-total on the currency field in the ALV report, it'll give a short dump like
" The current application program detected a situation which really
should not occur. Therefore, a termination with a short dump was
triggered on purpose by the key word MESSAGE (type X)".
 Short text of error message:
 Technical information about the message:
 Message classe...... "0K"
 Number.............. 000
 Variable 1.......... " "
 Variable 2.......... " "
 Variable 3.......... " "
 Variable 4.......... " "
 Variable 3.......... " "
 Variable 4.......... " "
Trigger Location of Runtime Error
 Program SAPLSLVC
 Include LSLVCF36
 Row 2,726
 Module type (FORM)
 Module Name FILL_DATA_TABLE
sometime when I do the page down on the ALV report, the same short dump is coming.
Can anyone help me out.
Thanks
Selva

Hi,
I'm getting this short dump in the standard program.
I'm getting ALV report display perfectly. the problem is, when I do total or subtotal on the currency fields.
2704
2705 ************************************
2706 * Column per Fieldcat Entry
2707 ************************************
2708 ls_lvc_data-value = space.
2709 clear ls_lvc_data-style.
2710 loop at it_fcat_local assigning <ls_fcat>
2711 where tech ne 'X' and no_out ne 'X'.
2712 if l_invisible eq 'X'.
2713 clear l_invisible.
2714 if <ls_fcat>-do_sum is initial.
2715 continue.
2716 else.
2717 clear ls_lvc_data-col_pos.
2718 endif.
2719 endif.
2720
2721 add 1 to ls_lvc_data-col_pos.
2722
2723 assign component <ls_fcat>-fieldname
2724 of structure <ls_data> to <l_field_value>.
2725 if sy-subrc ne 0.
>>>>> message x000(0k).
2727 endif.
2728
in this standard program, I'm getting the dump. the line is mentioned above in the code.

Showing the total in the alv

Hi,
I have an ALV that I have displayed in a view , the ALV contains few columns , I want to show the total of the fields. Please suggest how to do it.

hi
have a look at following [article|http://www.sdn.sap.com/irj/scn/index?rid=/library/uuid/4063c42a-2549-2c10-fab6-a8c99d98b9b5]
might help you.
regards
manas dua

How to do the ALV report output in groups and caluculate the tOTALS(URGENT

Hi
In my ALV report output .I have to group the output based on the DAYS field
0-10 days in one group
10-30 days in one group
above 30 days one group
There is also a field by name "AMOUNT" in my output.
I have to calculate SUBTOTALs at the end of every group and at the end of the report i should caluculate GRAND TOTAL.
Please remember that i should not use any any BLOCKED ALVs and for Totals i should not use the SYMBOLS provided in the application toolbar of the report
Thanks in Advance

Please don't repost your questions...
Check out my answer in your other post.
How to make the ALV report in groups and caluculate the TOTALS
Regards,
Naimesh Patel

How to Hide rows in ALV without affecting total sum at the end of table?

Hi,
I need some help in hiding particular rows in an ALV Grid without affecting the total sum at the end of the table. I am trying to hide the rows that have negative quantities, but I still need those values so that the user can still compute for the total sums. Can anyone help? Thanks.
Joseph

Hi,
Hopw this way you can hide the rows in the GRID.
DATA:
ld_column TYPE lvc_fname,
ld_hide TYPE abap_bool.
FIELD-SYMBOLS:
<ls_entry> TYPE any,
<ld_fld> TYPE any.
ld_column = 'COL_1'. " column which you want to suppress if everything is zero
ld_hide = abap_true. " = 'X'; default hide column
LOOP at <gt_outtab> ASSIGNING <ls_entry>.
 ASSIGN COMPONENT (ld_column) OF STRUCTURE <ls_entry> TO <ld_fld>.
 IF ( <ld_fld> > 0 ).
 ld_hide = abap_false. " display column because at least single value > 0
 EXIT. " leave LOOP
 ENDIF.
ENDLOOP.
READ TABLE gt_fcat INTO ls_fcat
 WITH KEY fieldname = ld_column.
IF ( syst-subrc = 0 ).
 ls_fcat-no_out = ld_hide.
 MODIFY gt_fcat FROM ls_fcat INDEX syst-tabix.
ENDIF.
hop you will get the total with for those columns too.
Regards,
Madhavi

Adding TOTAL icon in the ALV

Similar Messages

Maybe you are looking for