Clarification on Select statement

Question

Hello all,
can u please any one tell me the solution.
In one condition.
i am getting the data from marc mkpf and mseg
my requirement is
get the material number from marc based on plant on selection screen
get some data from mkpf table based on posting date(budat) on selection screen entered .
then
get the material data from mseg table based on matnr = equal to point1
                                               mblnr = equal to point2
                                               mjahr = equal to point2.
                            here some fields is there that equal to selection screen fields.
for that i have written the code like this
one way:
select matnr
       werks
  from marc
  into table out_it_marc
where werks in s_werks.
sort out_it_marc by matnr werks.
delete adjacent duplicates from out_it_marc
                    comparing matnr werks.
loop at out_it_marc into lfl_marc.
vr_matnr-low = lfl_marc-matnr.
vr_matnr-sign = c_in.
vr_matnr-option = c_eq.
append vr_matnr.
clear : lfl_marc.
endloop.
FORM get_mseg_data
               tables i_r_matnr  structure vr_matnr
                USING  in_it_mkpf  type t_it_mkpf
              changing out_it_mseg type t_it_mseg.
if not in_it_mkpf[] is initial.
select
        MBLNR    "Number of Material Document
        MJAHR   "Material Document Year
        BWART    "Movement Type (Inventory Management)
        MATNR    "Material Number
        WERKS    "Plant
        LGORT   "Storage location
        SOBKZ    "Special Stock Indicator
        LIFNR   "Vendor's account number
        KUNNR    "Account number of customer
        DMBTR    "Amount in local currency
        MENGE    "Quantity
        MEINS    "Base Unit of Measure
        EBELN    "Purchase order number
        KOSTL    "Cost Center
        AUFNR    "Order Number
        BUKRS    "company code
        PS_PSP_PNR  "Work Breakdown Structure Element (WBS Element)
        SAKTO  "G/L account number
     from mseg
      into table out_it_mseg
    for all entries in in_it_mkpf
  where mblnr eq in_it_mkpf-mblnr
    and mjahr eq in_it_mkpf-mjahr
    and bwart in s_bwart
    and matnr in vr_matnr
    and werks in s_werks
    and kostl in s_kostl
    and ps_psp_pnr in s_pspnr.
endif.
but its getting dump because of so many records
so that i have written again like this.
FORM get_mkpf_mseg_data  USING  in_it_marc type t_it_marc
                         changing out_it_mkpf_mseg type t_it_mkpf_mseg.
if not in_it_marc[] is not initial.
select A~mblnr
       A~mjahr
       A~budat
       A~cpudt
       A~cputm
       A~usnam
       A~xblnr
       B~BWART    "Movement Type (Inventory Management)
       B~MATNR    "Material Number
       B~WERKS    "Plant
       B~LGORT   "Storage location
       B~SOBKZ    "Special Stock Indicator
       B~LIFNR   "Vendor's account number
       B~KUNNR    "Account number of customer
       B~DMBTR    "Amount in local currency
       B~MENGE    "Quantity
       B~MEINS    "Base Unit of Measure
       B~EBELN    "Purchase order number
       B~KOSTL    "Cost Center
       B~AUFNR    "Order Number
       B~BUKRS    "company code
       B~PS_PSP_PNR  "Work Breakdown Structure Element (WBS Element)
       B~SAKTO  "G/L account number
  INTO TABLE out_it_mkpf_mseg
  from mkpf AS A INNER JOIN MSEG AS B
  ON AMBLNR = BMBLNR
  AND AMJAHR = BMJAHR
  FOR ALL ENTRIES IN IN_IT_MARC
  WHERE B~MATNR  = IN_IT_MARC-MATNR
    AND B~WERKS  = IN_IT_MARC-WERKS
    AND A~BUDAT IN S_BUDAT
    AND B~BWART IN S_BWART
   AND MATNR  = IN_IT_MSEG-MATNR
   AND WERKS  = IN_IT_MSEG-WERKS
    AND B~KOSTL IN S_KOSTL
    AND B~PS_PSP_PNR IN S_PSPNR.
  ENDIF.
BREAK-POINT.
ENDFORM.                    " get_mkpf_mseg_data
but this select statement is not working properly
is there anyway to solve it.
please give me the solution ASAP, its urgent.
Thanks in advance....

Answer 1

Hi bs,
you dont\'t have to build a range table vr_matnr for the selection, you just can use for all entries. See help on WHERE-clause:
Suppose FTAB is filled as follows:
CARRID  CONNID
LH      2415
SQ      0026
LH      0400
SELECT * FROM sflight INTO wa_sflight
    FOR ALL ENTRIES IN ftab
    WHERE CARRID = ftab-carrid AND
          CONNID = ftab-connid AND
          fldate = '20010228'.
  free = wa_sflight-seatsocc - wa_sflight-seatsmax.
  WRITE: / wa_sflight-carrid, wa_sflight-connid, free.
ENDSELECT.
Cheers,
Stefan