How to display selected table fields in ALV report.

Question

Hi,
I am displaying data from table EKPO using ALV through this query.
select * from ekpo into table itab_ekpo up to 25 rows.
bt if i need to display selected fields like
select ebeln matnr netpr from ekpo into table itab_ekpo up to 25 rows.
IT gives  error GETWA_NOT_ASSIGNED.
FIELD SYMBOL HAS NOT YET BEEN ASSIGNED
CAN ANYONE PLZ HELP ME.

Answer 1

Hi ,
      I am pasting the code in which i am getting the error.Plz help.
REPORT  ZHALV.
tables:ekpo.
data itab_ekpo type ekpo occurs 100 with header line.
types: begin of itab_new,
       f_ebeln type ekpo-ebeln,
       f_matnr type ekpo-matnr,
       f_netpr type ekpo-netpr,
       end of itab_new.
data itab1 TYPE STANDARD TABLE OF itab_new initial size 0.
type-pools: slis.
DATA: lt_fieldcat TYPE slis_t_fieldcat_alv,
      lf_fieldcat TYPE slis_fieldcat_alv.
DATA:    ws_repid TYPE sy-repid VALUE 'ZHALV'.
DATA:  l_layout   TYPE slis_layout_alv.
selection-screen Begin of block block1 with frame title text-111.
select-options : S_EBELN for EKPO-EBELN.
selection-screen end of block block1.
INITIALIZATION.
start-of-selection.
  select ebeln matnr netpr from ekpo into table itab1 up to 10 rows WHERE EBELN IN S_EBELN.
*select * from ekpo into table itab_ekpo up to 25 rows.
  PERFORM build_fieldcatalog.
  PERFORM build_layout.
  PERFORM GET_DETAILS.
end-of-selection.
*&      Form  build_fieldcatalog
      text
FORM build_fieldcatalog .
PURCHASING DOCUMENT NUMBER
  CLEAR lf_fieldcat.
  lf_fieldcat-fieldname = 'EBELN'.
  lf_fieldcat-ref_tabname = 'EKKO'.
  lf_fieldcat-ref_fieldname = 'EBELN'.
MATERIAL NUMBER
  CLEAR lf_fieldcat.
  lf_fieldcat-fieldname = 'MATNR'.
  lf_fieldcat-ref_tabname = 'EKPO'.
  lf_fieldcat-ref_fieldname = 'MATNR'.
  APPEND lf_fieldcat TO lt_fieldcat.
NET PRICE IN PURCHASING DOCUMENT
  CLEAR lf_fieldcat.
  lf_fieldcat-fieldname = 'NETPR'.
  lf_fieldcat-ref_tabname = 'EKPO'.
  lf_fieldcat-ref_fieldname = 'NETPR'.
  lf_fieldcat-cfieldname = 'WAERS'.
  lf_fieldcat-do_sum = 'X'.
  APPEND lf_fieldcat TO lt_fieldcat.
ENDFORM.                    " build_fieldcatalog
*&      Form  GET_DETAILS
      text
FORM GET_DETAILS.
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
                             I_INTERFACE_CHECK                 = ' '
                             I_BYPASSING_BUFFER                = ' '
                             I_BUFFER_ACTIVE                   = ' '
     I_CALLBACK_PROGRAM                = ws_repid
                             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                  = 'EKPO'
                             I_BACKGROUND_ID                   = ' '
                             I_GRID_TITLE                      =
                             I_GRID_SETTINGS                   =
                             IS_LAYOUT                         =
                              IT_FIELDCAT                       = lt_fieldcat
                             IT_EXCLUDING                      =
                             IT_SPECIAL_GROUPS                 =
                             IT_SORT                           =
                             IT_FILTER                         =
                             IS_SEL_HIDE                       =
    I_DEFAULT                         = 'X'
    I_SAVE                            = 'A'
                             IS_VARIANT                        =
                             IT_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                          = itab1
      EXCEPTIONS
                             PROGRAM_ERROR                     = 1
                            OTHERS                            = 2.
  IF SY-SUBRC <> 0.
    WRITE: 'SY-SUBRC: ', SY-SUBRC .
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
*append itab_ekpo to i_tab.
ENDFORM.                    "GET_DETAILS