Left outer join using For All Entries

how to implement left outer join using for all entries In REPORTS.

hi Mansi,
this is how i populate
SELECT VGBEL LFIMG POSNR VBELN FROM LIPS INTO TABLE IT_delv FOR ALL ENTRIES IN IT_VBAP WHERE VGBEL = IT_VBAP-VBELN.
LOOP AT IT_delv INTO WA_delv.
WA_FINAL-VBELN_1 = WA_DELV-VBELN_1.
WA_FINAL-LFDAT =   WA_DELV-LFDAT.
WA_FINAL-LFIMG   = WA_DELV-LFIMG.
WA_FINAL-POSNR2 =   WA_DELV-POSNR2..
APPEND WA_FINAL TO IT_FINAL.
CLEAR: WA_FINAL , WA_delv.
ENDLOOP.
LOOP AT IT_FINAL INTO WA_FINAL.
READ TABLE IT_vbap INTO WA_vbap WITH KEY VGBEL = WA_FINAL-VBELN.
WA_FINAL-VBELN = WA_VBAP-VBELN.
WA_FINAL-MATNR = WA_VBAP-MATNR.
WA_FINAL-KWMENG = WA_VBAP-KWMENG.
WA_FINAL-NETWR = WA_VBAP-NETWR.
MODIFY IT_FINAL FROM WA_FINAL.
ENDLOOP.
My question is , it_vbap has 5 five records A,B,C,D,E.
in it_delv ,there are 20 record corrresponding to A,B,D of IT_VBAP.
in final table i wont get info of recors B,E. I want those info also in final table ..how can i do that...

Similar Messages

Can a JOIN statement be rewritten using FOR ALL ENTRIES in any case ?

I had a SELECT statement, like:
 select p~key1 t~col3 t~col4 p~col2 p~col3
 into table itab1
 from ( table1 as p left outer join table2 as t
 on p~key1 = t~key1 and t~col2 = someValue ).
Among which, table1 and table2 are fully buffered.
Code Inspector suggests that this statement should be, e.g., rewritten using FOR ALL ENTRIES.
Since FOR ALL ENTRIES is only possible for WHERE conditions of the SELECT statement, which means the internal table right after it is not available for the RESULT clause of the SELECT statement, can the above statement be rewritten? If yes, how?
Thanks!

hi ,
select pkey1 tcol3 tcol4 pcol2 p~col3
 into table itab1
 from ( table1 as p left outer join table2 as t
 on pkey1 = tkey1 and t~col2 = someValue ).
look below code
select * from table2 into table int_tab2 where col2 = someValue.
select key1 col2 col3 into table int_tab1
FOR ALL ENTRIES IN int_tab2
WHERE key = int_tab2-key1.
then use read statements for manipulations
rgds
Anver

Joins and use FOR ALL ENTRIES

Two questions :
(1) I use join with for all entries: the performance will go down?:
SELECT t1~MBLNR t1~MJAHR ZEILE BUDAT
INTO TABLE gt_mseg
FROM MSEG as T1 INNER JOIN MKPF AS T2
ON T1~MBLNR = T2~MBLNR and
 T2~MJAHR = T2~MJAHR
FOR ALL ENTRIES IN gt_coss
WHERE T1~MJAHR = gt_coss-GJAHR AND
 T1~AUFNR = gt_coss-aufnr AND
 ( BWART = '261' OR
 BWART = '262' ) AND
 T2~BUDAT IN r_budat.
(2) With "For all entries", if itab is too long, performance will go down?. In affirmative case. What can I do?

Hi Jose,
You'll have to make sure your global table gt_coss isn't empty.
A nasty little habit of the IN statement (for all entries is a kind of IN statement)
is that when it is empty, the system selekts all records.
You might know this when u use Select-Options in your statement (like r_budat).
Also there is an OSS note on he for all entries (531337) problems on i-series database.
Greetings Fred.

Left outer join using anyOfAllowingNone

Hi,
I'm trying to join two tables (tableA and tableB) with left outer join using anyOfAllowingNone (One to many relationship) and try to fetch the tableB data with some constraint on it.
But the sql generated out of the expression builder is not a proper left join, it actually forms a inner join, which brings only table A data which satisfies all the condition. Actually I want all of tableA data and for every record from tableA I want the data from TableB which matches the key from tableA to tableB and some condition applied on tableB data.
I guess I'm doing some thing wrong, I went through the document and sample but still its not getting me the right data.
Below is my expression builder:
exp = builder.get("tableA_K").equal(some value);
exp = exp.and(builder.get("effectiveIn").toChar("MM/dd/yyyy").lessThanEqual(date));
exp = exp.and(builder.get("effectiveOut").toChar("MM/dd/yyyy").greaterThanEqual(date));
exp1 = builder.anyOfAllowingNone("tableBCollectionAttribute").get("effectiveIn").toChar("MM/dd/yyyy").lessThanEqual(date);
exp1 = exp1.and(builder.anyOfAllowingNone("tableBCollectionAttribute").get("effectiveOut").toChar("MM/dd/yyyy").greaterThanEqual(date));
return exp.and(exp1);
Below is the sample query generated:
select distinct tableA.all data
where (((((tableA.key = 2219785)
and (to_char(tableA.EFFECTIVE_IN_S, 'MM/dd/yyyy') <= '03/27/2008'))
and (to_char(tableA.EFFECTIVE_OUT_S, 'MM/dd/yyyy') >= '03/27/2008'))
and ((to_char(tableB.EFFECTIVE_IN_S, 'MM/dd/yyyy') <= '03/27/2008')
and (to_char(tableB.EFFECTIVE_OUT_S, 'MM/dd/yyyy') >= '03/27/2008')))
and (tableB.key (+) = tableA.tableB_Key))
Any help is appreciated. Thanks
Sai.

hi Mansi,
this is how i populate
SELECT VGBEL LFIMG POSNR VBELN FROM LIPS INTO TABLE IT_delv FOR ALL ENTRIES IN IT_VBAP WHERE VGBEL = IT_VBAP-VBELN.
LOOP AT IT_delv INTO WA_delv.
WA_FINAL-VBELN_1 = WA_DELV-VBELN_1.
WA_FINAL-LFDAT = WA_DELV-LFDAT.
WA_FINAL-LFIMG = WA_DELV-LFIMG.
WA_FINAL-POSNR2 = WA_DELV-POSNR2..
APPEND WA_FINAL TO IT_FINAL.
CLEAR: WA_FINAL , WA_delv.
ENDLOOP.
LOOP AT IT_FINAL INTO WA_FINAL.
READ TABLE IT_vbap INTO WA_vbap WITH KEY VGBEL = WA_FINAL-VBELN.
WA_FINAL-VBELN = WA_VBAP-VBELN.
WA_FINAL-MATNR = WA_VBAP-MATNR.
WA_FINAL-KWMENG = WA_VBAP-KWMENG.
WA_FINAL-NETWR = WA_VBAP-NETWR.
MODIFY IT_FINAL FROM WA_FINAL.
ENDLOOP.
My question is , it_vbap has 5 five records A,B,C,D,E.
in it_delv ,there are 20 record corrresponding to A,B,D of IT_VBAP.
in final table i wont get info of recors B,E. I want those info also in final table ..how can i do that...

Inner Joins vs For All Entries - performance query

