Output of alv grid

Question

hi all,
there is a very typicall requirement to be achieved in ALV grid display.
i need to display the subtotal of a field for  which line item should not be shown.
In this case "Number of Purchase orders" should not have any line itme but it should get poplulated with the total number of Purchase order ducument number for a vendor.
here is the required ouput format
vendor number     Purchase order document number     Number of Purchase orders
  32915               1999009090     
               1999009091     
  SUM                                                            2
32916               1999009092     
SUM                                                             1
SUM total                                                             2
the value to be displayed has been calculated ina variable. the problem is how to display it.
please help.

Answer 1

Hi,
Try like this....
TYPE-POOLS slis.
TYPES : BEGIN OF ta ,
         d1(10) TYPE c,
         d2 TYPE i,
         d3 TYPE i,
         line_color(4),
         END OF ta .
DATA : it TYPE STANDARD TABLE OF ta,
       wa TYPE ta,
       it1 TYPE STANDARD TABLE OF ta,
       wa1 TYPE ta,
       n TYPE i,
       N1 TYPE I.
DATA : it_layout TYPE STANDARD TABLE OF slis_layout_alv WITH HEADER LINE,
       wa_fcat TYPE slis_fieldcat_alv,
       it_fcat TYPE slis_t_fieldcat_alv.
DATA : it_sort TYPE slis_t_sortinfo_alv WITH HEADER LINE,
count TYPE i.
wa-d1 = 1.
wa-d2 = 12.
APPEND wa TO it.
wa-d1 = 1.
wa-d2 = 13.
APPEND wa TO it.
wa-d1 = 1.
wa-d2 = 14.
APPEND wa TO it.
wa-d1 = 1.
wa-d2 = 15.
APPEND wa TO it.
wa-d1 = 2.
wa-d2 = 12.
APPEND wa TO it.
wa-d1 = 2.
wa-d2 = 12.
APPEND wa TO it.
wa-d1 = 2.
wa-d2 = 12.
APPEND wa TO it.
wa-d1 = 3.
wa-d2 = 12.
APPEND wa TO it.
wa-d1 = 3.
wa-d2 = 12.
APPEND wa TO it.
SORT it BY d1.
LOOP AT it  INTO wa .
  count = count + 1.
  n = n + 1.
  n1 = n1 + 1.
  IF count = 1.
    wa-d1 = wa-d1.
  ELSE.
    wa-d1 = ' '.
  ENDIF.
  wa1-d1    = wa-d1.
  wa1-d2 = wa-d2.
  APPEND wa1 TO it1.
  AT END OF d1.
    CLEAR count.
    wa1-d1 = 'SUM'.
    wa1-d2    = n.
*    wa1-d3 = n.
    wa1-line_color = 'C400' .                               "'C300'.
    APPEND wa1 TO it1.
    CLEAR : n  .
    CLEAR wa1-line_color.
  ENDAT.
ENDLOOP.
wa1-d1 = 'GRAND SUM'.
wa1-d2    = n1.
wa1-line_color = 'C511'.
APPEND wa1 TO it1.
it_layout-info_fieldname =      'LINE_COLOR'.
DEFINE macro4fcat.
  wa_fcat-col_pos = &1.
  wa_fcat-fieldname = &2.
  wa_fcat-tabname = &3.
  wa_fcat-seltext_l = &4.
  wa_fcat-do_sum = &5.
  append wa_fcat to it_fcat.
  clear wa_fcat.
END-OF-DEFINITION.
macro4fcat    '1'  'D1'          'IT1'  'First'    ' ' .
macro4fcat    '2'  'D2'             'IT1'  'Amount'    ' ' .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program                = sy-repid
  is_layout                         = it_layout
it_fieldcat                       = it_fcat
i_save                            = 'A'
TABLES
t_outtab                          = it1
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.
Regards
Debarshi