PROBLEM IN REPORT(not displaying the data)

[Former Member]

hi experts,

problem is that the data is not coming into the display screen,it is simply show the description the field.please help solving this problem.

&----

---

*& Report Z_GRAND_TOTAL *

*& *

&----

---

*& *

*& *

&----

---

REPORT Z_GRAND_TOTAL .

tables:iseg.

type-pools:slis.

types:begin of ty_iseg,

werks like iseg-werks,

lgort like iseg-lgort,

matnr like iseg-matnr,

• maktx like makt-maktx,

buchm like iseg-buchm,

erfmg like iseg-erfmg,

wrtbm like iseg-wrtbm,

wrtzl like iseg-wrtzl,

diwzl like iseg-diwzl,

end of ty_iseg.

data:it_iseg type standard table of ty_iseg with header line.

data: it_fieldcat type SLIS_T_FIELDCAT_ALV,

wa_fieldcat type slis_fieldcat_alv,

it_layout type slis_layout_alv,

WA_events TYPE slis_alv_event,

it_events TYPE slis_t_event.

select-options:s_werks for iseg-werks.

start-of-selection.

perform getD_data.

perform disp_alv.

*&----

---

*& Form getD_data

*&----

---

• text

*----

---

• --> p1 text

• <-- p2 text

*----

---

form getD_data .

select

werks

lgort

matnr

buchm

erfmg

wrtbm

wrtzl

diwzl

from iseg

into table it_iseg

where werks in s_werks.

sort it_iseg by werks matnr descending.

endform. " getD_data

*&----

---

*& Form disp_alv

*&----

---

• text

*----

---

• --> p1 text

• <-- p2 text

*----

---

form disp_alv .

wa_fieldcat-fieldname = 'werks'.

wa_FIELDCAT-REPTEXT_DDIC = 'plants'.

*wa_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'lgort'.

wa_FIELDCAT-REPTEXT_DDIC = 'storage location'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'matnr'.

wa_FIELDCAT-REPTEXT_DDIC = 'material no'.

*wa_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'buchm'.

wa_FIELDCAT-REPTEXT_DDIC = 'onhand stock'.

*wa_FIELDCAT-no_subtotals = 'X'.

wa_fieldcat-do_sum = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'wrtbm'.

wa_FIELDCAT-REPTEXT_DDIC = 'value(on hand)'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'erfmg'.

wa_FIELDCAT-REPTEXT_DDIC = 'physical quantity'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'wrtlz'.

wa_FIELDCAT-REPTEXT_DDIC = 'physical stock'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'diwzl'.

wa_FIELDCAT-REPTEXT_DDIC = 'inventory difference'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

DATA: sort TYPE slis_sortinfo_alv,

it_sort TYPE slis_t_sortinfo_alv.

sort-fieldname = 'werks'.

sort-subtot = 'X'.

SORT-UP = 'X'.

APPEND sort TO it_sort.

*sort-fieldname = 'BEGDA'.

*SORT-NO_SUBTOTS = 'X'.

*APPEND sort TO it_sort.

IT_layout-totals_text = 'total text'.

IT_layout-subtotals_text = 'Subtotal text'.

*WA_EVENTS-NAME = 'SUBTOTAL TEXT'.

*WA_EVENTS-FORM = 'SUBTOTAL TEXT'.

*APPEND WA_EVENTS TO IT_EVENTS.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = sy-repid

IS_LAYOUT = it_LAYOUT

IT_FIELDCAT = IT_FIELDCAT

it_sort = it_sort

it_events = it_events

TABLES

t_outtab = it_iseg .

endform. " disp_alv

[Former Member]

hi experts,

problem is that the data is not coming into the display screen,it is simply show the description the field.please help solving this problem.

&----

---

*& Report Z_GRAND_TOTAL *

*& *

&----

---

*& *

*& *

&----

---

REPORT Z_GRAND_TOTAL .

tables:iseg.

type-pools:slis.

types:begin of ty_iseg,

werks like iseg-werks,

lgort like iseg-lgort,

matnr like iseg-matnr,

• maktx like makt-maktx,

buchm like iseg-buchm,

erfmg like iseg-erfmg,

wrtbm like iseg-wrtbm,

wrtzl like iseg-wrtzl,

diwzl like iseg-diwzl,

end of ty_iseg.

