Abap basic list .

Question

My requirement is as below .
For every new sales org /Distribution Channel /Division  Combination of these three . I have to display the basic list .Can some one guide me on this .
Required output
Sales Area: <KONA-VKORG>/ <KONA-VTWEG>/ <KONA-SPART>
Document no   date              Validity date
Thanks in advance
-padma

Answer 1

go through this report
                 TABLES DECLARATION
type-pools: slis.
data: it_fieldcat type slis_t_fieldcat_alv,
       wa_fieldcat like line of it_fieldcat.
tables:vbak,        "Sales Document Header Details
        vbap,        "Sales Document Item Details
        kna1.        "Customer Master Details
                    INTERNAL TABLES DECLARATION
data:begin of it_vbak occurs 0,
     vbeln like vbak-vbeln,     "Sales Document
     erdat like vbak-erdat,     "Date on which the record was created
     erzet like vbak-erzet,     "Entry time
     ernam like vbak-ernam,     "Name of Person who Created the Object
     auart like vbak-auart,    "Sales Document Type
     end of it_vbak.
data: begin of it_vbap occurs 0,
       vbeln like vbap-vbeln,
       posnr like vbap-posnr,
       matnr like vbap-matnr,
       matwa like vbap-matwa,
       matkl like vbap-matkl,
       arktx like vbap-arktx,
       end of it_vbap.
data:begin of it_finaltable occurs 0,
      vbeln like vbak-vbeln,     "Sales Document
      erdat like vbak-erdat,     "Date on which the record was created
      erzet like vbak-erzet,     "Entry time
      ernam like vbak-ernam,     "Name of Person who Created the Object
      auart like vbak-auart,
      posnr like vbap-posnr,
      matnr like vbap-matnr,
      matwa like vbap-matwa,
      matkl like vbap-matkl,
      arktx like vbap-arktx,
      end of it_finaltable.
                          SELECTION-SCREEN
selection-screen begin of block b1.
select-options:s_vbeln for vbak-vbeln.
selection-screen end of block b1.
selection-screen begin of block b2.
select-options:s_erdat for vbak-erdat.
selection-screen end of block b2.
selection-screen begin of block b3.
select-options:s_erzet for vbak-erzet,
               s_ernam for vbak-ernam,
               s_auart for vbak-auart.
selection-screen end of block b3.
             START-OF-SELECTION
start-of-selection.
perform get_vbak.
perform alv_datas.
perform alv_displays.
             END-OF-SELECTION
end-of-selection.
form alv_datas .
wa_fieldcat-fieldname = 'VBELN'.
wa_fieldcat-seltext_l = 'SALES DOCUMENT NUMBER'.
append wa_fieldcat to it_fieldcat.
wa_fieldcat-fieldname = 'ERDAT'.
wa_fieldcat-seltext_l = 'DATE ENTERED'.
append wa_fieldcat to it_fieldcat.
wa_fieldcat-fieldname = 'ERZET'.
wa_fieldcat-seltext_l = 'TIME CREATED'.
append wa_fieldcat to it_fieldcat.
wa_fieldcat-fieldname = 'ERNAM'.
wa_fieldcat-seltext_l = 'Person Created'.
append wa_fieldcat to it_fieldcat.
wa_fieldcat-fieldname = 'AUART'.
wa_fieldcat-seltext_l = '----
append wa_fieldcat to it_fieldcat.
wa_fieldcat-fieldname = 'POSNR'.
wa_fieldcat-seltext_l = 'Item Number'.
append wa_fieldcat to it_fieldcat.
wa_fieldcat-fieldname = 'MATNR'.
wa_fieldcat-seltext_l = 'Material Number'.
append wa_fieldcat to it_fieldcat.
wa_fieldcat-fieldname = 'MATKL'.
wa_fieldcat-seltext_l = 'Order Qty'.
append wa_fieldcat to it_fieldcat.
wa_fieldcat-fieldname = 'ARKTX'.
wa_fieldcat-seltext_l = 'Order Unit'.
append wa_fieldcat to it_fieldcat.
wa_fieldcat-fieldname = 'POSAR'.
wa_fieldcat-seltext_l = 'Net Qty'.
append wa_fieldcat to it_fieldcat.
endform.                    " ALV_DATAS
*&      Form  GET_VBAK
      text
-->  p1        text
<--  p2        text
form get_vbak .
if not it_vbak is initial.
select vbeln
       erdat
       erzet
       ernam
       auart from vbak
       into table it_vbak
       for all entries in it_vbap
       where vbeln = it_vbap-vbeln.
endif.
endform.
       " GET_VBAK
*&      Form  ALV_DISPALYS
      text
-->  p1        text
<--  p2        text
form alv_displays .
call function 'REUSE_ALV_GRID_DISPLAY'
exporting
  I_INTERFACE_CHECK                 = ' '
  I_BYPASSING_BUFFER                = ' '
  I_BUFFER_ACTIVE                   = ' '
  I_CALLBACK_PROGRAM                = ' '
  I_CALLBACK_PF_STATUS_SET          = ' '
  I_CALLBACK_USER_COMMAND           = ' '
  I_CALLBACK_TOP_OF_PAGE            = ' '
  I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
  I_CALLBACK_HTML_END_OF_LIST       = ' '
  I_STRUCTURE_NAME                  = I_STRUCTURE_NAME
  I_BACKGROUND_ID                   = ' '
  I_GRID_TITLE                      = I_GRID_TITLE
  I_GRID_SETTINGS                   = I_GRID_SETTINGS
  IS_LAYOUT                         = IS_LAYOUT
   it_fieldcat                       = it_fieldcat
  IT_EXCLUDING                      = IT_EXCLUDING
  IT_SPECIAL_GROUPS                 = IT_SPECIAL_GROUPS
  IT_SORT                           = IT_SORT
  IT_FILTER                         = IT_FILTER
  IS_SEL_HIDE                       = IS_SEL_HIDE
  I_DEFAULT                         = 'X'
  I_SAVE                            = ' '
  IS_VARIANT                        = IS_VARIANT
  IT_EVENTS                         = IT_EVENTS
  IT_EVENT_EXIT                     = IT_EVENT_EXIT
  IS_PRINT                          = IS_PRINT
  IS_REPREP_ID                      = 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_ALV_GRAPHICS
  IT_HYPERLINK                      = IT_HYPERLINK
  IT_ADD_FIELDCAT                   = IT_ADD_FIELDCAT
  IT_EXCEPT_QINFO                   = IT_EXCEPT_QINFO
  IR_SALV_FULLSCREEN_ADAPTER        = IR_SALV_FULLSCREEN_ADAPTER
IMPORTING
  E_EXIT_CAUSED_BY_CALLER           = E_EXIT_CAUSED_BY_CALLER
  ES_EXIT_CAUSED_BY_USER            = ES_EXIT_CAUSED_BY_USER
  tables
    t_outtab                          = it_finaltable
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.                    " ALV_DISPLAYS
reward points if helpful.....