Sub total text is not working

Dear experts,
I am working on ALV report. I need to maintain Sub total text but its not working with the below code.
Can you please tell me whats wrong with this code.
FORM f_display_alv_output .
DATA: loc_repid TYPE sy-repid.
CLEAR: loc_repid.
loc_repid = sy-repid.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
*   I_INTERFACE_CHECK                 = ' '
*   I_BYPASSING_BUFFER                = ' '
*   I_BUFFER_ACTIVE                   = ' '
   i_callback_program                = loc_repid
*   I_CALLBACK_PF_STATUS_SET          = ' '
*   I_CALLBACK_USER_COMMAND           = ' '
*   i_callback_top_of_page            = 'F_ALV_TOP_OF_PAGE'
*   I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
*   I_CALLBACK_HTML_END_OF_LIST       = ' '
*   I_STRUCTURE_NAME                  =
*   I_BACKGROUND_ID                   = ' '
*   I_GRID_TITLE                      =
*   I_GRID_SETTINGS                   =
   is_layout                         = fs_layout
   it_fieldcat                       = itab_fieldcat
*   IT_EXCLUDING                      =
*   IT_SPECIAL_GROUPS                 =
   it_sort                           = itab_sort
*   IT_FILTER                         =
*   IS_SEL_HIDE                       =
   i_default                         = 'X'
   i_save                            = 'A'
*   IS_VARIANT                        =
   it_events                         = itab_events
*   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
*   I_HTML_HEIGHT_TOP                 = 0
*   I_HTML_HEIGHT_END                 = 0
*   IT_ALV_GRAPHICS                   =
*   IT_HYPERLINK                      =
*   IT_ADD_FIELDCAT                   =
*   IT_EXCEPT_QINFO                   =
*   IR_SALV_FULLSCREEN_ADAPTER        =
* IMPORTING
*   E_EXIT_CAUSED_BY_CALLER           =
*   ES_EXIT_CAUSED_BY_USER            =
    TABLES
      t_outtab                          = itab_output
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.                    " F_DISPLAY_ALV_OUTPUT
*&      Form F_POPULATE_SORT
*       text
* --> p1        text
* <-- p2        text
FORM f_populate_sort .
CLEAR: fs_sort.
REFRESH: itab_sort.
* Sort by Account Manager
fs_sort-spos = '01' .
fs_sort-fieldname = 'ACT_MANAGER'.
fs_sort-tabname = 'ITAB_OUTPUT'.
fs_sort-up = 'X'.
fs_sort-subtot = 'X'.
APPEND fs_sort TO itab_sort .
CLEAR fs_sort.
* Sort by Sales Office
fs_sort-spos = '02' .
fs_sort-fieldname = 'VKBUR'.
fs_sort-tabname = 'ITAB_OUTPUT'.
fs_sort-up = 'X'.
fs_sort-subtot = 'X'.
APPEND fs_sort TO itab_sort .
CLEAR fs_sort.
* Sort by Customer
fs_sort-spos = '03' .
fs_sort-fieldname = 'KUNNR'.
fs_sort-tabname = 'ITAB_OUTPUT'.
fs_sort-up = 'X'.
fs_sort-subtot = 'X'.
APPEND fs_sort TO itab_sort .
CLEAR fs_sort.
* Sort by Material
fs_sort-spos = '04' .
fs_sort-fieldname = 'MATNR'.
fs_sort-tabname = 'ITAB_OUTPUT'.
fs_sort-up = 'X'.
fs_sort-subtot = 'X'.
APPEND fs_sort TO itab_sort .
CLEAR fs_sort.
ENDFORM.                    " F_POPULATE_SORT
*&      Form F_GET_EVENT
* Handle events for the list
* --> p1        text
* <-- p2        text
FORM f_get_event .
REFRESH: itab_events.
CLEAR: fs_events.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type     = 4
    IMPORTING
      et_events       = itab_events
    EXCEPTIONS
      list_type_wrong = 0
      OTHERS          = 0.
CLEAR: fs_events.
READ TABLE itab_events INTO fs_events WITH KEY name = slis_ev_top_of_page.
IF sy-subrc EQ 0.
    MOVE 'F_ALV_TOP_OF_PAGE' TO fs_events-form.
    MODIFY itab_events FROM fs_events INDEX sy-tabix.
ENDIF.
CLEAR fs_events.
READ TABLE itab_events INTO fs_events WITH KEY name = slis_ev_subtotal_text.
IF sy-subrc = 0.
    MOVE wl_formname_subtotal_text TO fs_events-form.
    MODIFY itab_events FROM fs_events INDEX sy-tabix.
ENDIF.
ENDFORM.                    " F_GET_EVENT
*&      Form SUBTOTAL_TEXT_form
*       text
FORM subtotal_text_form USING p_subtot_text TYPE slis_subtot_text.
IF p_subtot_text-criteria = 'ACT_MANAGER'.
    p_subtot_text-display_text_for_subtotal = 'Account Manager Level Subtotal'(020).
ENDIF.
ENDFORM.                    "SUBTOTAL_TEXT
*&      Form f_alv_top_of_page
*       text
FORM f_alv_top_of_page.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = itab_top_of_page.
ENDFORM.                    "F_ALV_TOP_OF_PAGE
Edited by: Rajesh Tummala on Apr 7, 2009 4:16 PM