data:it_iseg type standard table of ty_iseg with header line.

data: it_fieldcat type SLIS_T_FIELDCAT_ALV,

wa_fieldcat type slis_fieldcat_alv,

it_layout type slis_layout_alv,

WA_events TYPE slis_alv_event,

it_events TYPE slis_t_event.

select-options:s_werks for iseg-werks.

start-of-selection.

perform getD_data.

perform disp_alv.

*&----

---

*& Form getD_data

*&----

---

• text

*----

---

• --> p1 text

• <-- p2 text

*----

---

form getD_data .

select

werks

lgort

matnr

buchm

erfmg

wrtbm

wrtzl

diwzl

from iseg

into table it_iseg

where werks in s_werks.

sort it_iseg by werks matnr descending.

endform. " getD_data

*&----

---

*& Form disp_alv

*&----

---

• text

*----

---

• --> p1 text

• <-- p2 text

*----

---

form disp_alv .

wa_fieldcat-fieldname = 'werks'.

wa_FIELDCAT-REPTEXT_DDIC = 'plants'.

*wa_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'lgort'.

wa_FIELDCAT-REPTEXT_DDIC = 'storage location'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'matnr'.

wa_FIELDCAT-REPTEXT_DDIC = 'material no'.

*wa_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'buchm'.

wa_FIELDCAT-REPTEXT_DDIC = 'onhand stock'.

*wa_FIELDCAT-no_subtotals = 'X'.

wa_fieldcat-do_sum = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'wrtbm'.

wa_FIELDCAT-REPTEXT_DDIC = 'value(on hand)'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'erfmg'.

wa_FIELDCAT-REPTEXT_DDIC = 'physical quantity'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'wrtlz'.

wa_FIELDCAT-REPTEXT_DDIC = 'physical stock'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'diwzl'.

wa_FIELDCAT-REPTEXT_DDIC = 'inventory difference'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

DATA: sort TYPE slis_sortinfo_alv,

it_sort TYPE slis_t_sortinfo_alv.

sort-fieldname = 'werks'.

sort-subtot = 'X'.

SORT-UP = 'X'.

APPEND sort TO it_sort.

*sort-fieldname = 'BEGDA'.

*SORT-NO_SUBTOTS = 'X'.

*APPEND sort TO it_sort.

IT_layout-totals_text = 'total text'.

IT_layout-subtotals_text = 'Subtotal text'.

*WA_EVENTS-NAME = 'SUBTOTAL TEXT'.

*WA_EVENTS-FORM = 'SUBTOTAL TEXT'.

*APPEND WA_EVENTS TO IT_EVENTS.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = sy-repid

IS_LAYOUT = it_LAYOUT

IT_FIELDCAT = IT_FIELDCAT

it_sort = it_sort

it_events = it_events

TABLES

t_outtab = it_iseg .

endform. " disp_alv

[Former Member]

Hi Rohit,

First check d internal table in debugging mode if ur getting d data or not...

The filed names should be in capitals

ex: wa_fieldcat-fieldname = 'lgort'.

should be

wa_fieldcat-fieldname = 'LGORT'.

try this it should work...

regard's

Shashi.

[Former Member]

hi.

do the changes which i have done in ur prog and see.

REPORT Z_GRAND_TOTAL .

tables:iseg.

type-pools:slis.

types:begin of ty_iseg,

werks like iseg-werks,

lgort like iseg-lgort,

matnr like iseg-matnr,

maktx like makt-maktx,

buchm like iseg-buchm,

erfmg like iseg-erfmg,

wrtbm like iseg-wrtbm,

wrtzl like iseg-wrtzl,

diwzl like iseg-diwzl,

end of ty_iseg.

data:it_iseg type standard table of ty_iseg with header line.

data: it_fieldcat type SLIS_T_FIELDCAT_ALV,

wa_fieldcat type slis_fieldcat_alv,

it_layout type slis_layout_alv,

WA_events TYPE slis_alv_event,

it_events TYPE slis_t_event.

select-options:s_werks for iseg-werks.

start-of-selection.

perform getD_data.

perform disp_alv.

*&----

---

*& Form getD_data

*&----

---

text

*----

---

--> p1 text

<-- p2 text

*----

---

form getD_data .

select

werks

lgort

matnr

buchm

erfmg

wrtbm

wrtzl