Hi All,
I'm a bit confused here... I see lots and lots (and lots...) of postings from people asking how to get data from multiple tables.
To me the immediate answer is to use joins in my select statement to reduce the database load but more and more I see people suggesting FOR ALL ENTRIES is better from a performance perspective.
Now, simple question time, which is more efficient in the real world when doing something like the following:- (this is a basic example but I'm sure you know what I mean.)
Select *
into table lt_sales_data
from vbap as vbap
inner join vbak as vbak
     on vbak~vbeln eq vbap~vbeln
where vbak~vbeln in so_vbeln.
or
Select *
into table lt_vbak_data
from vbak
where vbeln in so_vbeln.
if lt_vbak_data[] is not initial.
select *
into table lt_vbap_data
from vbap
for all entries in lt_vbak_data
where vbeln eq lt_vbak_data-vbeln.
endif.
Basically I want to know whether joins or for all entries is better from a database performance perspective.
I want to know why as well so please don't just post links, random cut and paste answers or one liners. I'm convinced for all entries is slower but am willing to be persuaded otherwise if someone can show me proof.
Thanks,
Gareth.

Thanks to all the opinions so far... You've backed up what I suspected although I maybe wasn't clear enough with my question and desired result. I was hoping someone could produce some hard and fast guidelines from SAP themselves dictating which is the better method. I know 10 years ago I was taught to use joins and to keep my database access to minimal levels, using keyed reads where applicable and using internal tables to filter data where I couldn't use key fields.
Gautham, I am aware of SM30 but that doesn't answer the general question I was asking. I've obviously used SM30 to run some comparisons but I was really hoping someone could give me a definitive answer based on hard facts or from attending some training at SAP recently. And no points for asking for them
Tamás, I agree with what you are saying about runing many comparisons - it appears to be dependant on any number of criteria which means each case may require different code. I've not managed to find a consistent comparison of the two methods that would lead me to use one method or the other...
Karan, thanks for your feelings but it doesn't really help me! Why/how does it retrieve the data faster than a join? Have you got testing/proof to back this up?
Raam, thanks for those links - they are interesting reads and seem to go through the same arguments I'm currently considering. Although I still don't have a definitie answer!
Amit, I understand exactly what yuo are saying about myths and urban legends That was my motivation for this post. To bo honest, it seems to me that a lot of the "newer" ABAP coders always go for FOR ALL ENTRIES but I wanted to know - is there a reason or do they all just cut and paste off SDN?! Are they all just scared of complex inner joins?! What would you all make of this Select statement for example? -
select afvc~arbid
            afko~aufnr
            aufk~objnr
            afko~plnnr
            afko~plnal
            afko~aufpl
            afko~zaehl
            afpo~matnr
            makt~maktx
            afvc~vornr
            afvc~ltxa1
            afvu~aplzl
            afvu~usr10
            afvv~meinh
            afvv~bmsch
            afvv~vge02
            afvv~vgw02
            afvv~mgvrg
            afab~aplzl_vor
      into table lt_recipe_orders
      from afko as afko
     inner join aufk as aufk
        on aufk~aufnr eq afko~aufnr
     inner join afpo as afpo
        on afpo~aufnr eq afko~aufnr
     inner join makt as makt
        on makt~matnr eq afpo~matnr
     inner join afvc as afvc
        on afvc~aufpl eq afko~aufpl
     inner join afvu as afvu
        on afvu~aufpl eq afvc~aufpl
       and afvu~aplzl eq afvc~aplzl
     inner join afvv as afvv
        on afvv~aufpl eq afvu~aufpl
       and afvv~aplzl eq afvu~aplzl
      left outer join afab as afab
        on afab~aufpl_nch eq afvu~aufpl
       and afab~aplzl_nch eq afvu~aplzl
       for all entries in t_resources
     where afko~gltrs ge v_start_date
       and afko~gstrs le v_start_date
       and afko~plnty eq gc_task_list_type_2
       and afpo~dwerk eq v_werks
       and makt~spras eq sy-langu
       and afvc~arbid eq t_resources-objid.
Twinkal, I've always thought less DB hits is a better performing program too - the above example compares 2 db hits to 1... I don't have issues with complex joins because I've used them so long so can discount that problem but do agree that less DB hits is the ultimate goal. Providing of course the Selects you write are actually efficient in themselves.
Murthy, if you build your select statement correctly duplicate records can be avoided in most cases. How can you say a join statement will hit the database more when in my example there is 1 DB hit compared to 2 for a for all entries? And I'd love to know the reasoning behind never using a join on more than 2 tables?! Is that just an urban myth?!
Thomas, I've just been looking at some of Siegfried's posts and like what I am reading. As you say, using full keys via joins is essential.
Gareth.

What is the condition for using 'for all entries' and why?

what is the condition for using 'for all entries' and why? can any body tell the reason for this ? its a big favour of me .
regards,
ravi.

hi,
for all entries is used to join two or more tables.
It is same as join but performance wise for all entries is more effective.
You can only use FOR ALL ENTRIES IN ...WHERE ...in a SELECT statement.
SELECT ... FOR ALL ENTRIES IN itab WHERE cond returns the union of the solution sets of all SELECT
statements that would result if you wrote a separate statement for each line of the internal table replacing the symbol
itab-f with the corresponding value of component f in the WHERE condition.Duplicates are discarded from the result
set. If the internal table itab does not contain any entries, the system treats the statement as though there were
no WHERE cond condition, and selects all records (in the current client).
for example:
SELECT * FROM sflight INTO wa_sflight
FOR ALL ENTRIES IN ftab
WHERE CARRID = ftab-carrid AND
CONNID = ftab-connid AND
fldate = '20010228'.
this condition, return all entries of the sflight
hen using FOR ALL ENTRIES the number of matching records is restricted to the number of records in the internal table. If the number of records in the database tables is too large then join would cause overheads in performance. Additionally a JOIN bypasses the table buffering.
So for all entries is used for filtering out the data from the two tables based on the entries in them.
Advantages:
1) For all entries avoids inner join & so the performance increases.
2) For specified values in 1 itab, if you to fetch values from other table you can use it.
3) Use of select stmt in loop is gets avoided, as u can use read statement on the the new itab.

Inner join Vs For all entries

Hi Expert,
Could you please help me in this inner join , Inner join is performance wise is not good so i want to replace instated of inner join for all entries. But when i am checking records of internal table there is difference. in inner join i am getting 11 records but for all entries i am getting 5 records .
Please help me out where excatly i have done mistake.
SELECT maralvorm maramatkl
        maramatnr marameins
        maraprdha maraspart
        marcausss marcbearz
        marcbeskz marcbstmi
        marc~wzeit
        marcdisgr marcmaabc                             *         marcdismm marcdispo
        marcdispr marcdzeit
        marcplifz marcdisls
        marcbstma marcbstrf
        marc~basmg
        marceisbe marcfevor
        marcfxhor marclvorm
        marcmatnr marcmmsta
        marcprctr marcsobsl
        marctranz marcwerks
        marc~xchar
        marclgpro marcfhori
        marc~rgekz
        mbewbklas mbewbwkey
        mbewlbkum mbewsalk3
        mbewmatnr mbewpeinh
        mbewstprs maktmaktx
        maktmatnr cepcabtei
        cepc~prctr
        marcschgt marcminbe
        marc~ekgrp
        marc~eprio
        marc~kausf
        marc~shflg
        marc~shzet
        marc~fabkz
        marc~lgrad
        marc~shpro
        marc~eislo
        marc~rwpro
        marc~lgfsb
        marczzfdwe marczzfdwi
        marczzsspe marczzsspi
INTO TABLE i_matl
FROM ( mara
      INNER JOIN marc
      ON marcmatnr = maramatnr
      INNER JOIN mbew
      ON mbewmatnr = marcmatnr
      AND mbewbwkey = marcwerks
      INNER JOIN makt
      ON maktmatnr = maramatnr
      INNER JOIN cepc
      ON cepcprctr = marcprctr
      AND cepcdatbi >= sy-datum )               "*       WHERE maralvorm IN sp$00094
        AND mara~matkl IN sp$00084
        AND mara~meins IN sp$00091
        AND mara~prdha IN sp$00066
        AND mara~spart IN sp$00085
        AND marc~disgr IN sp$00089
        AND marc~dismm IN sp$00067
        AND marc~dispo IN sp$00061
        AND marc~dispr IN sp$00083
        AND marc~fevor IN sp$00090
        AND marc~lvorm IN sp$00092
        AND marc~mmsta IN sp$00086
        AND marc~beskz IN s_beskz
        AND marc~sobsl IN sp$00068
        AND marc~werks IN sp$00062
        AND marc~xchar IN sp$00093
        AND marc~maabc IN sp$00099
        AND marc~lgrad IN s_lgrad
        AND marc~lgpro IN s_lgpro
        AND marc~rwpro IN s_rwpro
        AND marc~lgfsb IN s_lgfsb
         AND marc~schgt INs_schgt                          *         AND marc~shflg IN s_shflg
        AND marc~shzet IN s_shzet
        AND marc~fabkz IN s_fabkz
        AND marc~shpro IN s_shpro
        AND marc~eislo IN s_eislo
        AND marc~zzfdwe IN s_zzfdwe
        AND marc~zzfdwi IN s_zzfdwi
        AND marc~zzsspe IN s_zzsspe
        AND marc~zzsspi IN s_zzsspi
        AND mbew~bklas IN sp$00063
        AND mbew~lbkum IN sp$00088
        AND makt~maktx IN sp$00059
        AND makt~spras = c_en
        AND makt~matnr IN sp$00060
        AND cepc~prctr IN sp$00087.