Here's the code below. Sub total text event is not working but top of page is working fine.
*&      Form F_POPULATE_SORT
*       text
* --> p1        text
* <-- p2        text
FORM f_populate_sort .
CLEAR: fs_sort.
REFRESH: itab_sort.
* Sort by Account Manager
fs_sort-spos = '01' .
fs_sort-fieldname = 'ACT_MANAGER'.
fs_sort-tabname = 'ITAB_OUTPUT'.
fs_sort-up = 'X'.
fs_sort-subtot = 'X'.
APPEND fs_sort TO itab_sort .
CLEAR fs_sort.
* Sort by Sales Office
fs_sort-spos = '02' .
fs_sort-fieldname = 'VKBUR'.
fs_sort-tabname = 'ITAB_OUTPUT'.
fs_sort-up = 'X'.
fs_sort-subtot = 'X'.
APPEND fs_sort TO itab_sort .
CLEAR fs_sort.
* Sort by Customer
fs_sort-spos = '03' .
fs_sort-fieldname = 'KUNNR'.
fs_sort-tabname = 'ITAB_OUTPUT'.
fs_sort-up = 'X'.
fs_sort-subtot = 'X'.
APPEND fs_sort TO itab_sort .
CLEAR fs_sort.
* Sort by Material
fs_sort-spos = '04' .
fs_sort-fieldname = 'MATNR'.
fs_sort-tabname = 'ITAB_OUTPUT'.
fs_sort-up = 'X'.
fs_sort-subtot = 'X'.
APPEND fs_sort TO itab_sort .
CLEAR fs_sort.
ENDFORM.                    " F_POPULATE_SORT
*&      Form F_GET_EVENT
* Handle events for the list
* --> p1        text
* <-- p2        text
FORM f_get_event .
REFRESH: itab_events.
CLEAR: fs_events.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type     = 4
    IMPORTING
      et_events       = itab_events
    EXCEPTIONS
      list_type_wrong = 0
      OTHERS          = 0.
CLEAR: fs_events.
READ TABLE itab_events INTO fs_events WITH KEY name = slis_ev_top_of_page.
IF sy-subrc EQ 0.
    MOVE 'F_ALV_TOP_OF_PAGE' TO fs_events-form.
    MODIFY itab_events FROM fs_events INDEX sy-tabix.
ENDIF.
CLEAR fs_events.
READ TABLE itab_events INTO fs_events WITH KEY name = slis_ev_subtotal_text.
IF sy-subrc = 0.
    MOVE wl_formname_subtotal_text TO fs_events-form.
    MODIFY itab_events FROM fs_events INDEX sy-tabix.
ENDIF.
ENDFORM.                    " F_GET_EVENT
*&      Form F_DISPLAY_ALV_OUTPUT
*   Display the list output
* --> p1        text
* <-- p2        text
FORM f_display_alv_output .
DATA: loc_repid TYPE sy-repid.
CLEAR: loc_repid.
loc_repid = sy-repid.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
*   I_INTERFACE_CHECK                 = ' '
*   I_BYPASSING_BUFFER                = ' '
*   I_BUFFER_ACTIVE                   = ' '
   i_callback_program                = loc_repid
*   I_CALLBACK_PF_STATUS_SET          = ' '
*   I_CALLBACK_USER_COMMAND           = ' '
*   i_callback_top_of_page            = 'F_ALV_TOP_OF_PAGE'
*   I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
*   I_CALLBACK_HTML_END_OF_LIST       = ' '
*   I_STRUCTURE_NAME                  =
*   I_BACKGROUND_ID                   = ' '
*   I_GRID_TITLE                      =
*   I_GRID_SETTINGS                   =
   is_layout                         = fs_layout
   it_fieldcat                       = itab_fieldcat
*   IT_EXCLUDING                      =
*   IT_SPECIAL_GROUPS                 =
   it_sort                           = itab_sort
*   IT_FILTER                         =
*   IS_SEL_HIDE                       =
   i_default                         = 'X'
   i_save                            = 'A'
*   IS_VARIANT                        =
   it_events                         = itab_events
*   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
*   I_HTML_HEIGHT_TOP                 = 0
*   I_HTML_HEIGHT_END                 = 0
*   IT_ALV_GRAPHICS                   =
*   IT_HYPERLINK                      =
*   IT_ADD_FIELDCAT                   =
*   IT_EXCEPT_QINFO                   =
*   IR_SALV_FULLSCREEN_ADAPTER        =
* IMPORTING
*   E_EXIT_CAUSED_BY_CALLER           =
*   ES_EXIT_CAUSED_BY_USER            =
    TABLES
      t_outtab                          = itab_output
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.                    " F_DISPLAY_ALV_OUTPUT
*&      Form SUBTOTAL_TEXT_form
*       text
FORM subtotal_text_form USING p_subtot_text TYPE slis_subtot_text.
IF p_subtot_text-criteria = 'ACT_MANAGER'.
    p_subtot_text-display_text_for_subtotal = 'Account Manager Level Subtotal'(020).
ENDIF.
ENDFORM.                    "SUBTOTAL_TEXT
*&      Form f_alv_top_of_page
*       text
FORM f_alv_top_of_page.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = itab_top_of_page.
ENDFORM.                    "F_ALV_TOP_OF_PAGE

Similar Messages

ALV Sub total texts. displayed in list not in grid.