diwzl

from iseg

into table it_iseg

where werks in s_werks.

IF SY-SUBRC = 0. // PUT A BREAKPOINT AND SEE WHETHER THE SELECT STMT IS RETRIEVING DATA INTO INTERNAL TABLE

sort it_iseg by werks matnr descending.

ENDIF.

endform. " getD_data

*&----

---

*& Form disp_alv

*&----

---

text

*----

---

--> p1 text

<-- p2 text

*----

---

form disp_alv .

wa_fieldcat-fieldname = 'werks'. // FIELD NAMES CAPITALS

wa_FIELDCAT-REPTEXT_DDIC = 'plants'.

*wa_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'lgort'.

wa_FIELDCAT-REPTEXT_DDIC = 'storage location'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'matnr'.

wa_FIELDCAT-REPTEXT_DDIC = 'material no'.

*wa_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'buchm'.

wa_FIELDCAT-REPTEXT_DDIC = 'onhand stock'.

*wa_FIELDCAT-no_subtotals = 'X'.

wa_fieldcat-do_sum = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'wrtbm'.

wa_FIELDCAT-REPTEXT_DDIC = 'value(on hand)'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'erfmg'.

wa_FIELDCAT-REPTEXT_DDIC = 'physical quantity'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'wrtlz'.

wa_FIELDCAT-REPTEXT_DDIC = 'physical stock'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

wa_fieldcat-fieldname = 'diwzl'.

wa_FIELDCAT-REPTEXT_DDIC = 'inventory difference'.

*WA_FIELDCAT-no_subtotals = 'X'.

append wa_fieldcat to it_fieldcat.

clear wa_fieldcat.

DATA: sort TYPE slis_sortinfo_alv,

it_sort TYPE slis_t_sortinfo_alv.

sort-fieldname = 'werks'.

sort-subtot = 'X'.

SORT-UP = 'X'.

APPEND sort TO it_sort.

*sort-fieldname = 'BEGDA'.

*SORT-NO_SUBTOTS = 'X'.

*APPEND sort TO it_sort.

IT_layout-totals_text = 'total text'.

IT_layout-subtotals_text = 'Subtotal text'.

*WA_EVENTS-NAME = 'SUBTOTAL TEXT'.

*WA_EVENTS-FORM = 'SUBTOTAL TEXT'.

*APPEND WA_EVENTS TO IT_EVENTS.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = sy-repid

IS_LAYOUT = it_LAYOUT

IT_FIELDCAT = IT_FIELDCAT[]

it_sort = it_sort[]

it_events = it_events

TABLES

t_outtab = it_iseg .

endform. " disp_alv

[Former Member]

Hi,

Please chnage as below :

data : gv_repid like sy-repid.

"initialize gv_repid at initialization event.

INITIALIZATION.
gv_repid = sy-repid.

and pass gv_repid to ALV FM.

I_CALLBACK_PROGRAM = gv_repid.

Thanks,

Sriram Ponna.

[Former Member]

hi,

check with this code the output is coming.

tables:iseg.

type-pools:slis.

types:begin of ty_iseg,

werks like iseg-werks,

lgort like iseg-lgort,

matnr like iseg-matnr,

buchm like iseg-buchm,

erfmg like iseg-erfmg,

wrtbm like iseg-wrtbm,

wrtzl like iseg-wrtzl,

diwzl like iseg-diwzl,

end of ty_iseg.

data:it_iseg type standard table of ty_iseg with header line.

data: it_fieldcat type SLIS_T_FIELDCAT_ALV,

wa_fieldcat type slis_fieldcat_alv.

select-options:s_werks for iseg-werks.

start-of-selection.

perform getD_data.

perform disp_alv.

*&----

---

*& Form getD_data

*&----

---

form getD_data .

select

werks

lgort

matnr

buchm

erfmg

wrtbm

wrtzl

diwzl

from iseg

into table it_iseg

where werks in s_werks.

sort it_iseg by werks matnr descending.

endform. " getD_data

*&----

---

*& Form disp_alv

*&----

---

form disp_alv .

Wa_FIELDCAT-COL_POS = 1.

Wa_FIELDCAT-FIELDNAME = 'WERKS'.

Wa_FIELDCAT-TABNAME = 'IT_ISEG'.

Wa_FIELDCAT-KEY = 'X'.