I am using for all entries
fetching data from marc data base table
SELECT matnr werks lvorm xchar mmsta
      maabc ekgrp dispr dismm
      dispo plifz ausss disls
      beskz sobsl minbe eisbe
      bstmi bstma bstrf fhori
      rgekz fevor bearz tranz
      basmg dzeit wzeit lgrad
      prctr fxhor lgpro disgr
      kausf rwpro lgfsb schgt
      eprio shflg shzet fabkz
      shpro eislo zzfdwe zzfdwi
      zzsspe zzsspi
      FROM marc INTO TABLE i_marc
      WHERE werks IN sp$00062
          AND lvorm IN sp$00092
          AND xchar IN sp$00093
          AND mmsta IN sp$00086
          AND maabc IN sp$00099
          AND dispr IN sp$00083
          AND dismm IN sp$00067
          AND dispo IN sp$00061
          AND beskz IN s_beskz
          AND sobsl IN sp$00068
          AND fevor IN sp$00090
          AND lgrad IN s_lgrad
          AND lgpro IN s_lgpro
          AND disgr IN sp$00089
          AND rwpro IN s_rwpro
          AND lgfsb IN s_lgfsb
          AND schgt IN s_schgt
          AND shflg IN s_shflg
          AND shzet IN s_shzet
          AND fabkz IN s_fabkz
          AND shpro IN s_shpro
          AND eislo IN s_eislo
          AND zzfdwe IN s_zzfdwe
          AND zzfdwi IN s_zzfdwi
          AND zzsspe IN s_zzsspe
          AND zzsspi IN s_zzsspi.
IF sy-subrc EQ 0.
    SORT i_marc BY matnr werks.
ENDIF.
DELETE ADJACENT DUPLICATES FROM i_marc comparing matnr werks.
*fetching data from mara data base table
IF NOT i_marc[] IS INITIAL.
    SELECT matnr lvorm matkl
           meins spart prdha
        FROM mara INTO TABLE i_mara
        FOR ALL ENTRIES IN i_marc
         WHERE matnr = i_marc-matnr
         AND   lvorm IN sp$00094
         AND   matkl IN sp$00084
         AND   meins IN sp$00091
         AND   prdha IN sp$00066
         AND   spart IN sp$00085.
ENDIF.
IF sy-subrc EQ 0.
    SORT i_mara BY matnr.
ENDIF.
DELETE ADJACENT DUPLICATES FROM i_mara comparing matnr.
*fetching data from mbew data base table
IF NOT i_mara[] IS INITIAL.
    SELECT matnr bwkey bwtar lbkum
           salk3 stprs peinh bklas
           FROM mbew INTO TABLE i_mbew
           FOR ALL ENTRIES IN i_marc
           WHERE matnr = i_marc-matnr
                AND bwkey = i_marc-werks
                AND bklas IN sp$00063
                AND lbkum IN sp$00088.
ENDIF.
IF sy-subrc EQ 0.
    SORT i_mbew BY matnr bwkey bwtar.
ENDIF.
*DELETE ADJACENT DUPLICATES FROM i_mbew comparing matnr bwkey bwtar.
*fetching data from makt data base table
IF NOT i_mara[] IS INITIAL.
    SELECT matnr spras maktx
      FROM makt INTO TABLE i_makt
      FOR ALL ENTRIES IN i_mara
      WHERE matnr = i_mara-matnr
       AND maktx IN sp$00059
       AND makt~spras = c_en.
ENDIF.
IF sy-subrc EQ 0.
    SORT i_makt BY matnr spras.
ENDIF.
DELETE ADJACENT DUPLICATES FROM i_makt.
*fetching data from cpec data base table
IF NOT i_marc[] IS INITIAL.
    SELECT prctr datbi kokrs abtei
        FROM cepc INTO TABLE i_cepc
        FOR ALL ENTRIES IN i_marc
        WHERE prctr = i_marc-prctr
             AND prctr IN sp$00087
             AND datbi >= sy-datum.
ENDIF.
IF sy-subrc EQ 0.
    SORT i_cepc BY prctr datbi kokrs.
ENDIF.
*DELETE ADJACENT DUPLICATES FROM i_cepc.
LOOP AT i_cepc INTO wa_cpec.
read table i_marc into wa_marc with key
                   prctr = wa_cpec-prctr binary search.
   if sy-subrc = 0.
    i_matl-abtei = wa_cpec-abtei.
    i_matl-prctr1 = wa_cpec-prctr.
    i_matl-ausss = wa_marc-ausss.
    i_matl-bearz = wa_marc-bearz.
    i_matl-beskz = wa_marc-beskz.
    i_matl-bstmi = wa_marc-bstmi.
    i_matl-wzeit = wa_marc-wzeit.
    i_matl-disgr = wa_marc-disgr.
    i_matl-maabc = wa_marc-maabc.
    i_matl-dismm = wa_marc-dismm.
    i_matl-dispo = wa_marc-dispo.
    i_matl-dispr = wa_marc-dispr.
    i_matl-dzeit = wa_marc-dzeit.
    i_matl-plifz = wa_marc-plifz.
    i_matl-disls = wa_marc-disls.
    i_matl-bstma = wa_marc-bstma.
    i_matl-bstrf = wa_marc-bstrf.
    i_matl-basmg = wa_marc-basmg.
    i_matl-eisbe = wa_marc-eisbe.
    i_matl-fevor = wa_marc-fevor.
    i_matl-fxhor = wa_marc-fxhor.
    i_matl-lvorm1 = wa_marc-fevor.
    i_matl-matnr1 = wa_marc-matnr.
    i_matl-mmsta = wa_marc-mmsta.
    i_matl-prctr = wa_marc-prctr.
    i_matl-sobsl = wa_marc-sobsl.
    i_matl-tranz = wa_marc-tranz.
    i_matl-werks = wa_marc-werks.
    i_matl-xchar = wa_marc-xchar.
    i_matl-lgpro = wa_marc-lgpro.
    i_matl-fhori = wa_marc-fhori.
    i_matl-rgekz = wa_marc-rgekz.
    i_matl-schgt = wa_marc-schgt.
    i_matl-minbe = wa_marc-minbe.
    i_matl-ekgrp = wa_marc-ekgrp.
    i_matl-eprio = wa_marc-eprio.
    i_matl-kausf = wa_marc-kausf.
    i_matl-shflg = wa_marc-shflg.
    i_matl-shzet = wa_marc-shzet.
    i_matl-fabkz = wa_marc-fabkz.
    i_matl-lgrad = wa_marc-lgrad.
    i_matl-shpro = wa_marc-shpro.
    i_matl-eislo = wa_marc-eislo.
    i_matl-rwpro = wa_marc-rwpro.
    i_matl-lgfsb = wa_marc-lgfsb.
    i_matl-zzfdwe = wa_marc-zzfdwe.
    i_matl-zzfdwi = wa_marc-zzfdwi.
    i_matl-zzsspe = wa_marc-zzsspe.
    i_matl-zzsspi = wa_marc-zzsspi.
endif.
    READ TABLE i_mara INTO wa_mara WITH KEY
                        matnr = wa_marc-matnr binary search.
    i_matl-lvorm = wa_mara-lvorm.
    i_matl-matkl = wa_mara-matkl.
    i_matl-matnr = wa_mara-matnr.
    i_matl-meins = wa_mara-meins.
    i_matl-prdha = wa_mara-prdha.
    i_matl-spart = wa_mara-spart.
    READ TABLE i_makt INTO wa_makt WITH KEY
                        matnr = wa_mara-matnr binary search.
    i_matl-matnr3 = wa_makt-matnr.
    i_matl-maktx = wa_makt-maktx.
    READ TABLE i_mbew INTO wa_mbew WITH KEY
                          matnr = wa_marc-matnr binary search.
    i_matl-bklas = wa_mbew-bklas.
    i_matl-bwkey = wa_mbew-bwkey.
    i_matl-lbkum = wa_mbew-lbkum.
    i_matl-salk3 = wa_mbew-salk3.
    i_matl-matnr2 = wa_mbew-matnr.
    i_matl-peinh = wa_mbew-peinh.
    i_matl-stprs = wa_mbew-stprs.
   READ TABLE i_cepc INTO wa_cpec WITH KEY
                         prctr = wa_marc-prctr.
    APPEND i_matl.
    CLEAR: wa_cpec, wa_mbew, wa_mara, wa_marc.
ENDLOOP.
Thaks
Waiting your reply.

Hi Sasmita,
I think your final loop is the problem. As you are looping through the CEPC internal table, and reading the other tables. For different materials there might be a same profit center, the read table will fetch you only first occurance of the profit center from the mara or marc table.
So loop through either mara or marc table and read the remaining and populate your final internal tables. This might solve your problem.
Regards,
Ramesh Babu S
*Reward points if it is helpful....

Inner join Vs for all entries for performance

hi,
i need to fetch data from 5 tables where i have common key vbeln, is this suggestable to write a select query with inner join or write an inner join for 2 tables with more fileds and for remaining using for all entries.... please suggest how can i increase the performance...all points are rewarded....
thnaks alot.

Is this a dialog program or a data extract? Rob is right in that the difference is negligible IF the number of records involved are only a few.
On the other hand, if you are extracting a large number of records, then the performance depends on a number of things and is generally unpredictable.
The way I approach it is by first developing the extract program with a join because it is easier to code. If the program run time is within the acceptable range, I would let it be and migrate to production. If the performance is of high priority and if the join appears to take long time, then I will comment out the code and try the FAE approach. If the run time with FAE is not markedly better, then I would go back to join.

Inner joins Vs for all entries