Hi,
I am displaying data using alv and sub-totals on a particular column.
i am getting the sub-totals but i am not getting the sub-total texts when i am displaying data in a grid.
'REUSE_ALV_GRID_DISPLAY'.
i am getting subtotals and subtotal texts when i am diSplAying in list.
'REUSE_ALV_LIST_DISPLAY'.
but i want to get subtotal texts using alv grid, is it possible, if so please send me the code.
Any help in this regard is highly appreciated.
Thanks in advance for your help.

Hi,
Actually i have wriitten the same code, in the alv. I am using Function modules. for the same code the sub-total and total text is appearing in the list output. but not in the grid output.
code.
wa_layout-zebra          = 'X'.
wa_layout-subtotals_text = 'Total'.
wa_layout-totals_text    = 'Sum of Marks'.
alv statement.
     is_layout = wa_layout
Declaration.
DATA : wa_layout type slis_layout_alv.
for the same declarations (Above) list is showing the texts but not the grid.
Any help in this regard is highly appreciated.

How to print sub total text in ALV

Hi All,
I have a prblem in printing sub total text in ALV. I am passing the text for sub total in ALV layout to the field SUBTOTALS_TEXT. Even then the text is not displayed where as this is working for TOTAL with the field TOTALS_TEXT.
Could any one provide me the solution please?
Thanks & Regards,
S.Lakshmi

Hi Lakshmi,
Please refer to the following code :
report zalv10.
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'. ***CRUCIAL STATEMENT****
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'. **THIS SHOULD NOT BE UNCOMENTED*
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.
<b>Please reward points if helpful.</b>
Regards,
Amit Mishra

Grand Total Text is not printing in ALV

Hi all,
I am not able to print Grand Total text in my report
I am not doing subtotal, i am using only grand totals.
So i have used in the following way
WA_FIELDCAT-DO_SUM        = GC_X.
GS_LAYOUT-TOTALS_ONLY       = GC_X.
GS_LAYOUT-TOTALS_TEXT       = 'Totals'(049).
i am using using ALV GRID DISPLAY FM...its displaying the total amount, buts text is missing...
Can any one tell me what else i have to pass in the layout or fieldcatlog or FM

Hi AMR,
If you use REUSE_ALV_GRID_DISPLAY function module, i think Total text does not come .but if u use REUSE_ALV_LIST_DISPLAY function module Total text comes .
Check this sample program it let u know ..
"Types
TYPES:
      BEGIN OF t_pa0008,
        pernr TYPE pa0008-pernr,
        lga01 TYPE pa0008-lga01,
        bet01 TYPE pa0008-bet01,
      END OF t_pa0008.
"Work areas
DATA:
      w_pa0008 TYPE t_pa0008.
"Internal tables
DATA:
      i_pa0008 TYPE STANDARD TABLE OF t_pa0008.
PARAMETERS:
           list TYPE c RADIOBUTTON GROUP gr1,
           grid TYPE c RADIOBUTTON GROUP gr1.
" ALV Declarations
" Types Pools
TYPE-POOLS:
   slis.
" Types
TYPES:
   t_fieldcat         TYPE slis_fieldcat_alv,
   t_events           TYPE slis_alv_event,
   t_layout           TYPE slis_layout_alv,
   t_sort             TYPE slis_sortinfo_alv,
   t_keyinfo          TYPE slis_keyinfo_alv.
" Workareas
DATA:
   w_fieldcat         TYPE t_fieldcat,
   w_events           TYPE t_events,
   w_sort             TYPE t_sort,
   w_layout           TYPE t_layout,
   w_keyinfo          TYPE t_keyinfo.
" Internal Tables
DATA:
   i_fieldcat         TYPE STANDARD TABLE OF t_fieldcat,
   i_events           TYPE STANDARD TABLE OF t_events,
   i_sort             TYPE STANDARD TABLE OF t_sort.
START-OF-SELECTION.
PERFORM get_data.
END-OF-SELECTION.
PERFORM build_fieldcatalog.        "Fieldcatalog
PERFORM build_events.              "Events table
PERFORM buid_layout.               "Layout structure.
PERFORM build_sort_tab.            "To sort table and get subtotal
PERFORM display_data.
*&      Form get_data
FORM get_data.
DATA:l_0008 TYPE pa0008 OCCURS 0 WITH HEADER LINE.
SELECT pernr lga01 bet01
    FROM pa0008
    INTO CORRESPONDING FIELDS OF l_0008
    WHERE begda LE sy-datum
      AND endda GE sy-datum.
    w_pa0008-pernr = l_0008-pernr.
    w_pa0008-lga01 = l_0008-lga01.
    w_pa0008-bet01 = l_0008-bet01.
    APPEND w_pa0008 TO i_pa0008.
    CLEAR w_pa0008.
    w_pa0008-pernr = l_0008-pernr.
    w_pa0008-lga01 = l_0008-lga02.
    w_pa0008-bet01 = l_0008-bet02.
    APPEND w_pa0008 TO i_pa0008.
    CLEAR w_pa0008.
    w_pa0008-pernr = l_0008-pernr.
    w_pa0008-lga01 = l_0008-lga03.
    w_pa0008-bet01 = l_0008-bet03.
    APPEND w_pa0008 TO i_pa0008.
    CLEAR w_pa0008.
    w_pa0008-pernr = l_0008-pernr.
    w_pa0008-lga01 = l_0008-lga04.
    w_pa0008-bet01 = l_0008-bet04.
    APPEND w_pa0008 TO i_pa0008.
    CLEAR w_pa0008.