Wa_FIELDCAT-SELTEXT_M = 'PLANT'.

Wa_FIELDCAT-OUTPUTLEN = 20.

APPEND Wa_FIELDCAT TO iT_FIELDCAT.

CLEAR Wa_FIELDCAT.

Wa_FIELDCAT-COL_POS = 2.

Wa_FIELDCAT-FIELDNAME = 'LGORT'.

Wa_FIELDCAT-TABNAME = 'IT_ISEG'.

Wa_FIELDCAT-SELTEXT_M = 'STORAGE LOCATION'.

Wa_FIELDCAT-OUTPUTLEN = 20.

APPEND Wa_FIELDCAT TO iT_FIELDCAT.

CLEAR Wa_FIELDCAT.

Wa_FIELDCAT-COL_POS = 3.

Wa_FIELDCAT-FIELDNAME = 'MATNR'.

Wa_FIELDCAT-TABNAME = 'IT_ISEG'.

Wa_FIELDCAT-SELTEXT_M = 'MATERIAL NO'.

Wa_FIELDCAT-OUTPUTLEN = 20.

APPEND Wa_FIELDCAT TO iT_FIELDCAT.

CLEAR Wa_FIELDCAT.

Wa_FIELDCAT-COL_POS = 4.

Wa_FIELDCAT-FIELDNAME = 'BUCHM'.

Wa_FIELDCAT-TABNAME = 'IT_ISEG'.

Wa_FIELDCAT-SELTEXT_M = 'ONHAND STOCk'.

Wa_FIELDCAT-OUTPUTLEN = 20.

APPEND Wa_FIELDCAT TO iT_FIELDCAT.

CLEAR Wa_FIELDCAT.

Wa_FIELDCAT-COL_POS = 5.

Wa_FIELDCAT-FIELDNAME = 'ERFMG'.

Wa_FIELDCAT-TABNAME = 'IT_ISEG'.

Wa_FIELDCAT-SELTEXT_M = 'physical quantity'.

Wa_FIELDCAT-OUTPUTLEN = 20.

APPEND Wa_FIELDCAT TO iT_FIELDCAT.

CLEAR Wa_FIELDCAT.

Wa_FIELDCAT-COL_POS = 6.

Wa_FIELDCAT-FIELDNAME = 'WRTBM'.

Wa_FIELDCAT-TABNAME = 'IT_ISEG'.

Wa_FIELDCAT-SELTEXT_M = 'value(on hand)'.

Wa_FIELDCAT-OUTPUTLEN = 20.

APPEND Wa_FIELDCAT TO iT_FIELDCAT.

CLEAR Wa_FIELDCAT.

Wa_FIELDCAT-COL_POS = 7.

Wa_FIELDCAT-FIELDNAME = 'WRTZL'.

Wa_FIELDCAT-TABNAME = 'IT_ISEG'.

Wa_FIELDCAT-SELTEXT_M = 'physical stock'.

Wa_FIELDCAT-OUTPUTLEN = 20.

APPEND Wa_FIELDCAT TO iT_FIELDCAT.

CLEAR Wa_FIELDCAT.

Wa_FIELDCAT-COL_POS = 8.

Wa_FIELDCAT-FIELDNAME = 'DIWZL'.

Wa_FIELDCAT-TABNAME = 'IT_ISEG'.

Wa_FIELDCAT-SELTEXT_M = 'inventory difference'.

Wa_FIELDCAT-OUTPUTLEN = 20.

APPEND Wa_FIELDCAT TO iT_FIELDCAT.

CLEAR Wa_FIELDCAT.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = sy-repid

*IS_LAYOUT = it_LAYOUT

IT_FIELDCAT = IT_FIELDCAT

*it_sort = it_sort

*it_events = it_events

TABLES

t_outtab = it_iseg .

endform.

select the plant which is having the data. and try this.

reward if useful,

thanks and regards

[Former Member]

Hi Rohit,

In your function module "REUSE_ALV_LIST_DISPLAY" there is a import parameter "I_STRUCTURE_NAME". Just provide the name of your internal table i.e. it_iseg where you have collected the data. This should solve your problem.

[Former Member]

hi use the fields in the capital letters...like .

it_fieldcat-fieldname = 'MATNR'.

it_fieldcat-reptext_ddic = 'field descritpion'.