Hi All,
Pls let me know
the differences b/w innerjoins and for all entries,,,,which is the best option and Y??
Thanks in Advance,
Bye

Hi!
INNER JOIN is used if we want to retrieve some data from more than one table.
FOR ALL ENTRIES is used if we want some data from a table based on some conditions of some other table.
Using several nested INNER JOIN statements can be inefficient and cause time out if the tables become too big in the future."
In ABAP, these joins are first split by the ABAP processor and then sent to the database, with the increase in DATA in production system, these joins tend to give way if your database keeps growing larger and larger.
You should rather use "FOR ALL ENTRIES IN" (Tabular conditions), which is a much efficient way as far as performance is concerned.
Check these links:
inner joins and for all entries
inner join and for all entries
Reward points if it helps.
Regards
Sudheer

Regarding Select using FOR ALL ENTRIES (FAEI)

Hi all,
Please help me with Select using FOR ALL ENTRIES (FAEI)
Thanks in advns,
Das.

Hi,
This version of the SELECT statement was the only way to join tables until SAP release 3.0E. It is recommended that the SQL JOIN be used. However, this is an alternate method of joining tables that may be used in some circumstances. Remember, SQL JOIN doesnt utilize the SAP internal database buffer.
Example:
    SELECT EKGRP FROM T024
           INTO TABLE T_024.
    SELECT MATNR WERKS EKGRP FROM MARC
           INTO TABLE T_MARC
           FOR ALL ENTRIES IN T_024
           WHERE EKGRP = T_024-EKGRP.
Prerequisites:
The driver table cannot be empty. This would cause one full table scan.
In general, keep the driver table as small and unique (in regards to the fields that would be needed for referencing in the FAEI) as possible. If duplicate entries are not deleted, identical data is read unnecessarily from the database.
If FAEI is used, the selected field list must be a superset of all the key fields of the database tables used in SQL. This is absolutely required to avoid data loss since the DB interface in R/3 returns unique sets of the result set to the application program. Failing to ensure this may cause problems when you want to get all records from a database table that match a certain condition.
Avoid using FAEI on a small DB table (like configuration tables). This could potentially cause full table scans for each FAEI packet. Even if it does index range scan, it is better to get data from the small DB tables by individual SELECT without the use of FAE.
Always use FAEI in conjunction with a DB index otherwise it would cause multiple full table scans (one table scan for each FAEI packet).
The first field(s) of the DB index should refer to the fields of the FAEI driver table in the SQL WHERE clause. Do not leave gaps between index fields in the WHERE clause. Inefficient index access will impact every FAEI packets.
FAEI works best when retrieving a small percentage of data from a Database table. When a large percentage of data is needed, consider getting data out of the DB table without FAEI implementation, and then do additional filtration in your application
Reward points if found helpfull...
Cheers,
Chandra Sekhar.

Hi Prerequestion of using for all entries

Hi ,
What is the prerequestion of using For All Entries. Could you answer to me.
Thanks & Regards
Raghava

Hi,
1.First check whether the internal table which to be used in FOR ALL ENTRIES is initial or not.IF it is not initial ,then use the table.Otherwise it will go for an infinite loop.
2.Sort the internal table.
Go through this
Outer join can be created using this addition to the where clause in a select statement. It speeds up the performance tremendously, but the cons of using this variation are listed below
Duplicates are automatically removed from the resulting data set. Hence care should be taken that the unique key of the detail line items should be given in the select statement.
If the table on which the For All Entries IN clause is based is empty, all rows are selected into the destination table. Hence it is advisable to check before-hand that the first table is not empty.
If the table on which the For All Entries IN clause is based is very large, the performance will go down instead of improving. Hence attempt should be made to keep the table size to a moderate level.
Not Recommended
Loop at int_cntry.
Select single * from zfligh into int_fligh
where cntry = int_cntry-cntry.
Append int_fligh.
Endloop.
Recommended
Select * from zfligh appending table int_fligh
For all entries in int_cntry
Where cntry = int_cntry-cntry.
Regards,
Padmam.

Unable to Get the Data Using For All Entries

Hi everybody, i am using for all entries in a program. but when i am writing a code using for all entries i am getting an error as
Where condition does not refers to the FOR ALL ENTRIES tables...
SELECT KUNNR
       NAME1
       ORT01
       LAND1
   FROM KNA1 INTO TABLE ITAB1 WHERE KUNNR IN S_KUNNR.
IF NOT ITAB1 IS INITIAL.
SELECT VBELN
        ERDAT
        KUNNR
   FROM VBAK INTO TABLE ITAB2 FOR ALL ENTRIES IN ITAB1 WHERE KUNNR = IT_KNA1-KUNNR.
ENDIF.
can anybody help out in this
regards
hyder ali

The correct one may be like this:
SELECT KUNNR
NAME1
ORT01
LAND1
FROM KNA1 INTO TABLE ITAB1 WHERE KUNNR IN S_KUNNR.
IF NOT ITAB1 IS INITIAL.
SELECT VBELN
ERDAT
KUNNR
FROM VBAK INTO TABLE ITAB2 FOR ALL ENTRIES IN ITAB1 WHERE KUNNR = ITAB1-KUNNR. "modified here
ENDIF.
Edited by: XuJian84 on Mar 9, 2010 4:25 AM

SD Flow program using For all entries.

using simple ALV grid: I have the urgent requirement of changing the following program using 'For all entries' instead of joins and I should not use 'TABLES' -- For top-of-page I need to get dynamic fields like if I select company code in the selection screen then I need to get 'This report is base on COMPANY CODE'.
This program is about sales flow where i shud get only those records that have ebeln in vbak, delivery, invoice.
The original program is as follows:
*& Report ZSD_DOCU_FLOW *
REPORT zsd_docu_flow NO STANDARD PAGE HEADING .
* Program : ZCOS_SALES *
* Dev. Class : ZSD
* Functional :
* Created on : *
* Project :
* CR Number :
* Transaction : ZSDCSUT *
* Description : * Sales document life cylce for given customer
* to declaired period displaying the sales document
* details ,with relevant del details and corresponding
* Invocie Details
*----------- Tables Declaration -----------*
TABLES: vbak,vbap,vbfa,kna1,vbrk,vbrp,likp,lips,t001.
TYPE-POOLS : slis.
*----------- Internal Tables Declaration -----------*
* Internal Table for Sales Order data *
DATA: BEGIN OF it_so OCCURS 0,
 vbeln LIKE vbak-vbeln,
 kunnr LIKE vbak-kunnr,
 posnr LIKE vbap-posnr,
 matnr LIKE vbap-matnr,
 kwmeng LIKE vbap-kwmeng,
 netwr LIKE vbap-netwr,
 END OF it_so.
* Internal Table for Delivery Order data *
DATA: BEGIN OF it_del OCCURS 0,
 delnum LIKE likp-vbeln,
 lfdat LIKE likp-lfdat,
 delitem LIKE lips-posnr,
 lfimg LIKE lips-lfimg,
 END OF it_del.
* Internal Table for Invoice data *
DATA: BEGIN OF it_inv OCCURS 0,
 invnum LIKE vbrk-vbeln,
 invitem LIKE vbrp-posnr,
 fkimg LIKE vbrp-fkimg,
 amount LIKE vbrp-netwr,
 END OF it_inv.
* Internal Table for Final data *
DATA: BEGIN OF it_final OCCURS 0,
 vbeln LIKE vbak-vbeln,
 posnr LIKE vbap-posnr,
 kunnr LIKE vbak-kunnr,
 name LIKE kna1-name1,
 matnr LIKE vbap-matnr,
 kwmeng LIKE vbap-kwmeng,
 netwr LIKE vbap-netwr,
 delnum LIKE likp-vbeln,
 lfdat LIKE likp-lfdat,
 delitem LIKE lips-posnr,
 lfimg LIKE lips-lfimg,
 invnum LIKE vbrk-vbeln,
 invitem LIKE vbrp-posnr,
 fkimg LIKE vbrp-fkimg,
 amount LIKE vbrp-netwr,
 END OF it_final.
*----------- Variables Declaration -----------*
DATA: v_name LIKE kna1-kunnr," variable for customer name
 v_delnum LIKE likp-vbeln," variable for delivery number
 v_invnum LIKE vbrk-vbeln." variable for invoce number
DATA : ls_layout TYPE slis_layout_alv,
 it_fcat TYPE slis_t_fieldcat_alv ,
 wa_fcat TYPE slis_fieldcat_alv,
 lh TYPE slis_t_listheader,
 ls TYPE slis_listheader,
 it_events TYPE slis_t_event ,
 ls_event TYPE slis_alv_event ,
 i_sort TYPE slis_t_sortinfo_alv,
 w_var TYPE i.