ENDSELECT.
ENDFORM.                    "get_data
*&      Form build_fieldcatalog
FORM build_fieldcatalog.
PERFORM build_fcat USING:
                "Field    Int.Table    Text
                 'PERNR' 'I_PA0008'   'PERNR', "Remove this if u dont want in the item table as well as it is there in the header table
                 'LGA01' 'I_PA0008'   'LGA01',
                 'BET01' 'I_PA0008'   'BET01'.
ENDFORM.                    "build_fieldcatalog
*&      Form build_events
*       text
FORM build_events.
CLEAR:
        w_events, i_events[].
w_events-name = 'TOP_OF_PAGE'.
w_events-form = 'TOP_OF_PAGE'.
APPEND w_events TO i_events.
CLEAR w_events.
ENDFORM.                    "build_events
*&      Form display_data
*       text
FORM display_data.
DATA:
        l_program TYPE sy-repid VALUE sy-repid,
        l_fm      TYPE RS38L_FNAM.
IF list = 'X'.
    l_fm = 'REUSE_ALV_LIST_DISPLAY'.
ELSEIF grid ='X'.
    l_fm = 'REUSE_ALV_GRID_DISPLAY'.
ENDIF.
CALL FUNCTION l_fm
    EXPORTING
      i_callback_program = l_program
      is_layout          = w_layout
      it_fieldcat        = i_fieldcat
      it_events          = i_events
      it_sort            = i_sort
    TABLES
      t_outtab           = i_pa0008.
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.                    "display_data
*&      Form build_fcat
FORM build_fcat USING l_field l_tab l_text.
w_fieldcat-fieldname = l_field.
w_fieldcat-tabname   = l_tab.
w_fieldcat-seltext_m = l_text.
IF l_field = 'BET01'.
    w_fieldcat-do_sum = 'X'.
ENDIF.
APPEND w_fieldcat TO i_fieldcat.
CLEAR w_fieldcat.
ENDFORM.                    " build_fcat
*&      Form top_of_page
*       text
FORM top_of_page.
DATA :
i_header TYPE slis_t_listheader,
w_header LIKE LINE OF i_header.
DATA:l_date1 TYPE datum,
       l_date2 TYPE datum.
w_header-typ = 'S'.
w_header-info = sy-title.
APPEND w_header TO i_header.
CLEAR w_header.
w_header-typ = 'H'.
w_header-info = sy-repid.
APPEND w_header TO i_header.
CLEAR w_header.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = i_header
      i_logo             = 'ENJOYSAP_LOGO'.
ENDFORM.                    "top_of_page
*&      Form BUILD_sort_tab
FORM build_sort_tab .
CLEAR :i_sort[],w_sort.
w_sort-spos      = 1.
w_sort-fieldname = 'PERNR'.
w_sort-tabname   = 'I_PA0008'. "header table
w_sort-up        = 'X'.
w_sort-subtot    = 'X'.
APPEND w_sort TO i_sort.
CLEAR w_sort.
ENDFORM.                    " BUILD_sort_tab
*&      Form buid_layout
FORM buid_layout .
w_layout-totals_text = 'Total'.
w_layout-subtotals_text = 'S.Total'.
ENDFORM.                    " buid_layout
Regards,
Venkat.O

TEXT-INDENT NOT WORKING

