2007 Jun 22 11:00 AM
Hi everyone,
In my ALV report , when one selects the qty column & clicks on the "summation" icon, it thows a dump!!!
Plz check the below code.
REPORT ZPP341_VEHICLE_NUMBER_DETAILS .
----
Program : ZPP327_VARIATION_BT_SOP_PIR(main) *
Author : Sam Mathew (LTITL) *
Category : BDC *
Run Frequency : As and when required *
Description : Program(BDC) for RATE ROUTING upload *
Development Class: ZPP *
Company : TVS SUZUKI LIMITED *
Remarks : *
----
Change History *
-------------- *
Date Author Description Change Id *
----- -------- -------------- --------- *
*
----
************************************************************************
type-pools: slis.
data : gt_fieldcat type slis_t_fieldcat_alv.
data : it_slis_layout_alv type slis_layout_alv.
data : disvariant like disvariant.
data : x_save.
data : gt_repid type sy-repid.
data L_TABNAME TYPE SLIS_TABNAME.
************************************************************************
tables ZPP08VEHICLEPROD.
DATA: BEGIN OF IT_ZPP08VEHICLEPROD occurs 1,
MANDT TYPE ZPP08VEHICLEPROD-MANDT,
VEHNO TYPE ZPP08VEHICLEPROD-VEHNO,
MATNR TYPE ZPP08VEHICLEPROD-MATNR,
WERKS TYPE ZPP08VEHICLEPROD-WERKS,
ENGNO TYPE ZPP08VEHICLEPROD-ENGNO,
FRMNO TYPE ZPP08VEHICLEPROD-FRMNO,
ERFMG TYPE ZPP08VEHICLEPROD-ERFMG,
BUDAT TYPE ZPP08VEHICLEPROD-BUDAT,
CPUDT TYPE ZPP08VEHICLEPROD-CPUDT,
CPUTM TYPE ZPP08VEHICLEPROD-CPUTM,
SHIFT TYPE ZPP08VEHICLEPROD-SHIFT,
MDV01 TYPE ZPP08VEHICLEPROD-MDV01,
VSTAT TYPE ZPP08VEHICLEPROD-VSTAT,
UNAME TYPE ZPP08VEHICLEPROD-UNAME,
BDCNO TYPE ZPP08VEHICLEPROD-BDCNO,
CREATOR TYPE ZPP08VEHICLEPROD-CREATOR,
CREDATE TYPE ZPP08VEHICLEPROD-CREDATE,
REGNO TYPE ZPP08VEHICLEPROD-REGNO,
ZOLD_ENO Type ZPP08VEHICLEPROD-ZOLD_ENO,
ZOLD_BY Type ZPP08VEHICLEPROD-ZOLD_BY,
ZOLD_ON Type ZPP08VEHICLEPROD-ZOLD_ON,
ZNEW_BY Type ZPP08VEHICLEPROD-ZNEW_BY,
ZNEW_ON Type ZPP08VEHICLEPROD-ZNEW_ON,
END OF IT_ZPP08VEHICLEPROD.
SELECT-OPTIONS: so_VEHNO for ZPP08VEHICLEPROD-VEHNO,
so_MATNR for ZPP08VEHICLEPROD-MATNR,
so_WERKS for ZPP08VEHICLEPROD-WERKS,
so_ENGNO for ZPP08VEHICLEPROD-ENGNO,
so_FRMNO for ZPP08VEHICLEPROD-FRMNO,
so_ERFMG for ZPP08VEHICLEPROD-ERFMG,
so_BUDAT for ZPP08VEHICLEPROD-BUDAT,
so_CPUDT for ZPP08VEHICLEPROD-CPUDT,
so_CPUTM for ZPP08VEHICLEPROD-CPUTM,
so_SHIFT for ZPP08VEHICLEPROD-SHIFT,
so_MDV01 for ZPP08VEHICLEPROD-MDV01,
so_VSTAT for ZPP08VEHICLEPROD-VSTAT,
so_UNAME for ZPP08VEHICLEPROD-UNAME,
so_BDCNO for ZPP08VEHICLEPROD-BDCNO,
so_CREAT for ZPP08VEHICLEPROD-CREATOR,
so_CREDA for ZPP08VEHICLEPROD-CREDATE,
so_REGNO for ZPP08VEHICLEPROD-REGNO.
select * from ZPP08VEHICLEPROD into corresponding fields of
table it_ZPP08VEHICLEPROD
where VEHNO in so_VEHNO
and MATNR in so_MATNR
and WERKS in so_WERKS
and ENGNO in so_ENGNO
and FRMNO in so_FRMNO
and ERFMG in so_ERFMG
and BUDAT in so_BUDAT
and CPUDT in so_CPUDT
and CPUTM in so_CPUTM
and SHIFT in so_SHIFT
and MDV01 in so_MDV01
and VSTAT in so_VSTAT
and UNAME in so_UNAME
and BDCNO in so_BDCNO
and CREATOR in so_CREAT
and CREDATE in so_CREDA
and REGNO in so_REGNO.
----
----
l_tabname = 'IT_ZPP08VEHICLEPROD'.
perform fieldcat_init using gt_fieldcat[].
disvariant-report = SY-repid.
gt_repid = sy-repid.
x_save = 'A'.
it_slis_layout_alv-get_selinfos = 'X' .
it_slis_layout_alv-no_vline = '' .
it_slis_layout_alv-detail_popup = 'X' .
it_slis_layout_alv-header_text = 'SAM MATHEW' .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
I_CALLBACK_PROGRAM = ' '
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
I_STRUCTURE_NAME =
IS_LAYOUT = it_slis_layout_alv
it_fieldcat = gt_fieldcat[]
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT =
IT_FILTER =
IS_SEL_HIDE =
I_DEFAULT = 'X'
i_save = x_save
IS_VARIANT = disvariant
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_BYPASSING_BUFFER =
I_BUFFER_ACTIVE =
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
TABLES
t_outtab = IT_ZPP08VEHICLEPROD
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.
form fieldcat_init
using rt_fieldcat type slis_t_fieldcat_alv.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
EXPORTING
I_PROGRAM_NAME = gt_repid
I_INTERNAL_TABNAME = l_tabname
I_STRUCTURE_NAME = 'ZPP08VEHICLEPROD'
I_CLIENT_NEVER_DISPLAY = 'X'
I_INCLNAME =
I_BYPASSING_BUFFER =
I_BUFFER_ACTIVE =
CHANGING
CT_FIELDCAT = rt_fieldcat
EXCEPTIONS
INCONSISTENT_INTERFACE = 1
PROGRAM_ERROR = 2
OTHERS = 3
.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
append ls_fieldcat to rt_fieldcat.
ENDFORM.
2007 Jun 22 11:04 AM
Hi
In the field catalog
use
fieldcatalog-DO_SUM = 'X' for that Qty field for doing summation
check the dump analysis what it says?
Reward points for useful Answers
Regards
Anji
2007 Jun 22 11:08 AM
Hi Stanley
What is the dump error you got and what is the dump analysis it has given at the end .
Ok do one thing go for debugging and check where it was coming error
Reward all helpfull answers
Regards
Pavan
2007 Jun 22 11:19 AM
hi,
while working with QUALITY field, you must specifies the refarence field to the QUALITY field.
1) maintain refarence field to the quality field in internal table.
2) maintain refarence field name to the quality field in FIELD CATALOG.
fieldcatalog-qfieldname = ' ' "here specifies the refarence field name
3) you must maintain <b>fieldcatalog-DO_SUM = 'X'</b> field to perform totals to the specific fields.
regards,
Ashok Reddy