DATA : l_date(10).
DATA : l_date1(20).
DATA : l_repid LIKE trdir-name.
l_repid = 'ZSD_DOCU_FLOW1'.
*----------- Select-options & parameters Declaration ---*
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: p_bukrs LIKE vbak-bukrs_vf,
 p_vkorg LIKE vbak-vkorg,
 p_vtweg LIKE vbak-vtweg,
 p_spart LIKE vbak-spart.
SELECT-OPTIONS: s_kunnr FOR vbak-kunnr,
 s_audat FOR vbak-audat.
SELECTION-SCREEN END OF BLOCK b1.
*----------- AT SELECTION-SCREEN --------------------------*
AT SELECTION-SCREEN.
SELECT SINGLE * FROM t001 INTO t001
 WHERE bukrs = p_bukrs.
IF sy-subrc <> 0.
 MESSAGE e000(8i) WITH 'Enter a Valid Company Code'.
ENDIF.
SELECT SINGLE * FROM vbak INTO vbak
 WHERE vkorg = p_vkorg.
IF sy-subrc <> 0.
 MESSAGE e000(8i) WITH 'Enter a Valid Sales Organization'.
ENDIF.
SELECT SINGLE * FROM vbak INTO vbak
 WHERE vtweg = p_vtweg.
IF sy-subrc <> 0.
 MESSAGE e000(8i) WITH 'Enter a Valid distribution channel'.
ENDIF.
SELECT SINGLE * FROM vbak INTO vbak
 WHERE spart = p_spart.
IF sy-subrc <> 0.
 MESSAGE e000(8i) WITH 'Enter a Valid Division'.
ENDIF.
SELECT SINGLE * FROM kna1 INTO kna1
 WHERE kunnr IN s_kunnr.
IF sy-subrc <> 0.
 MESSAGE e000(8i) WITH 'Enter a Valid Customer Number'.
ENDIF.
*----------- START-OF-SELECTION-----------------------------*
START-OF-SELECTION.
ls-typ = 'H'.
ls-info = 'Sales Document Flow'.
APPEND ls TO lh.
ls-typ = 'S'.
WRITE: sy-datum TO l_date USING EDIT MASK '__/__/____'.
CONCATENATE 'DATE :' l_date INTO l_date1 SEPARATED BY space.
ls-info = l_date1.
APPEND ls TO lh.
PERFORM field_cat.
PERFORM t_sort_build USING i_sort.
PERFORM get-data.
*----------- END-OF-SELECTION-----------------------------*
END-OF-SELECTION.
IF it_final[] IS INITIAL.
 MESSAGE i000(8i) WITH 'No data Found'.
 EXIT.
ENDIF.
PERFORM print-data.
*& Form get-data
* text
* --> p1 text
* <-- p2 text
FORM get-data .
* Accesing Sales Data
SELECT a~vbeln a~kunnr b~posnr b~matnr b~kwmeng b~netwr
 INTO CORRESPONDING FIELDS OF TABLE it_so
 FROM vbak AS a INNER JOIN vbap AS b
 ON a~vbeln = b~vbeln
 WHERE a~bukrs_vf = p_bukrs
 AND a~vkorg = p_vkorg
 AND a~vtweg = p_vtweg
 AND a~spart = p_spart
 AND a~kunnr IN s_kunnr
 AND a~audat IN s_audat.
LOOP AT it_so.
 SELECT SINGLE name1 FROM kna1 INTO v_name
 WHERE kunnr = it_so-kunnr.
 SELECT SINGLE vbeln FROM vbfa INTO v_delnum
 WHERE vbelv = it_so-vbeln
 AND vbtyp_n = 'J'.
 IF sy-subrc = 0.
 SELECT SINGLE vbeln FROM vbfa INTO v_invnum
 WHERE vbelv = v_delnum
 AND vbtyp_n = 'M'.
 ENDIF.
 MOVE-CORRESPONDING it_so TO it_final.
 it_final-name = v_name.
 it_final-delnum = v_delnum.
 it_final-invnum = v_invnum.
 APPEND it_final.
 CLEAR it_final.
 CLEAR v_delnum.
 CLEAR v_invnum.
ENDLOOP.
LOOP AT it_final.
 IF it_final-delnum NE ' '.
* Reading Del Data.
 SELECT SINGLE a~vbeln a~lfdat b~posnr b~lfimg INTO
 (it_del-delnum, it_del-lfdat, it_del-delitem,
 it_del-lfimg ) FROM
 likp AS a INNER JOIN lips AS b ON a~vbeln = b~vbeln
 WHERE a~vbeln = it_final-delnum
 AND b~posnr = it_final-posnr.
 MOVE-CORRESPONDING it_del TO it_final.
 MODIFY it_final.
 ENDIF.
 IF it_final-invnum NE ' '.
* Reading Invoice Data.
 SELECT SINGLE vbeln posnr fkimg netwr INTO
 (it_inv-invnum, it_inv-invitem, it_inv-fkimg, it_inv-amount )
 FROM vbrp WHERE vbeln = it_final-invnum
 AND posnr = it_final-posnr.
 MOVE-CORRESPONDING it_inv TO it_final.
 MODIFY it_final.
 ENDIF.
ENDLOOP.
ENDFORM. " get-data
*& Form print-data
* text
* --> p1 text
* <-- p2 text
FORM print-data .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
* I_INTERFACE_CHECK = ' '
* I_BYPASSING_BUFFER = ' '
* I_BUFFER_ACTIVE = ' '
 i_callback_program = l_repid
* I_CALLBACK_PF_STATUS_SET = ' '
* I_CALLBACK_USER_COMMAND = ' '
 i_callback_top_of_page = 'TOP'
* I_CALLBACK_HTML_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_END_OF_LIST = ' '
* I_STRUCTURE_NAME =
* I_BACKGROUND_ID = ' '
* I_GRID_TITLE =
* I_GRID_SETTINGS =
* IS_LAYOUT =
 it_fieldcat = it_fcat
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
 IT_SORT = i_sort[]
* IT_FILTER =
* IS_SEL_HIDE =
* I_DEFAULT = 'X'
* I_SAVE = ' '
* IS_VARIANT =
* 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
* IT_ALV_GRAPHICS =
* IT_HYPERLINK =
* IT_ADD_FIELDCAT =
* IT_EXCEPT_QINFO =
* I_HTML_HEIGHT_TOP =
* I_HTML_HEIGHT_END =
* IMPORTING
* E_EXIT_CAUSED_BY_CALLER =
* ES_EXIT_CAUSED_BY_USER =
 TABLES
 t_outtab = it_final.
* 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.
ENDFORM. " print-data
*& Form field_cat
* text
* --> p1 text
* <-- p2 text
FORM field_cat .
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'VBELN'.
wa_fcat-key = 'X'.
wa_fcat-ref_fieldname = 'VBELN'.
wa_fcat-ref_tabname = 'VBAK'.
wa_fcat-seltext_m = 'Sales Order NO'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'POSNR'.
wa_fcat-ref_fieldname = 'POSNR'.
wa_fcat-ref_tabname = 'VBAP'.
wa_fcat-seltext_m = 'SalesItemNO'.
wa_fcat-fix_column = 'X'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'KUNNR'.
wa_fcat-seltext_m = 'CUSTNUM'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'NAME'.
wa_fcat-seltext_m = 'CUSTNAME'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'MATNR'.
wa_fcat-seltext_m = 'MATNUM'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'KWMENG'.
wa_fcat-seltext_m = 'Sales Quantity'.
wa_fcat-do_sum = 'X'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'NETWR'.
wa_fcat-seltext_m = 'Value'.
wa_fcat-do_sum = 'X'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'DELNUM'.
wa_fcat-seltext_m = 'DeloveryNum'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'DELITEM'.
wa_fcat-seltext_m = 'DelItemNO'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'LFDAT'.
wa_fcat-seltext_m = 'DelDate'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'LFIMG'.
wa_fcat-seltext_m = 'DelQuantity'.
wa_fcat-do_sum = 'X'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'INVNUM'.
wa_fcat-seltext_m = 'InvoiceNum'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'INVITEM'.
wa_fcat-seltext_m = 'InvoiceItem'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'FKIMG'.
wa_fcat-seltext_m = 'INVQuantity'.
wa_fcat-do_sum = 'X'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_FINAL'.
wa_fcat-fieldname = 'AMOUNT'.
wa_fcat-seltext_m = 'INVvalue'.
wa_fcat-do_sum = 'X'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
ENDFORM. " field_cat
*& Form top
* text
FORM t_sort_build USING l_sort TYPE slis_t_sortinfo_alv.
DATA: ls_sort TYPE slis_sortinfo_alv.
ls_sort-fieldname = 'VBELN'.
ls_sort-spos = 1.
ls_sort-up = 'X'.
ls_sort-subtot = 'X'.
APPEND ls_sort TO l_sort.
ls_sort-fieldname = 'KUNNR'.
ls_sort-spos = 2.
ls_sort-up = 'X'.
APPEND ls_sort TO l_sort.
ENDFORM. "t_sort_bui
FORM top.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
 EXPORTING
 it_list_commentary = lh