Hi!
Please see the below CSS code, why isn't the text-indent not
working? everything else is?
a.quick_link_buttons:link {
color : #004489;
font-family : Myriad, Arial, Helvetica, Verdana, sans-serif;
font-size : 12px;
text-indent : 10px;
line-height : 20px;
text-decoration : none;
font-style : normal;
font-weight : normal;
a.quick_link_buttons:hover {
color : #004489;
font-family : Myriad, Arial, Helvetica, Verdana, sans-serif;
font-size : 12px;
text-indent : 10px;
line-height : 20px;
text-decoration : underline;
font-style : normal;
font-weight : normal;
Many Thanks!

You don't need to respecify styles that will inherit or
default styles. You
could achieve the same styles with the following -
a.quick_link_buttons {
color : #004489;
font-family : Myriad, Arial, Helvetica, Verdana, sans-serif;
font-size : 12px;
text-indent : 10px;
line-height : 20px;
text-decoration : none;
a.quick_link_buttons:hover {
text-decoration : underline;
As for why the indent isn't working, try 'padding-left:10px;'
instead, when
applied to the inline element. Or, you can have a rule that
will apply to
the container for these links, e.g.,
<div style="text-indent:10px;">
<a class="quick_link_buttons">whatever</a>
</div>
Murray --- ICQ 71997575
Adobe Community Expert
(If you *MUST* email me, don't LAUGH when you do so!)
==================
http://www.dreamweavermx-templates.com
- Template Triage!
http://www.projectseven.com/go
- DW FAQs, Tutorials & Resources
http://www.dwfaq.com - DW FAQs,
Tutorials & Resources
http://www.macromedia.com/support/search/
- Macromedia (MM) Technotes
==================
"jinxed" <[email protected]> wrote in
message
news:eur929$gro$[email protected]..
> Hi!
>
> Please see the below CSS code, why isn't the text-indent
not working?
> everything else is?
>
> a.quick_link_buttons:link {
> color : #004489;
> font-family : Myriad, Arial, Helvetica, Verdana,
sans-serif;
> font-size : 12px;
> text-indent : 10px;
> line-height : 20px;
> text-decoration : none;
> font-style : normal;
> font-weight : normal;
> }
> a.quick_link_buttons:hover {
> color : #004489;
> font-family : Myriad, Arial, Helvetica, Verdana,
sans-serif;
> font-size : 12px;
> text-indent : 10px;
> line-height : 20px;
> text-decoration : underline;
> font-style : normal;
> font-weight : normal;
> }
>
> Many Thanks!
>

TS2755 My voice to text is not working. How can I fix it? I have an iPhone 5. Thx!

My voice to text is not working? How can I fix it? I have an iPhone 5. Thx!!

The microphone icon is not available- it's there but a pale grey. I could use it now to type this but not when texting. Siri is enabled and working fine.

TouchUp Text Tool not working?

I have Max OS X 10.4, Acrobat 8.1.2 and cannot get the TouchUp Text Tool to work? Can select text and delete/copy/paste etc but cannot add/change/modify any text from the keyboard? All keyboard text keys not working or changing data?
Was using Acrobat 7 and it worked great, however this version is just not cooperating.
Any suggestions would be greatly appreciated...
Thanks,
Ron

I talked to a very helpful person at Adobe Acrobat Tech support yesterday (Tony) and I *think* I have the problem resolved. [BTW, I don't see any definite mentions to this here: during this problem I was able to delete (using either of the delete keys) text and I was able to hit 'return' to get to a new line - while using the touch-up text tool. Also, I was able to create a new blank document and type in next fine too.]
After troubleshooting all the possible causes with Tech support (including manually trashing all the /user/library/preferences/acrobat (folder) and all the com.adobe.acrobat ..(8) preferences in the /user/library/preferences folder - and after reinstalling Acrobat 8 - the issue still wasn't fixed. I called back Tech Support and got the same person (Tony) and with him still on phone, I created a new user on my Mac -- recreated the text touch-up tool problem and Acrobat 8 worked just like it was supposed to do. -- so ... the problem was in my 'old' user account & probably a font problem.
Tony the Tech transfered me over to a Font Tech at Adobe (who was a rude, nasty s-o-b who barely spent 2 minutes with the problem, but that's IMHO) who told me the only resolution, since in his opinion I had a corrupted User account, was to trash my current User account on my system and start fresh -- no alternative! Since that wasn't acceptable to me, and since the Font Tech could or would not give me a straight answer about transferring fonts from my User/Library/Fonts to the computer (root, not system) /Library/Fonts and working on Acrobat that way .... or fixing any font problems in my current /user/fonts -- ..... I hung up the phone and resolved to track this down myself (with the help that was already given to me by Tony the Acrobat Tech.
The first thing I tried this morning was to see if the Acrobat 8 text touch-up 'bug' was still happening -- and it was.
So I spent the rest of this morning validating fonts and deleting duplicates -- (you know how those nasty duplicate fonts just appear even though you think you have them all removed a month or so ago). I also moved all my Adobe otf fonts over to my /Library/Fonts and deleted those same fonts from my /User/Library/Fonts.
I just fired up Acrobat 8 and tried the text touch-up tool --- and it works fine! No problem at all.
Final answer (at least for me) is --> validate all your fonts. I used Font Book (Mac OS) to do this. Delete any major errors on fonts you can live without. Some of the warnings you get (on the critical errors and caution warning both are confusing: 'name' table warning, for example. I did find an Apple Developer document that explains (to a small degree) what these mean: http://developer.apple.com/textfonts/TTRefMan/index.html
Definitely delete every duplicate font you find. I kept some non-duplicated fonts with minor warnings, but these fonts wouldn't be used in Acrobat anyway.
I don't know if moving the Adobe otf fonts to my root /Library/Fonts helped or not since I didn't do a test of this prior to any validation on my user/font file. It was just one step in my bug fix.
Let me know if this works for you all too.
-- Susan

Adobe XI - Hightlight text tool not working

Just downloaded adobe XI and the hightlight text tool not working. How can I get this to work.

I guess you can always use the box tool in drawing markups to draw a box around the text then play with the colors until you get close to what you want.
The only thing I don't like about that (besides it being a PITA) is that it covers the text with color as well where the highlight tool does not.

Texting is not working on new iphone 4s. Any suggestions?

Texting is not working on new iphone 4s. Any suggestions?

Att just told us to delete all txt conversations they are getting lots of complains about this.
it seems to work so far

My predictive text does not work since the new update

The "predictive text" does not work on y IPod 4g since the new software update. How do I fix it?

As a Test:
Hold down the option (or alt) key and launch iPhoto. From the resulting menu select 'Create Library'
Import a few pics into this new, blank library. Is the Problem repeated there?
Post back with the result.

Sub Total Text in an ALV using FACTORY Method

Hi Gurus,
My requirement is simple, but I couldn't find any answers under SDN or any other forums. Some of you may ask me to check for the SCN posts, but I almost checked everything.
My requirement is - When I get the Sub-total in my ALV, it should print a text other than the field which has got sub-total value.
My ALV Schema:
Field1 | Field2 | Field 3 |
____   |______ |______ |
           |             |             |
           |             |             |
          Tot. Qty | 1000.00|
I have sorted and added the subtotal = 'X' for the field which I need the Subtotal. Added Aggregations to Field3. But where and how to the field 'Tot. Qty', so that it should appear at the Sub-Total Level.
Please guide me if I've missed any of the forums. Again my requirement is to print the Field Name.
Regards,
-Wahid Hussain Syed.

Hi,
You can view this thread for example Display constant text in intermediate results column of SALV as it says that this is a limitation in SALV that "The output of totals and subtotals is handled solely by ALV. You can neither pass the results to your application nor manipulate them in any way.". But you can see a work around done for this problem, to be frank that I have not done that and I am only providing this link for your reference.

Remove sub total text in ALV.

Hello,
How can I remove the text in sub total in ALV? I want to show only sub total values, not any explanation.
Thanks.

In my code;
FIELDCATALOG-FIELDNAME   = 'SYSTEM_UNIQ_NO'.
FIELDCATALOG-SELTEXT_L   = 'No'.
FIELDCATALOG-DDICTXT     = 'L'.
APPEND FIELDCATALOG TO FIELDCATALOG.
FIELDCATALOG-FIELDNAME   = 'QUANTITY'.
FIELDCATALOG-SELTEXT_L   = 'Quantity'.
FIELDCATALOG-DDICTXT     = 'L'.
FIELDCATALOG-do_sum       = 'X'.
FIELDCATALOG-QFIELDNAME = 'QUNIT'.
APPEND FIELDCATALOG TO FIELDCATALOG.
it_sort-spos      = 1.
it_sort-fieldname = 'SYSTEM_UNIQ_NO'.
it_sort-SUBTOT    = 'X'.
it_sort-UP        = 'X'.
GD_LAYOUT-NO_INPUT          = 'X'.
GD_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.
GD_LAYOUT-no_totalline      = 'X'.
GD_LAYOUT-subtotals_text    = SPACE.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
         EXPORTING
              I_CALLBACK_PROGRAM      = GD_REPID
              I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
              IS_LAYOUT               = GD_LAYOUT
              IT_FIELDCAT             = FIELDCATALOG[]
              I_SAVE                  = 'X'
              IT_SORT                 = IT_SORT[]
         TABLES
              T_OUTTAB                = ITAB
         EXCEPTIONS
              PROGRAM_ERROR           = 1
              OTHERS                  = 2.
But, I am seeing the System Uniq No before sub totals. Also, I have assigned 'Test' to GD_LAYOUT-subtotals_text. But, I can not see 'Test' anywhere.

Sub total text in ALV report

Hi,
I need to do subtotalling in my program using ALV. I am getting the subtotal value in ALV list display , but not getting the text for subtotalling.
matnr               werks                       stock
154                  1001                         1589
158                  1001                         1651
Subtotal for plant 1001                               3240
155                  1002                         465
Subtotal for plant 1002                       465

hi,
how did u declared ur internal table?
Declare a dummy field in your internal table to trigger subtotal text event.
TYPES: BEGIN OF ty_ekpo,
          lifnr TYPE ekko-lifnr,    "vendor number
          ebeln TYPE ekko-ebeln,    "purchase document number
          ebelp TYPE ekpo-ebelp,    "Item Number of Purchasing Document
          matnr TYPE ekpo-matnr,    "Material Number
          bukrs TYPE ekpo-bukrs,    "Company Code
          werks TYPE ekpo-werks,    "Plant
          d,                        "Dummy field to fire the Subtotal text event
      END OF ty_ekpo.
Prepare field catalog for that dummyfield also and set attributes like below
wa_fcat-col_pos = 7.
wa_fcat-fieldname = 'D'.
wa_fcat-tabname = 'IT_EKPO'.
wa_fcat-ref_fieldname = 'NETPR'.
wa_fcat-ref_tabname = 'EKPO'.
wa_fcat-no_out = 'X'.
APPEND wa_fcat TO it_fcat.
Fill sortinfo table as follows
wa_sort-spos = 1.
wa_sort-fieldname = 'LIFNR'.
wa_sort-tabname = 'IT_EKPO'.
wa_sort-up = 'X'.
wa_sort-group = 'UL'.
APPEND wa_sort TO it_sort.
CLEAR wa_sort.
wa_sort-spos = 2.
wa_sort-fieldname = 'D'.
wa_sort-tabname = 'IT_EKPO'.
wa_sort-up = 'X'.
wa_sort-group = 'UL'.
wa_sort-subtot = 'X'.
APPEND wa_sort TO it_sort.
fill the event table
wa_event-name = 'SUBTOTAL_TEXT'. "--> this event is used to trigger subtotal text
wa_event-form = 'SUBTOTAL'.
APPEND wa_event TO it_event.
*&      Form subtotal
FORM subtotal USING i_listhead STRUCTURE wa_ekpo i_subtotal TYPE slis_subtot_text.
READ TABLE it_sort INTO wa_sort WITH KEY fieldname = 'D'.
IF sy-subrc = 0.
    IF i_subtotal-criteria = 'D'.
      i_subtotal-display_text_for_subtotal = 'Sub total'.
    ENDIF.
ENDIF.
ENDFORM.                    "subtotal
Thanks & REgards

Regarding totals and sub totals text in alv

Hi all,
i am displaying Totals and subtotals ......but i want to display the text before the the Totals and Subtotals.
Please help me in regarding this..
Thanks in advance,
S.Gangi reddy.

hi,
check this report.
*& Report ZGM_ALV_SUBTOTAL_TEXT                                       *
*& Author :
*& Date :
*& Description :
*& Modification History
REPORT ZGM_ALV_SUBTOTAL_TEXT                   .
*& Table declaration
TABLES: ekko.
*& Type pool declaration
TYPE-POOLS: slis. " Type pool for ALV
*& Selection screen
SELECT-OPTIONS: s_ebeln FOR ekko-ebeln.
*& Type declaration
Type declaration for internal table to store EKPO data
TYPES: BEGIN OF x_data,
       ebeln TYPE char30, " Document no.
       ebelp TYPE ebelp,   " Item no
       matnr TYPE matnr,   " Material no
       matnr1 TYPE matnr,   " Material no
       werks TYPE werks_d, " Plant
       werks1 TYPE werks_d, " Plant
       ntgew TYPE entge,   " Net weight
       gewe   TYPE egewe,   " Unit of weight
       END OF x_data.
*& Internal table declaration
DATA:
i_ekpo TYPE STANDARD TABLE OF x_data INITIAL SIZE 0,
Internal table for storing field catalog information
i_fieldcat TYPE slis_t_fieldcat_alv,
Internal table for Top of Page info. in ALV Display
i_alv_top_of_page TYPE slis_t_listheader,
Internal table for ALV Display events
i_events TYPE slis_t_event,
Internal table for storing ALV sort information
i_sort TYPE slis_t_sortinfo_alv,
i_event TYPE slis_t_event.
*& Work area declaration
DATA:
wa_ekko TYPE x_data,
wa_layout     TYPE slis_layout_alv,
wa_events         TYPE slis_alv_event,
wa_sort TYPE slis_sortinfo_alv.
*& Constant declaration
CONSTANTS:
   c_header   TYPE char1
              VALUE 'H',                    "Header in ALV
   c_item     TYPE char1
              VALUE 'S'.
*& Start-of-selection event
START-OF-SELECTION.
Select data from ekpo
SELECT ebeln " Doc no
         ebelp " Item
         matnr " Material
         matnr " Material
         werks " Plant
         werks " Plant
         ntgew " Quantity
         gewei " Unit
         FROM ekpo
         INTO TABLE i_ekpo
         WHERE ebeln IN s_ebeln
         AND ntgew NE '0.00'. IF sy-subrc = 0.
    SORT i_ekpo BY ebeln ebelp matnr .
ENDIF.
To build the Page header
PERFORM sub_build_header. "* To prepare field catalog
PERFORM sub_field_catalog. "* Perform to populate the layout structure
PERFORM sub_populate_layout."* Perform to populate the sort table.
PERFORM sub_populate_sort."* Perform to populate ALV event
PERFORM sub_get_event.
END-OF-SELECTION.
* Perform to display ALV report
PERFORM sub_alv_report_display.
*&      Form sub_build_header
      To build the header
      No Parameter
FORM sub_build_header .
Local data declaration
DATA: l_system     TYPE char10 ,          "System id
        l_r_line     TYPE slis_listheader, "Hold list header
        l_date       TYPE char10,           "Date
        l_time       TYPE char10,           "Time
        l_success_records TYPE i,           "No of success records
        l_title(300) TYPE c.                " Title
Title Display
l_r_line-typ = c_header.               " header
l_title = 'Test report'(001).
l_r_line-info = l_title.
APPEND l_r_line TO i_alv_top_of_page.
CLEAR l_r_line.
* Run date Display
CLEAR l_date.
l_r_line-typ = c_item.                " Item
WRITE: sy-datum TO l_date MM/DD/YYYY.
l_r_line-key = 'Run Date :'(002).
l_r_line-info = l_date.
APPEND l_r_line TO i_alv_top_of_page.
CLEAR: l_r_line,
         l_date.ENDFORM.                    " sub_build_header
*&      Form sub_field_catalog
      Build Field Catalog
      No Parameter
FORM sub_field_catalog .
Build Field Catalog
PERFORM sub_fill_alv_field_catalog USING:     '01' '01' 'EBELN'
'I_EKPO' 'L'
     'Doc No'(003) ' ' ' ' ' ' ' ',     '01' '02' 'EBELP' 'I_EKPO' 'L'
     'Item No'(004) 'X' 'X' ' ' ' ',     '01' '03' 'MATNR' 'I_EKPO' 'L'
     'Material No'(005) 'X' 'X' ' ' ' ',     '01' '03' 'MATNR1' 'I_EKPO'
     'L'
     'Material No'(005) ' ' ' ' ' ' ' ',
     '01' '04' 'WERKS' 'I_EKPO' 'L'
     'Plant'(006) 'X' 'X' ' ' ' ',     '01' '04' 'WERKS1' 'I_EKPO' 'L'
     'Plant'(006) ' ' ' ' ' ' ' ',     '01' '05' 'NTGEW' 'I_EKPO' 'R'
     'Net Weight'(007) ' ' ' ' 'GEWE' 'I_EKPO'.ENDFORM.
" sub_field_catalog*&----
*&     Form sub_fill_alv_field_catalog
*&     For building Field Catalog
*&     p_rowpos   Row position
*&     p_colpos   Col position
*&     p_fldnam   Fldname
*&     p_tabnam   Tabname
*&     p_justif   Justification
*&     p_seltext Seltext
*&     p_out      no out
*&     p_tech     Technical field
*&     p_qfield   Quantity field
*&     p_qtab     Quantity table
FORM sub_fill_alv_field_catalog USING p_rowpos    TYPE sycurow
                                        p_colpos    TYPE sycucol
                                        p_fldnam    TYPE fieldname
                                        p_tabnam    TYPE tabname
                                        p_justif    TYPE char1
                                        p_seltext   TYPE dd03p-scrtext_l
                                        p_out       TYPE char1
                                        p_tech      TYPE char1
                                        p_qfield    TYPE slis_fieldname
                                        p_qtab      TYPE slis_tabname.
                                       Local declaration for field
                                       catalog
DATA: wa_lfl_fcat    TYPE slis_fieldcat_alv.
wa_lfl_fcat-row_pos        = p_rowpos.     "Row
wa_lfl_fcat-col_pos        = p_colpos.     "Column
wa_lfl_fcat-fieldname      = p_fldnam.     "Field Name
wa_lfl_fcat-tabname        = p_tabnam.     "Internal Table Name
wa_lfl_fcat-just           = p_justif.     "Screen Justified
wa_lfl_fcat-seltext_l      = p_seltext.    "Field Text
wa_lfl_fcat-no_out         = p_out.        "No output
wa_lfl_fcat-tech           = p_tech.       "Technical field
wa_lfl_fcat-qfieldname     = p_qfield.     "Quantity unit
wa_lfl_fcat-qtabname       = p_qtab .
"Quantity table
IF p_fldnam = 'NTGEW'.
    wa_lfl_fcat-do_sum = 'X'.
ENDIF.
APPEND wa_lfl_fcat TO i_fieldcat.
CLEAR wa_lfl_fcat.
ENDFORM.
" sub_fill_alv_field_catalog*&----
*&      Form sub_populate_layout
      Populate ALV layout
      No Parameter
FORM sub_populate_layout . CLEAR wa_layout.
wa_layout-colwidth_optimize = 'X'.
" Optimization of Col width
ENDFORM. " sub_populate_layout*&----
*&      Form sub_populate_sort
      Populate ALV sort table
      No Parameter
FORM sub_populate_sort .
Sort on material
wa_sort-spos = '01' .
wa_sort-fieldname = 'MATNR'.
wa_sort-tabname = 'I_EKPO'.
wa_sort-up = 'X'.
wa_sort-subtot = 'X'.
APPEND wa_sort TO i_sort .
CLEAR wa_sort.
Sort on plant
wa_sort-spos = '02'.
wa_sort-fieldname = 'WERKS'.
wa_sort-tabname = 'I_EKPO'.
wa_sort-up = 'X'.
wa_sort-subtot = 'X'.
APPEND wa_sort TO i_sort .
CLEAR wa_sort.
ENDFORM.
" sub_populate_sort*&----
*&      Form sub_get_event
      Get ALV grid event and pass the form name to subtotal_text
      event
      No Parameter
FORM sub_get_event .
CONSTANTS : c_formname_subtotal_text TYPE slis_formname VALUE
'SUBTOTAL_TEXT'. DATA: l_s_event TYPE slis_alv_event.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type     = 4
    IMPORTING
      et_events       = i_event
    EXCEPTIONS
      list_type_wrong = 0
      OTHERS          = 0.
Subtotal
READ TABLE i_event INTO l_s_event
                    WITH KEY name = slis_ev_subtotal_text.
IF sy-subrc = 0.
    MOVE c_formname_subtotal_text TO l_s_event-form.
    MODIFY i_event FROM l_s_event INDEX sy-tabix.
ENDIF.ENDFORM.
" sub_get_event*&----
*&      Form sub_alv_report_display
      For ALV Report Display
      No Parameter
FORM sub_alv_report_display .
DATA: l_repid TYPE syrepid .
l_repid = sy-repid .
This function module for displaying the ALV
report
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program       = l_repid
      i_callback_top_of_page   = 'SUB_ALV_TOP_OF_PAGE'
      is_layout                = wa_layout
      it_fieldcat              = i_fieldcat
      it_sort = i_sort
      it_events                = i_event
      i_default                = 'X'
      i_save                   = 'A'
    TABLES
      t_outtab                 = i_ekpo
    EXCEPTIONS
      program_error            = 1
      OTHERS                   = 2.
IF sy-subrc <> 0.
   MESSAGE i000 WITH 'Error in ALV report display'(055).
ENDIF.
ENDFORM.
" sub_alv_report_display*&----
      FORM sub_alv_top_of_page
      Call ALV top of page
      No parameter
FORM sub_alv_top_of_page.                                   "#EC CALLED*
*To write header for the ALV
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = i_alv_top_of_page.
ENDFORM.
"alv_top_of_page*&----
*&      Form subtotal_text
      Build subtotal text
      P_total Total
      p_subtot_text Subtotal text info
FORM subtotal_text CHANGING
               p_total TYPE any
               p_subtot_text TYPE slis_subtot_text.
Material level sub total
IF p_subtot_text-criteria = 'MATNR'.
    p_subtot_text-display_text_for_subtotal
    = 'Material level total'(009).
ENDIF.
Plant level sub total
IF p_subtot_text-criteria = 'WERKS'.
    p_subtot_text-display_text_for_subtotal = 'Plant level total'(010).
ENDIF.
ENDFORM.                    "subtotal_textSelection screen:
\[removed by moderator\]
Edited by: Jan Stallkamp on Sep 3, 2008 6:17 PM

Text Wrap not working

I thought to create a text wrap you simply created a polygonal shape, selected it, and chose "Text Wrap" from the Options menu.
In a new draw document, I am creating a text frame, filling it with text, creating a polygon, and with it selected choosing "Text wrap" > "Irregular," but the text does not wrap.

Hi Timothy,
Click on the text frame to select it, then go Options > Frame Links
Wrap in Draw documents will work only if the text is in a frame to which Frame linking has been applied. It's not necessary that the frame be actually linked to a second frame.
Regards,
Barry

Sub total text is not working

Similar Messages

Maybe you are looking for