Converting Normal Report into ALV

[Former Member]

Hi,

When i convert normal report into ALV grid report, i get only the layout of the report. No data in rows and columns. I get only empty rows and columns. I didnt change anything in coding. Just i commented the write statements, which produce normal report and pass the internal table to the FM REUSE_ALV_GRID_DISPLAY. And i have also declared field catalog for that. Should i do any other changes in the report to get the Data in the report?

Ezhil.

[Former Member]

Hi,

When i convert normal report into ALV grid report, i get only the layout of the report. No data in rows and columns. I get only empty rows and columns. I didnt change anything in coding. Just i commented the write statements, which produce normal report and pass the internal table to the FM REUSE_ALV_GRID_DISPLAY. And i have also declared field catalog for that. Should i do any other changes in the report to get the Data in the report?

Ezhil.

[faisalatsap]

Hi, Ezhil

Please Check your Internal Table Just Before calling FM that it has all the Values or not in Debugger Mode?

Faisal

[Former Member]

put a break point on the line CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'.

and see the content on your internal table

[venkat_o]

Hi, <li>First execute the report and let us know what problem you face. <li>Put break point on REUSE_ALV_GRID_DISPLAY fm and check whether Fieldcatalog is populated with as many fields as internal table which is used to display data. Thanks Venkat.O

[Former Member]

You have to build the field catalogs using REUSE_ALV_FIELDCATALOG_MERGE by passing the internal table to this FM and then passing the fieldcatalog table to REUSE_ALV_GRID_DISPLAY. For examples search in SCN there are lots of examples

[Former Member]

Hello,

Check if you have filled the Table T_OUTTAB in the FM. While calling the FM the values should be present in the Table. May be you are using clear or Refresh somewhere. Also check the corresponding fields of the field catalog and the output table.

Thanks and Regards,

Rahul Sinha

[Former Member]

hi,

u msut provide the internal table name to display the contents in the FM in the REUSE_ALV_GRID_DISPLAY

TABLES

t_outtab = -

---

> here name of ur internal table

also check whether records are getting populated in ur internal table

rgds/

shivraj

Edited by: ShivrajSinha on Oct 5, 2009 10:24 AM

Edited by: ShivrajSinha on Oct 5, 2009 10:25 AM

[RaymondGiuseppi]

- Check if table is not empty at time of call