* I_LOGO =
* I_END_OF_LIST_GRID =
ENDFORM. "TOP
===========================================================================
I have started the new program but i have trouble with the final internal table. Since i'm using For all entries I have declared internal tables for each table. My incomplete new program is as follows(not sure if the logic is correct till what I have coded):
*& Report Z_SDFLOW *
REPORT Z_SDFLOW NO STANDARD PAGE HEADING.
********* TABLES TO BE USED ***********************
**** VBAK - SALES DOCUMENT HEADER
* VBAP - SALES ITEM
* VBFA - SALES DOCUMENT FLOW
* KNA1- CUSTOMER MASTER
* VBRK - BILLING DOCUMENT HEADER
* VBRP - BLLING DOCUMENT ITEM
* LIKP - DELIVERY HEADER
* LIPS - DELIVERY ITEM
* TOO1 - COMPANY CODES
* SLIS.
TYPE-POOLS: SLIS.
** STRUCTURE DECLARATIONS ********
**STRUCTURE FOR ENQUIRY.
**STRUCTURE FOR QUOTATION.
**STRUCTURE FOR SALES ORDER HEADER- VBAK.
TYPES: BEGIN OF XT_VBAK,
VBELN TYPE VBAK-VBELN, "SALES DOCUMENT NUMBER
KUNNR TYPE VBAK-KUNNR, " SOLD-TO-PARTY
END OF XT_VBAK.
**STRUCTURE FOR SALES ORDER ITEM-VBAP
TYPES: BEGIN OF XT_VBAP,
POSNR TYPE VBAP-POSNR, " SALES ITEM NUMBER
MATNR TYPE VBAP-MATNR, " MATERIAL NUMBER
KWMENG TYPE VBAP-KWMENG, " CUMMULATIVE ORDER QUANTITY IN SALES UNITS
NETWR TYPE VBAP-NETWR, " NET VALUE OF THE ORDER ITEM
END OF XT_VBAP.
** STRUCTURE FOR DELIVERY HEADER -LIKP
TYPES: BEGIN OF XT_LIKP,
DELVBELN TYPE LIKP-VBELN, "DELIVERY DOCUMENT NUMBER
LFDAT TYPE LIKP-LFDAT, " DELIVERY DATE
END OF XT_LIKP.
**STRUCTURE FOR DELIVERY ITEM - LIPS
TYPES: BEGIN OF XT_LIPS,
DELPOSNR TYPE LIPS-POSNR, " DELIVERY ITEM NUMBER
LFIMG TYPE LIPS-LFIMG, " ACTUAL QUANTITY DELIVERED
END OF XT_LIPS.
**STRUCTURE FOR BILLING DOCUMENT HEADER -VBRK
TYPES: BEGIN OF XT_VBRK,
INVVBELN TYPE VBRK-VBELN, "BILLING DOCUMENT NUMBER
END OF XT_VBRK.
**STRUCTURE FOR BILLING DOCUMENT ITEM - VBRP
TYPES: BEGIN OF XT_VBRP,
INVPOSNR TYPE VBRP-POSNR, "BILLING ITEM NUMBER
FKIMG TYPE VBRP-FKIMG, "ACTUAL INVOICED QUANTITY
INVNETWR TYPE VBRP-NETWR, "NET VALUE OF THE BILLING ITEM
END OF XT_VBRP.
**STRUCTURE FOR FINAL INTERNAL TABLE.
TYPES: BEGIN OF XT_FINAL,
VBELN TYPE VBAK-VBELN,
DELVBELN TYPE LIKP-VBELN,
INVBELN TYPE VBRK-VBELN,
KUNNR TYPE VBAK-KUNNR,
POSNR TYPE VBAP-POSNR,
DELPOSNT TYPE LIPS-POSNR,
INVPOSNR TYPE VBRP-POSNR,
MATNR TYPE VBAP-MATNR,
KWMENG TYPE VBAP-KWMENG,
NETWR TYPE VBAP-NETWR,
INVNETWR TYPE VBRP-NETWR,
LFDAT TYPE LIKP-LFDAT,
LFIMG TYPE LIPS-LFIMG,
FKIMG TYPE VBRP-FKIMG,
NAME1 TYPE KNA1-NAME1,
END OF XT_FINAL.
**DATA DECLARATIONS
DATA: V_NAME1 TYPE KNA1-NAME1, "#EC *
 V_DELVBELN TYPE LIKP-VBELN,
 V_INVVBELN TYPE VBRK-VBELN,
 V_BUKRS TYPE T001-BUKRS, "COMPANY CODE "#EC *
 V_AUDAT TYPE VBAK-AUDAT,
 V_VKORG TYPE VBAK-VKORG,
 V_VKGRP TYPE VBAK-VKGRP,
 V_SPART TYPE VBAK-SPART.
**INTERNAL TABLE DECLARATIONS
DATA: IT_VBAK TYPE STANDARD TABLE OF XT_VBAK,
 WA_VBAK TYPE XT_VBAK,
 IT_VBAP TYPE STANDARD TABLE OF XT_VBAP,
 WA_VBAP TYPE XT_VBAP,
 IT_LIKP TYPE STANDARD TABLE OF XT_LIKP,
 WA_LIKP TYPE XT_LIKP,
 IT_LIPS TYPE STANDARD TABLE OF XT_LIPS,
 WA_LIPS TYPE XT_LIPS,
 IT_VBRK TYPE STANDARD TABLE OF XT_VBRK,
 WA_VBRK TYPE XT_VBRK,
 IT_VBRP TYPE STANDARD TABLE OF XT_VBRP,
 WA_VBRP TYPE XT_VBRP,
 IT_FINAL TYPE STANDARD TABLE OF XT_FINAL,
 WA_FINAL TYPE XT_FINAL.
**ALV DECLARATIONS
DATA: IT_FLDCAT TYPE SLIS_T_FIELDCAT_ALV,
 WA_FLDCAT TYPE SLIS_FIELDCAT_ALV,
 IT_LSTHDR TYPE SLIS_T_LISTHEADER,
 WA_LSTHDR TYPE SLIS_LISTHEADER,
 IT_EVENTS TYPE SLIS_T_EVENT,
 WA_EVENTS TYPE SLIS_ALV_EVENT,
 IT_SORT TYPE SLIS_T_SORTINFO_ALV,
 IT_LAYOUT TYPE SLIS_LAYOUT_ALV.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: S_BUKRS FOR V_BUKRS NO INTERVALS NO-EXTENSION,
 S_VBELN FOR WA_VBAK-VBELN, "SALES DOCUMENT NUMBER
 S_KUNNR FOR WA_VBAK-KUNNR, "SOLD-TO-PARTY
 S_AUDAT FOR V_AUDAT, "SALES DOCUMENT DATE
 S_VKORG FOR V_VKORG, "SALES ORGANISATION
 S_VKGRP FOR V_VKGRP, "SALES GROUP
 S_SPART FOR V_SPART. "DIVISION
SELECTION-SCREEN END OF BLOCK b1.
*****************SCREEN VALIDATION***************
AT SELECTION-SCREEN.
SELECT SINGLE BUKRS FROM T001 INTO V_BUKRS WHERE BUKRS IN S_BUKRS."#EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID COMPANY CODE'.
ENDIF.
SELECT SINGLE VBELN FROM VBAK INTO
 CORRESPONDING FIELDS OF WA_VBAK WHERE VBELN IN S_VBELN.
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER VALID SALES DOCUMENT NUMBER'.
ENDIF.
SELECT SINGLE KUNNR FROM VBAK INTO
 CORRESPONDING FIELDS OF WA_VBAK WHERE KUNNR IN S_KUNNR. "EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID CUSTOMER NUMBER'.
ENDIF.
SELECT SINGLE AUDAT FROM VBAK INTO V_AUDAT WHERE AUDAT IN S_AUDAT."#EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID SALES DOCUMENT DATE'.
ENDIF.
SELECT SINGLE VKORG FROM VBAK INTO V_VKORG WHERE VKORG IN S_VKORG."#EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID SALES ORGANISATION'.
ENDIF.
SELECT SINGLE VKGRP FROM VBAK INTO V_VKGRP WHERE VKGRP IN S_VKGRP."#EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID SALES GROUP'.
ENDIF.
SELECT SINGLE SPART FROM VBAK INTO V_SPART WHERE SPART IN S_SPART."#EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID SALES DIVISION'.
ENDIF.
PERFORM GET_DATA.
*& Form GET_DATA
FORM GET_DATA .
SELECT VBELN KUNNR
 INTO TABLE IT_VBAK
 FROM VBAK
 WHERE VBELN IN S_VBELN.
