error in report

[Former Member]

Hi Frds

While running this program im getting DUMP ERROR .Pls anyone analysis this program and resolve the problem.In our development system we got 1+ Lakhs of records.

REPORT Z_R_CONSUMABLE_ROL LINE-COUNT 40(2) LINE-SIZE 240.

DATA : MAT_NO LIKE EKPO-MATNR, "MATERIAL NUMBER

PLANT1 LIKE EKPO-WERKS, "PLANT

COM_CO LIKE EKPO-BUKRS, "COMPANY CODE

STORE LIKE MSEG-LGORT, "STORAGE

LVENDOR LIKE EKKO-LIFNR, "Vendor

LPO LIKE EKKO-EBELN. "PO

DATA: LT_EKPO LIKE EKPO OCCURS 0 WITH HEADER LINE.

DATA : BEGIN OF ITAB1 ,

MATNR LIKE MAKT-MATNR,

MAKTX LIKE MAKT-MAKTX,

MINBE LIKE MARC-MINBE,

• END OF ITAB1.

*

*data : begin of itab2,

banfn like eban-banfn,

menge like eban-menge,

end of itab1.

SELECTION-SCREEN: BEGIN OF BLOCK 01.

SELECTION-SCREEN: BEGIN OF BLOCK 02 WITH FRAME TITLE TEXT-001.

SELECT-OPTIONS MATERIAL FOR MAT_NO.

SELECT-OPTIONS PLANT FOR PLANT1.

SELECT-OPTIONS COMPANY FOR COM_CO.

SELECT-OPTIONS STROAGE FOR STORE.

*SELECT-OPTIONS VENDOR FOR LVENDOR.

*SELECT-OPTIONS PONUM FOR LPO.

SELECTION-SCREEN: END OF BLOCK 02.

SELECTION-SCREEN: END OF BLOCK 01.

DATA: BEGIN OF LT_MSEG OCCURS 0,

MBLNR LIKE MSEG-MBLNR,

MENGE LIKE MSEG-MENGE,

MEINS LIKE MSEG-MEINS,

EBELN LIKE MSEG-EBELN,

EBELP LIKE MSEG-EBELP,

LGNUM LIKE MSEG-LGNUM,

BWART LIKE MSEG-BWART,

END OF LT_MSEG.

SELECT * INTO CORRESPONDING FIELDS OF TABLE LT_EKPO

FROM EKKO AS K INNER JOIN EKPO AS P

ON P_{EBELN = K}EBELN

WHERE

• K~LIFNR IN VENDOR and

K~BUKRS IN COMPANY

AND P~MATNR IN MATERIAL

AND P~WERKS IN PLANT

AND P~LOEKZ EQ SPACE.

• AND K~EBELN IN PONUM.

SORT LT_EKPO BY EBELN EBELP.

TYPES: BEGIN OF LT_SEL,

KYFLD(15),

EBELN LIKE EKPO-EBELN,

EBELP LIKE EKPO-EBELP,

POQTY LIKE EKPO-MENGE,

MATNR LIKE MARA-MATNR,

MAKTX LIKE MAKT-MAKTX, "MATERIAL DESC

POUNT LIKE EKPO-MEINS, "PO UNIT UOM

MINBE LIKE MARC-MINBE,

MBLNR LIKE MSEG-MBLNR, "REORDER LEVEL

LGNUM LIKE MSEG-LGNUM, "WHSE CODE

GRQTY LIKE MSEG-MENGE,

GRUNT LIKE MSEG-MEINS,

BWART LIKE MSEG-BWART,

BANFN LIKE EBAN-BANFN, "PR Number

PRQTY LIKE EBAN-MENGE, "PR Quantity

END OF LT_SEL.

DATA LI_SEL TYPE SORTED TABLE OF LT_SEL WITH NON-UNIQUE KEY EBELN EBELP

MBLNR

WITH HEADER LINE.

DATA: WA_LI_SEL TYPE LT_SEL,

WA_LI_SEL1 TYPE LT_SEL.

REFRESH LI_SEL.

DATA: LPOQTY TYPE EKPO-MENGE.

DATA: DIFQTY TYPE EKPO-MENGE.

DATA: PRQTY TYPE EBAN-MENGE.

LOOP AT LT_EKPO.

LPOQTY = LT_EKPO-MENGE.

SELECT MBLNR MENGE MEINS EBELN EBELP LGNUM BWART

INTO LT_MSEG

FROM MSEG

WHERE EBELN = LT_EKPO-EBELN

AND EBELP = LT_EKPO-EBELP

AND ( BWART = '101' OR BWART = '103').

• APPEND LT_MSEG.

CONCATENATE LT_EKPO-EBELN LT_EKPO-EBELP

INTO LI_SEL-KYFLD.

LI_SEL-EBELN = LT_EKPO-EBELN.

LI_SEL-EBELP = LT_EKPO-EBELP.

LI_SEL-MATNR = LT_EKPO-MATNR.

