Problem while selecting the data

Question

Hi,
In my below code
FORM select_data.
  DATA : i_viqmel TYPE STANDARD TABLE OF t_viqmel WITH HEADER LINE.
  DATA : i_viqmel1 TYPE t_viqmel OCCURS 0 WITH HEADER LINE.
  DATA : i_viqmel_n TYPE t_viqmel OCCURS 0 WITH HEADER LINE.
**/ Notification Details
  SELECT qmnum qmdat ausvn erdat aufnr ausbs msaus qmart
  equnr kunum qmtxt strmn
  FROM viqmel INTO TABLE
  i_viqmel
  WHERE
  qmnum IN s_qmnum AND
  qmdat IN s_qmdat AND
  qmart IN s_qmart.
select QMNUM MANUM MNGRP MNCOD MATXT PSTER FROM QMMA INTO TABLE GI_QMMA for all entries in i_viqmel
                        WHERE QMNUM = i_viqmel-QMNUM
                        AND   PSTER NE SPACE
                        AND   MNGRP EQ 'VISIT'
                        AND   MNCOD EQ 'ENVI'
                        AND   MATXT NE SPACE.
   IF SY-SUBRC EQ 0.
   SORT GI_QMMA ASCENDING BY PSTER.
  select CODEGRUPPE CODE KURZTEXT from qpct into table gi_qpct for all entries in GI_qmma where
                                                                   SPRACHE eq 'E'
                                                                 CODEGRUPPE eq 'VISIT'
                                                                and code eq gi_qmma-mncod.
    endif.
as per above code data is not coming in  GI_QMMA ,
WHAT CAN BE THE PROBLEM.
regards,
zafar

Answer 1

Hi Zafar,
It could be internal table i_viqmel does not contain any entry, you can place SY-SUBRC after VIQMEL select statement as per below:
FORM select_data.
DATA : i_viqmel TYPE STANDARD TABLE OF t_viqmel WITH HEADER LINE.
DATA : i_viqmel1 TYPE t_viqmel OCCURS 0 WITH HEADER LINE.
DATA : i_viqmel_n TYPE t_viqmel OCCURS 0 WITH HEADER LINE.
**/ Notification Details
SELECT qmnum qmdat ausvn erdat aufnr ausbs msaus qmart
equnr kunum qmtxt strmn
FROM viqmel INTO TABLE
i_viqmel
WHERE
qmnum IN s_qmnum AND
qmdat IN s_qmdat AND
qmart IN s_qmart.
*--> Add sy-subrc
if sy-subrc = 0.
select QMNUM MANUM MNGRP MNCOD MATXT PSTER FROM QMMA INTO TABLE GI_QMMA for all entries in i_viqmel
WHERE QMNUM = i_viqmel-QMNUM
AND PSTER NE SPACE
AND MNGRP EQ 'VISIT'
AND MNCOD EQ 'ENVI'
AND MATXT NE SPACE.
IF SY-SUBRC EQ 0.
SORT GI_QMMA ASCENDING BY PSTER.
select CODEGRUPPE CODE KURZTEXT from qpct into table gi_qpct for all entries in GI_qmma where
* SPRACHE eq 'E'
CODEGRUPPE eq 'VISIT'
and code eq gi_qmma-mncod.
endif.
endif.
Hope this helps.
Regards,
Patrick