- Check field catalog, layout, etc using [the Consistency Check (link)|http://help.sap.com/saphelp_erp2004/helpdata/EN/d6/23253963143e6ae10000000a11402f/frameset.htm] - correct any error

The consistency check function allows you to access:
The field catalog
The layout structure
The sort table
The filter table
The structure for the layout (using the Variant pushbutton)
The field group table
After you have started the consistency check, the top screen area displays the results of the check in a tree control. In the bottom screen area, you can display the individual tables and structures.

Regards,

Raymond

[Former Member]

Hi ,

Also request to check whether you are passing all thenecessery data to the FM Reuse_alv_grid_display , like the field catelog and final internal table . And also before passing the data to the FM request to check whether the fields in both the internal tables are of the same order .

Regards,

Kavitha

[Former Member]

Hi,

When displaying data using ALV (Using any method)

you need to pass the internal table with all the fields require to be displayed on the screen.

So you have to impliment logic to append all the fields from different internal tables into single internal table.

Thanks,

Krishna

[Former Member]

Hi,

check this sample code.

DATA: FIELDCATALOG TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
      GD_TAB_GROUP TYPE SLIS_T_SP_GROUP_ALV,
      GD_LAYOUT    TYPE SLIS_LAYOUT_ALV,
      GD_REPID     LIKE SY-REPID.


************************************************************************

*SELECTION SCREEN WINDOW*
*-----------------------*

SELECTION-SCREEN  BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SKIP.
SELECT-OPTIONS : S_EBELN FOR EKKO-EBELN.
SELECT-OPTIONS : S_LIFNR FOR EKKO-LIFNR.
SELECTION-SCREEN END OF BLOCK B1.


*START OF SELECTION*
*------------------*

START-OF-SELECTION.

PERFORM DATA_RETRIVAL.
PERFORM BUILD_FIELDCATALOG.
PERFORM BUILD_LAYOUT.
PERFORM DISPLAY_ALV_REPORT.

*DESIGNE OF THE OUTPUT WINDOW
*----------------------------*

FORM BUILD_FIELDCATALOG.

  FIELDCATALOG-FIELDNAME   = 'EBELN'.
  FIELDCATALOG-SELTEXT_M   = 'ORDER NUMBER'.
  FIELDCATALOG-COL_POS     = 0.
  FIELDCATALOG-OUTPUTLEN   = 10.
  FIELDCATALOG-EMPHASIZE   = 'X'.
  FIELDCATALOG-KEY         = 'X'.
  APPEND FIELDCATALOG TO FIELDCATALOG.
  CLEAR  FIELDCATALOG.

  FIELDCATALOG-FIELDNAME   = 'LIFNR'.
  FIELDCATALOG-SELTEXT_M   = 'VENDOR CODE'.
  FIELDCATALOG-COL_POS     = 1.
  FIELDCATALOG-OUTPUTLEN   = 10.
  APPEND FIELDCATALOG TO FIELDCATALOG.
  CLEAR  FIELDCATALOG.

  FIELDCATALOG-FIELDNAME   = 'ADRNR'.
  FIELDCATALOG-SELTEXT_M   = 'ADDRESS NUMBER'.
  FIELDCATALOG-COL_POS     = 2.
  FIELDCATALOG-OUTPUTLEN   = 15.
  APPEND FIELDCATALOG TO FIELDCATALOG.
  CLEAR  FIELDCATALOG.

  FIELDCATALOG-FIELDNAME   = 'NAME'.
  FIELDCATALOG-SELTEXT_M   = 'VENDOR NAME '.
  FIELDCATALOG-COL_POS     = 3.
  FIELDCATALOG-OUTPUTLEN   = 20.
  APPEND FIELDCATALOG TO FIELDCATALOG.
  CLEAR  FIELDCATALOG.

  FIELDCATALOG-FIELDNAME   = 'ORT01'.
  FIELDCATALOG-SELTEXT_M   = 'CITY'.
  FIELDCATALOG-COL_POS     = 4.
  FIELDCATALOG-OUTPUTLEN   = 30.
  APPEND FIELDCATALOG TO FIELDCATALOG.
  CLEAR  FIELDCATALOG.

  FIELDCATALOG-FIELDNAME   = 'ORT02'.
  FIELDCATALOG-SELTEXT_M   = 'DISTRICT'.
  FIELDCATALOG-COL_POS     = 5.
  FIELDCATALOG-OUTPUTLEN   = 30 .
  APPEND FIELDCATALOG TO FIELDCATALOG.
  CLEAR  FIELDCATALOG.



ENDFORM.


*FORN LAYOUT DESIGNE*
*-------------------*

FORM BUILD_LAYOUT.
  GD_LAYOUT-NO_INPUT          = 'X'.
  GD_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.
  GD_LAYOUT-TOTALS_TEXT       = 'Totals'(201).
  GD_LAYOUT-ZEBRA = 'X'.
  GD_LAYOUT-KEY_HOTSPOT = ' '.
  GD_LAYOUT-F2CODE = '&ETA' .
  GD_LAYOUT-WINDOW_TITLEBAR = 'ALV WITH VENDOR DETAILS'.
ENDFORM.                    " BUILD_LAYOUT


*Display report using ALV grid*
*-----------------------------*

FORM DISPLAY_ALV_REPORT.
  GD_REPID = SY-REPID.
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
       EXPORTING
            I_CALLBACK_PROGRAM      = GD_REPID
            IS_LAYOUT               = GD_LAYOUT
            IT_FIELDCAT             = FIELDCATALOG[]
            I_SAVE                  = 'X'
       TABLES
            T_OUTTAB                = TCUST
       EXCEPTIONS
            PROGRAM_ERROR           = 1
            OTHERS                  = 2.
  IF SY-SUBRC <> 0.

  ENDIF.
ENDFORM.                    " DISPLAY_ALV_REPORT


******************************************************************************************************

FORM DATA_RETRIVAL.

IF ( S_LIFNR IS NOT INITIAL AND S_EBELN IS NOT INITIAL ).

  SELECT EBELN LIFNR INTO CORRESPONDING FIELDS OF TABLE TCUST FROM EKKO
           WHERE EBELN IN S_EBELN
            AND LIFNR IN S_LIFNR.

ELSEIF ( S_EBELN IS NOT INITIAL AND S_LIFNR IS INITIAL ) .

  SELECT EBELN LIFNR INTO CORRESPONDING FIELDS OF TABLE TCUST FROM EKKO
           WHERE EBELN IN S_EBELN.

ELSEIF ( S_EBELN IS INITIAL AND S_LIFNR IS NOT INITIAL ) .

  SELECT EBELN LIFNR INTO CORRESPONDING FIELDS OF TABLE TCUST FROM EKKO
           WHERE LIFNR IN S_LIFNR.

ELSEIF ( S_EBELN IS INITIAL AND S_LIFNR IS INITIAL ) .

  SELECT EBELN LIFNR INTO CORRESPONDING FIELDS OF TABLE TCUST FROM EKKO
           WHERE LIFNR IN S_LIFNR
           AND EBELN IN S_EBELN.


ENDIF.

[Former Member]

FORM BUILD_FIELDCATALOG .

wa_fieldcat-col_pos = 1.

wa_fieldcat-fieldname = 'werks1'.

wa_fieldcat-tabname = 'item_itab'.

wa_fieldcat-seltext_m = 'Plant'.

wa_fieldcat-outputlen = 4.

APPEND wa_fieldcat TO id_fieldcat.

CLEAR wa_fieldcat.

wa_fieldcat-col_pos = 2.

wa_fieldcat-fieldname = 'lgort1'.

wa_fieldcat-tabname = 'item_itab'.

wa_fieldcat-seltext_m = 'Storage Location'.

wa_fieldcat-outputlen = 5.

APPEND wa_fieldcat TO id_fieldcat.

CLEAR wa_fieldcat.

wa_fieldcat-col_pos = 3.

wa_fieldcat-fieldname = 'zypom'.

wa_fieldcat-tabname = 'item_itab'.

wa_fieldcat-seltext_m = 'CNTR'.

wa_fieldcat-outputlen = 4.

APPEND wa_fieldcat TO id_fieldcat.

CLEAR wa_fieldcat.

ENDFORM. " BUILD_FIELDCATALOG

&----

---

*& Form FIELDCATALOG

&----

---

• text

----

---

• --> p1 text

• <-- p2 text

----

---

FORM FIELDCATALOG .

id_layout-zebra = c_x.

ENDFORM. " FIELDCATALOG

&----

---

*& Form BUILD_LAYOUT

&----

---

• text

----

---

• --> p1 text

• <-- p2 text

----

---

FORM BUILD_LAYOUT .

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

• I_INTERFACE_CHECK = ' '

I_BYPASSING_BUFFER = 'X'

• I_BUFFER_ACTIVE = ' '

I_CALLBACK_PROGRAM = sy-repid

• I_CALLBACK_PF_STATUS_SET = ' '

• I_CALLBACK_USER_COMMAND = ' '

• I_STRUCTURE_NAME =

• IS_LAYOUT =

IT_FIELDCAT = id_fieldcat[]

• IT_EXCLUDING =

• IT_SPECIAL_GROUPS =

• IT_SORT =

• IT_FILTER =

• IS_SEL_HIDE =

• I_DEFAULT = 'X'

I_SAVE = 'X'

• 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

• IMPORTING

• E_EXIT_CAUSED_BY_CALLER =

• ES_EXIT_CAUSED_BY_USER =

TABLES

T_OUTTAB = item_itab

• 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.

This is my code.....

This internal table has values before passing it to the func module

Still i dont get the data in the report

[awin_prabhu]

Hi Ezhilhrh,

Problem is in form BUILD_FIELDCATALOG.

Use caps for fieldname and tabname.

Ex:

wa_fieldcat-fieldname = 'werks1'. -> wa_fieldcat-fieldname = 'WERKS1'.

wa_fieldcat-tabname = 'item_itab'. -> wa_fieldcat-tabname = 'ITEM_ITAB'.

Similarly change for all fields.

Thanks

[Former Member]

FORM BUILD_FIELDCATALOG .

wa_fieldcat-col_pos = 1.

wa_fieldcat-fieldname = 'werks1'.

wa_fieldcat-tabname = 'item_itab'.

wa_fieldcat-seltext_m = 'Plant'.

wa_fieldcat-outputlen = 4.

APPEND wa_fieldcat TO id_fieldcat.

CLEAR wa_fieldcat.

wa_fieldcat-col_pos = 2.

wa_fieldcat-fieldname = 'lgort1'.

wa_fieldcat-tabname = 'item_itab'.

wa_fieldcat-seltext_m = 'Storage Location'.

wa_fieldcat-outputlen = 5.

APPEND wa_fieldcat TO id_fieldcat.

CLEAR wa_fieldcat.

wa_fieldcat-col_pos = 3.

wa_fieldcat-fieldname = 'zypom'.

wa_fieldcat-tabname = 'item_itab'.

wa_fieldcat-seltext_m = 'CNTR'.

wa_fieldcat-outputlen = 4.

APPEND wa_fieldcat TO id_fieldcat.

CLEAR wa_fieldcat.

ENDFORM. " BUILD_FIELDCATALOG

&----

---

*& Form FIELDCATALOG

&----

---

• text

----

---

• --> p1 text

• <-- p2 text

----

---

FORM FIELDCATALOG .

id_layout-zebra = c_x.

ENDFORM. " FIELDCATALOG

&----

---

*& Form BUILD_LAYOUT

&----

---

• text

----

---

• --> p1 text

• <-- p2 text

----

---

FORM BUILD_LAYOUT .

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

• I_INTERFACE_CHECK = ' '

I_BYPASSING_BUFFER = 'X'

• I_BUFFER_ACTIVE = ' '

I_CALLBACK_PROGRAM = sy-repid

• I_CALLBACK_PF_STATUS_SET = ' '

• I_CALLBACK_USER_COMMAND = ' '

• I_STRUCTURE_NAME =

• IS_LAYOUT =

IT_FIELDCAT = id_fieldcat[]

• IT_EXCLUDING =

• IT_SPECIAL_GROUPS =

• IT_SORT =

• IT_FILTER =

• IS_SEL_HIDE =

• I_DEFAULT = 'X'

I_SAVE = 'X'

• 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

• IMPORTING

• E_EXIT_CAUSED_BY_CALLER =

• ES_EXIT_CAUSED_BY_USER =

TABLES

T_OUTTAB = item_itab

• 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.

This is my code.....

This internal table has values before passing it to the func module

Still i dont get the data in the report

[awin_prabhu]

Hi Ezhilhrh ,

See my above reply.

Use capital letters for values given in quotes for fieldname and tabname.

Just do follwoing changes in ur code.

wa_fieldcat-fieldname = 'werks1'. -> wa_fieldcat-fieldname = 'WERKS1'.

wa_fieldcat-tabname = 'item_itab'. -> wa_fieldcat-tabname = 'ITEM_ITAB'.

wa_fieldcat-fieldname = 'lgort1'. -> wa_fieldcat-fieldname = 'LGORT1'.

wa_fieldcat-tabname = 'item_itab'. -> wa_fieldcat-tabname = 'ITEM_ITAB'.

wa_fieldcat-fieldname = 'zypom'. -> wa_fieldcat-fieldname = 'ZYPOM'.

wa_fieldcat-tabname = 'item_itab'. -> wa_fieldcat-tabname = 'ITEM_ITAB'.

Thanks,

Edited by: Sap Fan on Oct 5, 2009 5:09 PM

[Former Member]

Hi,

 wa_fieldcat-col_pos = 1. wa_fieldcat-fieldname = 'werks1'. wa_fieldcat-tabname = 'item_itab'. wa_fieldcat-seltext_m = 'Plant'. wa_fieldcat-outputlen = 4. APPEND wa_fieldcat TO id_fieldcat. CLEAR wa_fieldcat. wa_fieldcat-col_pos = 2. wa_fieldcat-fieldname = 'lgort1'. wa_fieldcat-tabname = 'item_itab'. wa_fieldcat-seltext_m = 'Storage Location'. wa_fieldcat-outputlen = 5. APPEND wa_fieldcat TO id_fieldcat. CLEAR wa_fieldcat. wa_fieldcat-col_pos = 3. wa_fieldcat-fieldname = 'zypom'. wa_fieldcat-tabname = 'item_itab'. wa_fieldcat-seltext_m = 'CNTR'. wa_fieldcat-outputlen = 4. APPEND wa_fieldcat TO id_fieldcat. CLEAR wa_fieldcat.

change it to:

 wa_fieldcat-col_pos = 1. 
wa_fieldcat-fieldname = 'WERKS1'. 
wa_fieldcat-tabname = 'item_itab'. 
wa_fieldcat-seltext_m = 'Plant'. 
wa_fieldcat-outputlen = 4. 
APPEND wa_fieldcat TO id_fieldcat. 
CLEAR wa_fieldcat. 
wa_fieldcat-col_pos = 2. 
wa_fieldcat-fieldname = 'LGORT1'. 
wa_fieldcat-tabname = 'item_itab'.
 wa_fieldcat-seltext_m = 'Storage Location'. 
wa_fieldcat-outputlen = 5. 
APPEND wa_fieldcat TO id_fieldcat.
 CLEAR wa_fieldcat. 
wa_fieldcat-col_pos = 3.
 wa_fieldcat-fieldname = 'ZYPOM'. 
wa_fieldcat-tabname = 'item_itab'.
 wa_fieldcat-seltext_m = 'CNTR'.
 wa_fieldcat-outputlen = 4. 
APPEND wa_fieldcat TO id_fieldcat. 
CLEAR wa_fieldcat.

Regards

Usha.

[Former Member]

Thanks a lot...It solved the problem

Ezhil.

[Former Member]

Thanks a lot SAP FAN.....it solved the problem

Ezhil

[awin_prabhu]

Hi Ezhilhrh,

I solved ur problem. But u have given points wrongly to another person. Why?

Thanks,