Dump while Running a Report

Question

Hi ,
        I am fetching data from LIPS table first and according to that I am getting values from MCH1:-
SELECT vbeln
         posnr
         matnr
         charg
         lfimg
         vrkme
         lgmng
         vgbel
         vgpos
         mtart
         xchpf
         umcha
    INTO TABLE t_lips
    FROM  lips
    WHERE vbeln EQ p_vbeln.
IF t_lips[] IS NOT INITIAL.
SELECT charg
      INTO TABLE t_mch1
      FROM mch1
     FOR ALL ENTRIES IN t_lips
     WHERE charg EQ t_lips-charg.
    IF sy-subrc EQ 0.
    ENDIF.
endif.
this code is giving dump.
description of DUMP:-
This is probably due to an error in the ABAP program.
Following a SELECT statement, the data read could not be placed in AN
the output area.
A conversion may have been intended that is not supported by the
system, or the output area may be too small.
please help me to solve this.
Regards Avi
  IF sy-subrc EQ 0.
  ENDIF.

Answer 1

Hi,
Specify the structure you haev used.
According to ur query ur t_lips should be as below
DATA: BEGIN  OF t_lips occurs 0,
             vbeln
             posnr
            matnr
              ...............as per teh order in select query
          END OF t_lips.
DATA: BEGIN OF t_mch1 occurs 0,
           charg LIKE mchi-charg,
          END OF t_mch1.
SELECT vbeln
posnr
matnr
charg
lfimg
vrkme
lgmng
vgbel
vgpos
mtart
xchpf
umcha
INTO TABLE t_lips
FROM lips
WHERE vbeln EQ p_vbeln.
IF t_lips[] IS NOT INITIAL.
SELECT charg
INTO TABLE t_mch1
FROM mch1
FOR ALL ENTRIES IN t_lips
WHERE charg EQ t_lips-charg.
IF sy-subrc EQ 0.
ENDIF.
endif.
If u ave defined the itab as
DATA: t_mch1 TYPE STANDARD TABLE OF mch1,
          t_lips TYPE STANDARD TABLE OF lips.
THEN ur code should be like
SELECT vbeln
posnr
matnr
charg
lfimg
vrkme
lgmng
vgbel
vgpos
mtart
xchpf
umcha
INTO CORRESPONDIGN FIELDS OF TABLE t_lips
FROM lips
WHERE vbeln EQ p_vbeln.
IF t_lips[] IS NOT INITIAL.
SELECT charg
INTO CORRESPONDING FIELDS OF TABLE t_mch1
FROM mch1
FOR ALL ENTRIES IN t_lips
WHERE charg EQ t_lips-charg.
IF sy-subrc EQ 0.
ENDIF.
endif.
also
SELECT  * INTO TABLE t_lips
FROM lips
WHERE vbeln EQ p_vbeln.
IF t_lips[] IS NOT INITIAL.
SELECT *
INTO TABLE t_mch1
FROM mch1
FOR ALL ENTRIES IN t_lips
WHERE charg EQ t_lips-charg.
IF sy-subrc EQ 0.
ENDIF.
endif.
Hope u r clear.
Reward points and close the thread if this solves.