* BUKRS_VF IN S_BUKRS AND
* VKORG IN S_VKORG AND
* VKGRP IN S_VKGRP AND
* SPART IN S_SPART AND
* KUNNR IN S_KUNNR AND
* AUDAT IN S_AUDAT.
IF IT_VBAK[] IS NOT INITIAL.
SELECT POSNR MATNR KWMENG NETWR
 INTO TABLE IT_VBAP
 FROM VBAP
 FOR ALL ENTRIES IN IT_VBAK
 WHERE VBELN = IT_VBAK-VBELN.
ENDIF.
IF IT_VBAK[] IS NOT INITIAL.
SELECT VBELN LFDAT
 INTO TABLE IT_LIKP
 FROM LIKP
 FOR ALL ENTRIES IN IT_VBAK
 WHERE VBELN = IT_VBAK-VBELN.
ENDIF.
IF IT_VBAP[] IS NOT INITIAL.
SELECT POSNR LFIMG
 INTO TABLE IT_LIPS
 FROM LIPS
 FOR ALL ENTRIES IN IT_VBAP
 WHERE POSNR = IT_VBAP-POSNR.
ENDIF.
IF IT_LIKP[] IS NOT INITIAL.
SELECT VBELN
 INTO TABLE IT_VBRK
 FROM VBRK
 FOR ALL ENTRIES IN IT_LIKP
 WHERE VBELN = IT_LIKP-DELVBELN.
ENDIF.
IF IT_LIPS[] IS NOT INITIAL.
SELECT POSNR FKIMG NETWR
 INTO TABLE IT_VBRP
 FROM VBRP
 FOR ALL ENTRIES IN IT_LIPS
 WHERE POSNR = IT_LIPS-DELPOSNR.
ENDIF.
ENDFORM. " GET_DATA
Edited by: srk s on Jan 29, 2008 7:33 PM
Edited by: Alvaro Tejada Galindo on Jan 29, 2008 9:49 AM

Hi Satish,
I have started the new program but i have trouble with the final internal table. Since i'm using For all entries, I have declared internal tables for each table. My incomplete new program is as follows(not sure if the logic is correct till what I have coded):
*& Report Z_SDFLOW *
REPORT Z_SDFLOW NO STANDARD PAGE HEADING.
********* TABLES TO BE USED ***********************
**** VBAK - SALES DOCUMENT HEADER
* VBAP - SALES ITEM
* VBFA - SALES DOCUMENT FLOW
* KNA1- CUSTOMER MASTER
* VBRK - BILLING DOCUMENT HEADER
* VBRP - BLLING DOCUMENT ITEM
* LIKP - DELIVERY HEADER
* LIPS - DELIVERY ITEM
* TOO1 - COMPANY CODES
* SLIS.
TYPE-POOLS: SLIS.
** STRUCTURE DECLARATIONS ********
**STRUCTURE FOR ENQUIRY.
**STRUCTURE FOR QUOTATION.
**STRUCTURE FOR SALES ORDER HEADER- VBAK.
TYPES: BEGIN OF XT_VBAK,
VBELN TYPE VBAK-VBELN, "SALES DOCUMENT NUMBER
KUNNR TYPE VBAK-KUNNR, " SOLD-TO-PARTY
END OF XT_VBAK.
**STRUCTURE FOR SALES ORDER ITEM-VBAP
TYPES: BEGIN OF XT_VBAP,
POSNR TYPE VBAP-POSNR, " SALES ITEM NUMBER
MATNR TYPE VBAP-MATNR, " MATERIAL NUMBER
KWMENG TYPE VBAP-KWMENG, " CUMMULATIVE ORDER QUANTITY IN SALES UNITS
NETWR TYPE VBAP-NETWR, " NET VALUE OF THE ORDER ITEM
END OF XT_VBAP.
** STRUCTURE FOR DELIVERY HEADER -LIKP
TYPES: BEGIN OF XT_LIKP,
DELVBELN TYPE LIKP-VBELN, "DELIVERY DOCUMENT NUMBER
LFDAT TYPE LIKP-LFDAT, " DELIVERY DATE
END OF XT_LIKP.
**STRUCTURE FOR DELIVERY ITEM - LIPS
TYPES: BEGIN OF XT_LIPS,
DELPOSNR TYPE LIPS-POSNR, " DELIVERY ITEM NUMBER
LFIMG TYPE LIPS-LFIMG, " ACTUAL QUANTITY DELIVERED
END OF XT_LIPS.
**STRUCTURE FOR BILLING DOCUMENT HEADER -VBRK
TYPES: BEGIN OF XT_VBRK,
INVVBELN TYPE VBRK-VBELN, "BILLING DOCUMENT NUMBER
END OF XT_VBRK.
**STRUCTURE FOR BILLING DOCUMENT ITEM - VBRP
TYPES: BEGIN OF XT_VBRP,
INVPOSNR TYPE VBRP-POSNR, "BILLING ITEM NUMBER
FKIMG TYPE VBRP-FKIMG, "ACTUAL INVOICED QUANTITY
INVNETWR TYPE VBRP-NETWR, "NET VALUE OF THE BILLING ITEM
END OF XT_VBRP.
**STRUCTURE FOR FINAL INTERNAL TABLE.
TYPES: BEGIN OF XT_FINAL,
VBELN TYPE VBAK-VBELN,
DELVBELN TYPE LIKP-VBELN,
INVBELN TYPE VBRK-VBELN,
KUNNR TYPE VBAK-KUNNR,
POSNR TYPE VBAP-POSNR,
DELPOSNT TYPE LIPS-POSNR,
INVPOSNR TYPE VBRP-POSNR,
MATNR TYPE VBAP-MATNR,
KWMENG TYPE VBAP-KWMENG,
NETWR TYPE VBAP-NETWR,
INVNETWR TYPE VBRP-NETWR,
LFDAT TYPE LIKP-LFDAT,
LFIMG TYPE LIPS-LFIMG,
FKIMG TYPE VBRP-FKIMG,
NAME1 TYPE KNA1-NAME1,
END OF XT_FINAL.
**DATA DECLARATIONS
DATA: V_NAME1 TYPE KNA1-NAME1, "#EC *
 V_DELVBELN TYPE LIKP-VBELN,
 V_INVVBELN TYPE VBRK-VBELN,
 V_BUKRS TYPE T001-BUKRS, "COMPANY CODE "#EC *
 V_AUDAT TYPE VBAK-AUDAT,
 V_VKORG TYPE VBAK-VKORG,
 V_VKGRP TYPE VBAK-VKGRP,
 V_SPART TYPE VBAK-SPART.
**INTERNAL TABLE DECLARATIONS
DATA: IT_VBAK TYPE STANDARD TABLE OF XT_VBAK,
 WA_VBAK TYPE XT_VBAK,
 IT_VBAP TYPE STANDARD TABLE OF XT_VBAP,
 WA_VBAP TYPE XT_VBAP,
 IT_LIKP TYPE STANDARD TABLE OF XT_LIKP,
 WA_LIKP TYPE XT_LIKP,
 IT_LIPS TYPE STANDARD TABLE OF XT_LIPS,
 WA_LIPS TYPE XT_LIPS,
 IT_VBRK TYPE STANDARD TABLE OF XT_VBRK,
 WA_VBRK TYPE XT_VBRK,
 IT_VBRP TYPE STANDARD TABLE OF XT_VBRP,
 WA_VBRP TYPE XT_VBRP,
 IT_FINAL TYPE STANDARD TABLE OF XT_FINAL,
 WA_FINAL TYPE XT_FINAL.
**ALV DECLARATIONS
DATA: IT_FLDCAT TYPE SLIS_T_FIELDCAT_ALV,
 WA_FLDCAT TYPE SLIS_FIELDCAT_ALV,
 IT_LSTHDR TYPE SLIS_T_LISTHEADER,
 WA_LSTHDR TYPE SLIS_LISTHEADER,
 IT_EVENTS TYPE SLIS_T_EVENT,
 WA_EVENTS TYPE SLIS_ALV_EVENT,
 IT_SORT TYPE SLIS_T_SORTINFO_ALV,
 IT_LAYOUT TYPE SLIS_LAYOUT_ALV.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: S_BUKRS FOR V_BUKRS NO INTERVALS NO-EXTENSION,
 S_VBELN FOR WA_VBAK-VBELN, "SALES DOCUMENT NUMBER
 S_KUNNR FOR WA_VBAK-KUNNR, "SOLD-TO-PARTY
 S_AUDAT FOR V_AUDAT, "SALES DOCUMENT DATE
 S_VKORG FOR V_VKORG, "SALES ORGANISATION
 S_VKGRP FOR V_VKGRP, "SALES GROUP
 S_SPART FOR V_SPART. "DIVISION