LI_SEL-POQTY = LPOQTY.

LI_SEL-POUNT = LT_EKPO-MEINS.

LI_SEL-LGNUM = LT_MSEG-LGNUM.

LI_SEL-GRQTY = LT_MSEG-MENGE.

LI_SEL-GRUNT = LT_MSEG-MEINS.

LI_SEL-MBLNR = LT_MSEG-MBLNR.

APPEND LI_SEL.

CLEAR LI_SEL.

CLEAR LPOQTY.

ENDSELECT.

IF SY-SUBRC = 0.

else.

CONCATENATE LT_EKPO-EBELN LT_EKPO-EBELP

INTO LI_SEL-KYFLD.

LI_SEL-EBELN = LT_EKPO-EBELN.

LI_SEL-EBELP = LT_EKPO-EBELP.

LI_SEL-MATNR = LT_EKPO-MATNR.

LI_SEL-POQTY = LPOQTY.

LI_SEL-POUNT = LT_EKPO-MEINS.

LI_SEL-LGNUM = LT_MSEG-LGNUM.

LI_SEL-GRQTY = LT_MSEG-MENGE.

LI_SEL-GRUNT = LT_MSEG-MEINS.

LI_SEL-MBLNR = LT_MSEG-MBLNR.

APPEND LI_SEL.

clear LI_SEL-GRQTY.

CLEAR LI_SEL.

• WRITE:/ LT_EKPO-EBELN, LT_EKPO-EBELP.

ENDIF.

SELECT SINGLE A_{MATNR C}MAKTX B~MINBE INTO ITAB1

FROM MARA AS A

INNER JOIN

MARC AS B ON B_{MATNR = A}MATNR INNER JOIN

MAKT AS C ON C_{MATNR = A}MATNR

• eban as d on d_{MATNR = A}MATNR

WHERE A~MATNR = LT_EKPO-MATNR.

READ TABLE LI_SEL WITH KEY EBELN = LT_EKPO-EBELN

EBELP = LT_EKPO-EBELP.

LI_SEL-MAKTX = ITAB1-MAKTX.

LI_SEL-MINBE = ITAB1-MINBE.

MODIFY TABLE LI_SEL.

CLEAR LI_SEL.

CLEAR ITAB1.

ENDLOOP.

LOOP AT LI_SEL INTO WA_LI_SEL.

WA_LI_SEL1 = WA_LI_SEL.

AT END OF KYFLD.

SUM.

DIFQTY = WA_LI_SEL-POQTY - WA_LI_SEL-GRQTY.

clear LI_SEL-GRQTY.

IF DIFQTY <> 0.

WRITE:

/ WA_LI_SEL1-EBELP(4),

WA_LI_SEL1-MATNR(14),

WA_LI_SEL1-MAKTX(40),

WA_LI_SEL1-POUNT(3),

WA_LI_SEL1-MINBE,

WA_LI_SEL1-LGNUM(3),

WA_LI_SEL1-EBELN(10),

• 104 WA_LI_SEL-POQTY,

DIFQTY COLOR 4,

Li_SEL-banfn.

• 145 Li_SEL-menge.

AT END OF KYFLD(10).

ULINE.

ENDAT.

ENDIF.

ENDAT.

CLEAR WA_LI_SEL1.

Thanks

Pari

[dhruv_shah3]

Hi,

Pls post the Error Code generated in the Dump.

Either go to ST22 and download the dump in to text file and then post...

This way we cant underatand at which line the Dump is coming.

Thanks & Regards,

Dhruv Shah

[Former Member]

Hi,

Please post the line where u get dump (error message).

Regards,

Ramya

[Former Member]

Hi Ramya

Im getting DUMP error in APPEND LI_SEL.

kindly check the coding which was in BOLD.

CONCATENATE LT_EKPO-EBELN LT_EKPO-EBELP

INTO LI_SEL-KYFLD.

LI_SEL-EBELN = LT_EKPO-EBELN.

LI_SEL-EBELP = LT_EKPO-EBELP.

LI_SEL-MATNR = LT_EKPO-MATNR.

LI_SEL-POQTY = LPOQTY.

LI_SEL-POUNT = LT_EKPO-MEINS.

LI_SEL-LGNUM = LT_MSEG-LGNUM.

LI_SEL-GRQTY = LT_MSEG-MENGE.

LI_SEL-GRUNT = LT_MSEG-MEINS.

LI_SEL-MBLNR = LT_MSEG-MBLNR.

APPEND LI_SEL.

CLEAR LI_SEL.

CLEAR LPOQTY.

ENDSELECT.

Please correct my mistake.

Thanks

Pari

[Former Member]

Hi,

If it is a time out dump which happens when the execution of a report takes more time than allowed on the server on frontend try to submit it in the background and then see the list using tcode sm37.

Regards,

Himanshu

[Former Member]

Remove select...endselect from LOOP AT LT_EKPO. .. Endloop

Also remove Inner join (on 3 tables) from the above loop .. endloop.