topic Re: ALV USING `FUNCTION MODULE in Application Development and Automation Discussions

topic Re: ALV USING `FUNCTION MODULE in Application Development and Automation Discussions https://community.sap.com/t5/application-development-and-automation-discussions/alv-using-function-module/m-p/3621797#M872560 <HTML><HEAD></HEAD><BODY><P>hi saritha,</P><P>The functional module for gand total can be obtained like this,</P><P></P><P>For the totals of each currencies, I just inserted the following code in my form 'fill_fieldcat':</P><P></P><P>wa_fieldcat-fieldname = 'DMBTR'.</P><P>wa_fieldcat-ref_fieldname = 'DMBTR'.</P><P>wa_fieldcat-ref_tabname = 'BSEG'.</P><P>wa_fieldcat-cfieldname = 'WAERS'</P><P>APPEND wa_fieldcat TO it_fieldcat.</P><P>CLEAR wa_fieldcat.</P><P></P><P>And of course, there must be a currency field that will serve as the reference for the calculation of totals for the different currencies</P><P></P><P>Also refer this code</P><P></P><P>&----</P><HR originaltext="----------------------------------------------------------------" /><P>*& Form sub_field_cat</P><P>&----</P><HR originaltext="----------------------------------------------------------------" /><P></P><P>text</P><P></P><P></P><P>-</P><HR originaltext="-------------------------------------------------------------------------------" /><P></P><P>FORM sub_field_cat .</P><P></P><P>it_fieldcat1-fieldname = 'PERNR'.</P><P>it_fieldcat1-seltext_m = text-003.</P><P>it_fieldcat1-col_pos = 0.</P><P>it_fieldcat1-outputlen = 8.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>it_fieldcat1-fieldname = 'WORKDATE'.</P><P>it_fieldcat1-seltext_m = text-012.</P><P>it_fieldcat1-col_pos = 1.</P><P>it_fieldcat1-outputlen = 8.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>it_fieldcat1-fieldname = 'WEKLY'.</P><P>it_fieldcat1-seltext_m = text-015.</P><P>it_fieldcat1-col_pos = 2.</P><P>it_fieldcat1-outputlen = 7.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>it_fieldcat1-fieldname = 'LGART'.</P><P>it_fieldcat1-seltext_m = text-013.</P><P>it_fieldcat1-col_pos = 3.</P><P>it_fieldcat1-outputlen = 4.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>it_fieldcat1-fieldname = 'STDAZ'.</P><P>it_fieldcat1-seltext_m = text-014.</P><P>it_fieldcat1-col_pos = 4.</P><P>it_fieldcat1-outputlen = 7.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>it_fieldcat1-fieldname = 'RAUFNR'.</P><P>it_fieldcat1-seltext_m = text-016.</P><P>it_fieldcat1-col_pos = 5.</P><P>it_fieldcat1-outputlen = 12.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>ENDFORM. " sub_field_cat</P><P></P><P>&----</P><HR originaltext="----------------------------------------------------------------" /><P>*& Form sub_display_data</P><P>&----</P><HR originaltext="----------------------------------------------------------------" /><P></P><P>text</P><P>-</P><HR originaltext="-------------------------------------------------------------------------------" /><P> </P><P>FORM sub_display_data .</P><P></P><P>*--To sort the output through material number</P><P>DATA : lwa_sort TYPE slis_sortinfo_alv.</P><P>DATA : lit_sort TYPE slis_t_sortinfo_alv.</P><P></P><P>*--Pass the values to the table</P><P>lwa_sort-fieldname = 'PERNR'. "Field name in o/p inttable</P><P>lwa_sort-tabname = 'it_final2'. "Output Internal table</P><P>lwa_sort-spos = '1'. "Sort sequence</P><P>lwa_sort-up = 'X'. "Sort in ascending order</P><P>lwa_sort-down = ' '. "Sort in descending order</P><P>lwa_sort-subtot = 'X'. "Subtotal</P><P></P><P>APPEND lwa_sort TO lit_sort.</P><P></P><P>*--Pass the values to the table</P><P>lwa_sort-fieldname = 'WORKDATE'. "Field name in o/p inttable</P><P>lwa_sort-tabname = 'it_final2'. "Output Internal table</P><P>lwa_sort-spos = '2'. "Sort sequence</P><P>lwa_sort-up = 'X'. "Sort in ascending order</P><P>lwa_sort-down = ' '. "Sort in descending order</P><P>lwa_sort-subtot = ' '. "Subtotal</P><P></P><P>APPEND lwa_sort TO lit_sort.</P><P></P><P>*--Pass the values to the table</P><P>lwa_sort-fieldname = 'WEKLY'. "Field name in o/p inttable</P><P>lwa_sort-tabname = 'it_final2'. "Output Internal table</P><P>lwa_sort-spos = '3'. "Sort sequence</P><P>lwa_sort-up = 'X'. "Sort in ascending order</P><P>lwa_sort-down = ' '. "Sort in descending order</P><P>lwa_sort-subtot = ' '. "Subtotal</P><P></P><P>APPEND lwa_sort TO lit_sort.</P><P></P><P>wa_layout-colwidth_optimize = 'X'.</P><P></P><P>IF NOT it_final2[] IS INITIAL.</P><P></P><P>*--Call the function module to display the ALV report</P><P>CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'</P><P>EXPORTING</P><P>is_layout = wa_layout</P><P>i_callback_program = v_repid</P><P>it_fieldcat = it_fieldcat1[]</P><P>i_default = c_chk</P><P>i_save = c_save</P><P>it_sort = lit_sort</P><P>TABLES</P><P>t_outtab = it_final2</P><P>EXCEPTIONS</P><P>program_error = 1</P><P>OTHERS = 2.</P><P>IF sy-subrc 0.</P><P>MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno</P><P>WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.</P><P>ENDIF.</P><P></P><P>ELSE.</P><P></P><P>*--Message No data found</P><P>MESSAGE i888 WITH text-017.</P><P>LEAVE LIST-PROCESSING.</P><P></P><P>ENDIF.</P><P></P><P>ENDFORM. " sub_display_data</P><P></P><P></P><P>And for regarding the sorting please read the below documentation.</P><P></P><P>When ever we select data from data base table to internal table it may/maynot come in sorted order by primary keys of the table. Same SELECT Query may return different order of records for different executions.To ensure that our records in internal table are in proper order before using them we will use the statement SORT. Also if u want to arrange the records of the internal table based on non primary keys or combination of primary and nonprimary keys then we will use sort statement.</P><P></P><P>from the above documentation i think it is clear that we have to perform sort for the data.</P><P></P><P>Reward points if usefull,</P><P>Thanks & regards,</P><P>Kalyan.</P></BODY></HTML> Wed, 02 Apr 2008 18:11:13 GMT Former Member 2008-04-02T18:11:13Z ALV USING `FUNCTION MODULE https://community.sap.com/t5/application-development-and-automation-discussions/alv-using-function-module/m-p/3621794#M872557 <HTML><HEAD></HEAD><BODY><P>1.WHAT IS THE PROCEDURE TO <STRONG>GRAND TOTAL CURRENCY FIELDS</STRONG> BY USING ALV WITH FM?</P><P></P><P>2. WHAT IS THE <STRONG>PURPOSE OF IT_SORT</STRONG> IN ALV_GRID_DISPLAY?</P><P></P><P><STRONG>3. WHILE DOING SUBTOTAL & GRANDTOTAL TO THE FIELDS , IS IT COMPULSORY TO DO SORTING, IF SO PLZ EXPLAIN?</STRONG> </P><P></P><P></P><P></P><P>KINDLY HELP ME.</P></BODY></HTML> Wed, 02 Apr 2008 15:49:28 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-using-function-module/m-p/3621794#M872557 Former Member 2008-04-02T15:49:28Z Re: ALV USING `FUNCTION MODULE https://community.sap.com/t5/application-development-and-automation-discussions/alv-using-function-module/m-p/3621795#M872558 <HTML><HEAD></HEAD><BODY><P>1. Not quite sure about requirement.</P><P>2. You can do a sorting before displaying data.</P><P>3. No need to do that at all, but would be better for subtotals for example.</P></BODY></HTML> Wed, 02 Apr 2008 15:52:51 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-using-function-module/m-p/3621795#M872558 Sm1tje 2008-04-02T15:52:51Z Re: ALV USING `FUNCTION MODULE https://community.sap.com/t5/application-development-and-automation-discussions/alv-using-function-module/m-p/3621796#M872559 <HTML><HEAD></HEAD><BODY><P>Check this program.</P><P></P><P></P><P>BCALV_TEST_FULLSCREEN</P><P>You have to build sort for the totals and subtotals.</P><P></P><P></P><P></P><P></P><P></P><P>Thanks,</P><P>Vamshi.</P></BODY></HTML> Wed, 02 Apr 2008 16:04:04 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-using-function-module/m-p/3621796#M872559 Former Member 2008-04-02T16:04:04Z Re: ALV USING `FUNCTION MODULE https://community.sap.com/t5/application-development-and-automation-discussions/alv-using-function-module/m-p/3621797#M872560 <HTML><HEAD></HEAD><BODY><P>hi saritha,</P><P>The functional module for gand total can be obtained like this,</P><P></P><P>For the totals of each currencies, I just inserted the following code in my form 'fill_fieldcat':</P><P></P><P>wa_fieldcat-fieldname = 'DMBTR'.</P><P>wa_fieldcat-ref_fieldname = 'DMBTR'.</P><P>wa_fieldcat-ref_tabname = 'BSEG'.</P><P>wa_fieldcat-cfieldname = 'WAERS'</P><P>APPEND wa_fieldcat TO it_fieldcat.</P><P>CLEAR wa_fieldcat.</P><P></P><P>And of course, there must be a currency field that will serve as the reference for the calculation of totals for the different currencies</P><P></P><P>Also refer this code</P><P></P><P>&----</P><HR originaltext="----------------------------------------------------------------" /><P>*& Form sub_field_cat</P><P>&----</P><HR originaltext="----------------------------------------------------------------" /><P></P><P>text</P><P></P><P></P><P>-</P><HR originaltext="-------------------------------------------------------------------------------" /><P></P><P>FORM sub_field_cat .</P><P></P><P>it_fieldcat1-fieldname = 'PERNR'.</P><P>it_fieldcat1-seltext_m = text-003.</P><P>it_fieldcat1-col_pos = 0.</P><P>it_fieldcat1-outputlen = 8.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>it_fieldcat1-fieldname = 'WORKDATE'.</P><P>it_fieldcat1-seltext_m = text-012.</P><P>it_fieldcat1-col_pos = 1.</P><P>it_fieldcat1-outputlen = 8.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>it_fieldcat1-fieldname = 'WEKLY'.</P><P>it_fieldcat1-seltext_m = text-015.</P><P>it_fieldcat1-col_pos = 2.</P><P>it_fieldcat1-outputlen = 7.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>it_fieldcat1-fieldname = 'LGART'.</P><P>it_fieldcat1-seltext_m = text-013.</P><P>it_fieldcat1-col_pos = 3.</P><P>it_fieldcat1-outputlen = 4.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>it_fieldcat1-fieldname = 'STDAZ'.</P><P>it_fieldcat1-seltext_m = text-014.</P><P>it_fieldcat1-col_pos = 4.</P><P>it_fieldcat1-outputlen = 7.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>it_fieldcat1-fieldname = 'RAUFNR'.</P><P>it_fieldcat1-seltext_m = text-016.</P><P>it_fieldcat1-col_pos = 5.</P><P>it_fieldcat1-outputlen = 12.</P><P>APPEND it_fieldcat1 TO it_fieldcat1.</P><P>CLEAR it_fieldcat1.</P><P></P><P>ENDFORM. " sub_field_cat</P><P></P><P>&----</P><HR originaltext="----------------------------------------------------------------" /><P>*& Form sub_display_data</P><P>&----</P><HR originaltext="----------------------------------------------------------------" /><P></P><P>text</P><P>-</P><HR originaltext="-------------------------------------------------------------------------------" /><P> </P><P>FORM sub_display_data .</P><P></P><P>*--To sort the output through material number</P><P>DATA : lwa_sort TYPE slis_sortinfo_alv.</P><P>DATA : lit_sort TYPE slis_t_sortinfo_alv.</P><P></P><P>*--Pass the values to the table</P><P>lwa_sort-fieldname = 'PERNR'. "Field name in o/p inttable</P><P>lwa_sort-tabname = 'it_final2'. "Output Internal table</P><P>lwa_sort-spos = '1'. "Sort sequence</P><P>lwa_sort-up = 'X'. "Sort in ascending order</P><P>lwa_sort-down = ' '. "Sort in descending order</P><P>lwa_sort-subtot = 'X'. "Subtotal</P><P></P><P>APPEND lwa_sort TO lit_sort.</P><P></P><P>*--Pass the values to the table</P><P>lwa_sort-fieldname = 'WORKDATE'. "Field name in o/p inttable</P><P>lwa_sort-tabname = 'it_final2'. "Output Internal table</P><P>lwa_sort-spos = '2'. "Sort sequence</P><P>lwa_sort-up = 'X'. "Sort in ascending order</P><P>lwa_sort-down = ' '. "Sort in descending order</P><P>lwa_sort-subtot = ' '. "Subtotal</P><P></P><P>APPEND lwa_sort TO lit_sort.</P><P></P><P>*--Pass the values to the table</P><P>lwa_sort-fieldname = 'WEKLY'. "Field name in o/p inttable</P><P>lwa_sort-tabname = 'it_final2'. "Output Internal table</P><P>lwa_sort-spos = '3'. "Sort sequence</P><P>lwa_sort-up = 'X'. "Sort in ascending order</P><P>lwa_sort-down = ' '. "Sort in descending order</P><P>lwa_sort-subtot = ' '. "Subtotal</P><P></P><P>APPEND lwa_sort TO lit_sort.</P><P></P><P>wa_layout-colwidth_optimize = 'X'.</P><P></P><P>IF NOT it_final2[] IS INITIAL.</P><P></P><P>*--Call the function module to display the ALV report</P><P>CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'</P><P>EXPORTING</P><P>is_layout = wa_layout</P><P>i_callback_program = v_repid</P><P>it_fieldcat = it_fieldcat1[]</P><P>i_default = c_chk</P><P>i_save = c_save</P><P>it_sort = lit_sort</P><P>TABLES</P><P>t_outtab = it_final2</P><P>EXCEPTIONS</P><P>program_error = 1</P><P>OTHERS = 2.</P><P>IF sy-subrc 0.</P><P>MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno</P><P>WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.</P><P>ENDIF.</P><P></P><P>ELSE.</P><P></P><P>*--Message No data found</P><P>MESSAGE i888 WITH text-017.</P><P>LEAVE LIST-PROCESSING.</P><P></P><P>ENDIF.</P><P></P><P>ENDFORM. " sub_display_data</P><P></P><P></P><P>And for regarding the sorting please read the below documentation.</P><P></P><P>When ever we select data from data base table to internal table it may/maynot come in sorted order by primary keys of the table. Same SELECT Query may return different order of records for different executions.To ensure that our records in internal table are in proper order before using them we will use the statement SORT. Also if u want to arrange the records of the internal table based on non primary keys or combination of primary and nonprimary keys then we will use sort statement.</P><P></P><P>from the above documentation i think it is clear that we have to perform sort for the data.</P><P></P><P>Reward points if usefull,</P><P>Thanks & regards,</P><P>Kalyan.</P></BODY></HTML> Wed, 02 Apr 2008 18:11:13 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-using-function-module/m-p/3621797#M872560 Former Member 2008-04-02T18:11:13Z Re: ALV USING `FUNCTION MODULE https://community.sap.com/t5/application-development-and-automation-discussions/alv-using-function-module/m-p/3621798#M872561 <HTML><HEAD></HEAD><BODY><P>Hi Saritha,</P><P></P><P> 1. To do grand totals , in the Field catalog for that currency fields</P><P></P><P> wa_fieldcat-datatype = 'CURR'.</P><P> wa_fieldcat-DOSUM = 'SUM'.</P><P></P><P> 2 . IT_SORT is used to do subtotals in ALV</P><P></P><P> 3 . No it is not compulsort to SORT itab but it is better to do sorting</P></BODY></HTML> Wed, 02 Apr 2008 18:22:50 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-using-function-module/m-p/3621798#M872561 Former Member 2008-04-02T18:22:50Z