SELECTION-SCREEN END OF BLOCK b1.
*****************SCREEN VALIDATION***************
AT SELECTION-SCREEN.
SELECT SINGLE BUKRS FROM T001 INTO V_BUKRS WHERE BUKRS IN S_BUKRS."#EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID COMPANY CODE'.
ENDIF.
SELECT SINGLE VBELN FROM VBAK INTO
 CORRESPONDING FIELDS OF WA_VBAK WHERE VBELN IN S_VBELN.
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER VALID SALES DOCUMENT NUMBER'.
ENDIF.
SELECT SINGLE KUNNR FROM VBAK INTO
 CORRESPONDING FIELDS OF WA_VBAK WHERE KUNNR IN S_KUNNR. "EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID CUSTOMER NUMBER'.
ENDIF.
SELECT SINGLE AUDAT FROM VBAK INTO V_AUDAT WHERE AUDAT IN S_AUDAT."#EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID SALES DOCUMENT DATE'.
ENDIF.
SELECT SINGLE VKORG FROM VBAK INTO V_VKORG WHERE VKORG IN S_VKORG."#EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID SALES ORGANISATION'.
ENDIF.
SELECT SINGLE VKGRP FROM VBAK INTO V_VKGRP WHERE VKGRP IN S_VKGRP."#EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID SALES GROUP'.
ENDIF.
SELECT SINGLE SPART FROM VBAK INTO V_SPART WHERE SPART IN S_SPART."#EC *
IF SY-SUBRC <> 0.
MESSAGE E000(Z_SD2) WITH 'ENTER A VALID SALES DIVISION'.
ENDIF.
PERFORM GET_DATA.
*& Form GET_DATA
FORM GET_DATA .
SELECT VBELN KUNNR
 INTO TABLE IT_VBAK
 FROM VBAK
 WHERE VBELN IN S_VBELN.
* BUKRS_VF IN S_BUKRS AND
* VKORG IN S_VKORG AND
* VKGRP IN S_VKGRP AND
* SPART IN S_SPART AND
* KUNNR IN S_KUNNR AND
* AUDAT IN S_AUDAT.
IF IT_VBAK[] IS NOT INITIAL.
SELECT POSNR MATNR KWMENG NETWR
 INTO TABLE IT_VBAP
 FROM VBAP
 FOR ALL ENTRIES IN IT_VBAK
 WHERE VBELN = IT_VBAK-VBELN.
ENDIF.
IF IT_VBAK[] IS NOT INITIAL.
SELECT VBELN LFDAT
 INTO TABLE IT_LIKP
 FROM LIKP
 FOR ALL ENTRIES IN IT_VBAK
 WHERE VBELN = IT_VBAK-VBELN.
ENDIF.
IF IT_VBAP[] IS NOT INITIAL.
SELECT POSNR LFIMG
 INTO TABLE IT_LIPS
 FROM LIPS
 FOR ALL ENTRIES IN IT_VBAP
 WHERE POSNR = IT_VBAP-POSNR.
ENDIF.
IF IT_LIKP[] IS NOT INITIAL.
SELECT VBELN
 INTO TABLE IT_VBRK
 FROM VBRK
 FOR ALL ENTRIES IN IT_LIKP
 WHERE VBELN = IT_LIKP-DELVBELN.
ENDIF.
IF IT_LIPS[] IS NOT INITIAL.
SELECT POSNR FKIMG NETWR
 INTO TABLE IT_VBRP
 FROM VBRP
 FOR ALL ENTRIES IN IT_LIPS
 WHERE POSNR = IT_LIPS-DELPOSNR.
ENDIF.
ENDFORM. " GET_DATA
Code Formatted by: Alvaro Tejada Galindo on Jan 29, 2008 9:48 AM

How to restrict field of BSEG using for all entries in

Hi All,
i want restrict field BSEG-UMSKZ by using for all entries in but facing some problem.can someone tell me how to use with example.If you want to see my Query is this.
SELECT: bkpf~belnr
         with_item~buzei
         bkpf~blart
         with_item~wt_acco AS lifnr
         lfa1~name1
         lfa1~stras
         lfa1~ort01
         lfa1~stcd2 AS lifntn
         lfa1~stcd1 AS lifnic
         bkpf~budat
         wt_qsshb AS dmbtr
         qsatz
         witht
         wt_withcd
         wt_qbshb
         hkont
         with_item~wt_wtexmn
   INTO CORRESPONDING FIELDS
   OF TABLE gi_accdocs
   FROM bkpf
   JOIN with_item
   ON ( with_itembukrs = bkpfbukrs AND
   with_itembelnr = bkpfbelnr AND
   with_itemgjahr = bkpfgjahr )
   JOIN lfa1
   ON ( lfa1lifnr = with_itemwt_acco )
   WHERE bkpf~bukrs EQ p_bukrs AND
   bkpf~gjahr EQ p_gjahr AND
   bkpf~budat IN s_budat AND
   bkpf~stblg EQ space AND
   wt_withcd IN s_withcd AND
   with_item~wt_acco IN s_lifnr AND
   with_item~hkont IN s_hkont AND
   bkpf~belnr IN s_belnr.
Thanks & Regards,

hi,
this is the whole coding with FOR ALL ENTRIES:
SELECT: bkpf~belnr
         with_item~buzei
         bkpf~blart
         with_item~wt_acco AS lifnr
         lfa1~name1
         lfa1~stras
         lfa1~ort01
         lfa1~stcd2 AS lifntn
         lfa1~stcd1 AS lifnic
         bkpf~budat
         wt_qsshb AS dmbtr
         qsatz
         witht
         wt_withcd
         wt_qbshb
         hkont
         with_item~wt_wtexmn
   INTO CORRESPONDING FIELDS
   OF TABLE gi_accdocs
   FROM bkpf
   JOIN with_item
   ON ( with_itembukrs = bkpfbukrs AND
   with_itembelnr = bkpfbelnr AND
   with_itemgjahr = bkpfgjahr )
   JOIN lfa1
   ON ( lfa1lifnr = with_itemwt_acco )
   WHERE bkpf~bukrs EQ p_bukrs AND
   bkpf~gjahr EQ p_gjahr AND
   bkpf~budat IN s_budat AND
   bkpf~stblg EQ space AND
   wt_withcd IN s_withcd AND
   with_item~wt_acco IN s_lifnr AND
   with_item~hkont IN s_hkont AND
   bkpf~belnr IN s_belnr.
    SELECT UMSKZ
      from BSEG
      INTO CORRESPONDING FIELDS OF TABLE gi_amount
      FOR ALL ENTRIES IN GI_MAIN
      WHERE UMSKZ NE 'F'.
Thanks & Regards.

How can i write the below code using "For all entries"

Hi
How can we write the below code using "for all entries" and need to avoid joins...
Please help
SELECT aaufnr aobjnr aauart atxjcd a~pspel
agstrp awerks carbpl cwerks
INTO TABLE t_caufv
FROM caufv AS a
INNER JOIN afih AS b
ON aaufnr = baufnr
INNER JOIN crhd AS c
ON bgewrk = cobjid
AND c~objty = 'D'
WHERE ( a~pspel = space
OR a~txjcd = space
OR NOT a~objnr IN
( select OBJNR from COBRB AS e
WHERE objnr = a~objnr ) )
AND a~werks IN s_plant
AND a~auart IN s_wtype
AND NOT a~objnr IN
( select OBJNR from JEST AS d
WHERE objnr = a~objnr
AND ( dstat = 'A0081'OR dstat = 'A0018' )
AND d~inact 'X' ).
Reward points for all helpfull answers
Thanks
Ammi.

Hi,
SELECT objnr objid aufnr
        from afih
        into table t_afih.
SELECT objnr
        from JEST
        into table t_JEST
        where stat = 'A0045'
           OR stat = 'A0046'
           AND inact 'X'.
SELECT objnr
        from COBRB
        into table t_cobrb.
SELECT arbpl werks objid objty
      from crhd
      INTO table it_crhd
      FOR ALL ENTRIES IN it_afih
      WHERE objty eq 'D'
      AND gewrk = it_afih-objid.
SELECT aufnr objnr auart txjcd pspel gstrp werks aufnr
        FROM caufv
        INTO table t_caufv
        FOR ALL ENTRIES IN it_afih
        WHERE aufnr = it_afih-aufnr
          And pspel = ' '
          AND txjcd = ' '
         ANd objnr ne it_crhd-objnr
          AND auart in s_wtype
          AND werks in s_plant.
         AND objnr ne it_jest-objnr.
dont use NE in the select statements, it may effect performance also. Instead use if statements inside
loops.
loop at t_caufv.
read table it_chrd............
if t_caufv-objnr ne it_chrd-objnr.
read table it_jest..........
   if   if t_caufv-objnr ne it_jest-objnr.
    (proceed further).
   endif.
endif.
endloop.
hope this helps.
Reward if useful.
Regards,
Anu

Left outer join using For All Entries

Similar Messages

Maybe you are looking for