Looping over 1 document to fetch multiple invoices using "Appending"

Question

Hi gurus ,
             I'm facing a peculiar problem where in , i use the code -
  SELECT KUNNR REBZG BUDAT DMBTR gjahr XBLNR HKONT UMSKZ SHKZG AUGGJ REBZJ AUGBL
     FROM BSAD
    APPENDING CORRESPONDING FIELDS OF TABLE I_BSAD_CL
    FOR ALL ENTRIES IN I_BSAD
     WHERE kunnr IN s_kunnr
         AND   bukrs EQ p_bukrs
         AND   AUGGJ EQ i_bsad-auggj
         AND   AUGBL EQ I_BSAD-belnr
         AND   shkzg EQ 'S'
     AND ( UMSKZ EQ 'A'
         OR    UMSKZ EQ 'M'
         OR    UMSKZ EQ ' ' ).
There are 2 internal tables -
I_BSAD
I_BSAD_CL
I need to fetch multiple Invoice documents (REBZG) from BSAD table and place it in I_BSAD_CL , w.r.t. to the document numbers (BELNR) in I_BSAD internal table.
( There can be a scenario where in there r 5 invoices for 1 document number as well ).
So, to perform the task I use "appending corresponding fields of table" and "for all entries" .
Do u ppl have any other option by which i complete this task ? Because this code takes a while to execute in case of heavy data .
Thanks and Regards ,
Prithvi.
Edited by: Prithvi  Sridhar on Jun 26, 2009 1:13 PM

Answer 1

>
Rui Pedro Dantas wrote:
> Ok, then it is using the index we want.
> I just noticed that in your original code you have "IN s_kunnr" in the 2nd query, when it should be  "= I_BSAD-KUNNR" (after getting each clearing document, you already know the customer for the corresponding cleared document).
>
> Have you changed that along the way?
> Maybe you can post the code you have at this moment?
>
> Anyway, your original question was about making only one query by joining the two tables, and yes, that would be of course possible.
Oh yeah ! I can also use I_BSAD-KUNNR instead of S_KUNNR. I did the same for BUKRS as well.
Here's my fresh code -
SELECT kunnr belnr budat dmbtr augbl rebzg gjahr XBLNR HKONT BUDAT AUGDT UMSKZ SHKZG AUGGJ REBZJ PSWSL BUZEI bukrs
         FROM BSAD
         INTO CORRESPONDING FIELDS OF TABLE I_BSAD
         WHERE kunnr IN s_kunnr
         AND   bukrs EQ p_bukrs
         AND   gjahr EQ p_gjahr
         AND   budat IN s_budat
*         AND   shkzg EQ 'S'
         AND   blart EQ 'DZ'
         AND ( UMSKZ EQ 'A'
         OR    UMSKZ EQ 'M'
         OR    UMSKZ EQ ' ' )
         AND   HKONT NE '241000'
         AND   HKONT NE '241010'
         AND   HKONT NE '241020'.
*MULTIPLE INVOICES(CLEARED)
IF I_BSAD[] IS NOT INITIAL .
  SELECT KUNNR BELNR BUDAT  gjahr XBLNR HKONT UMSKZ SHKZG AUGGJ REBZJ AUGBL BUZEI
     FROM BSAD
    INTO CORRESPONDING FIELDS OF TABLE I_BSAD_CL
    FOR ALL ENTRIES IN I_BSAD
     WHERE kunnr eq i_bsad-kunnr
         AND   bukrs EQ I_BSAD-bukrs
         AND   AUGGJ EQ i_bsad-auggj
         AND   AUGBL EQ I_BSAD-belnr
         AND   PSWSL EQ I_BSAD-PSWSL
*         AND  ( GJAHR EQ I_BSAD-AUGGJ OR GJAHR EQ I_BSAD-GJAHR )
*        AND  BUDAT EQ I_BSAD-AUGDT
*         AND   AUGDT EQ I_BSAD-BUDAT
         AND   shkzg EQ 'S'
     AND ( UMSKZ EQ 'A'
         OR    UMSKZ EQ 'M'
         OR    UMSKZ EQ ' ' ).