Problem while Fetching BSAD

Question

Hi to all ,
I' ve problem while fetching bsad for a report , in t-code se30 i've seen that it takes %89,1 performance of overall.
SELECT belnr buzei dmbtr  blart budat augdt augbl sgtxt
   into table odemelerg
          FROM bsad
          WHERE bukrs EQ bukrs
            AND kunnr EQ kunnr
            AND ( umsks EQ space OR umsks IS NULL )
            AND ( umskz EQ space OR umskz IS NULL )
            AND augbl EQ i_augbl
            AND augdt GE i_budat
            AND gjahr EQ gjahr
            AND belnr NE i_belnr
            AND bsadbelnr NE bsadaugbl
            AND ( blart EQ blart_bt OR blart EQ blart_hf
                  OR blart EQ blart_mi ).
here : blart_bt is declared as a constant type and its value is 'BT'. such as blart_hf, blart_mi
How can I make this Select query working in a better performance
Kind regards,
Caglar

Answer 1

Hi
If you know the bill number:
-1) Search FI document:
Get header data
select * from bkpf where AWTYP = 'VBRK'
                     and AWKEY = BILL NUMBER.
EXIT.
ENDSELECT.
Get items data
SELECT * FROM BSEG INTO TABLE T_BSEG
                       WHERE BUKRS = BKPF-BUKRS
                         AND BELNR = BKPF-BELNR
                         AND GJAHR = BKPF-GJAHR
                         AND KOART = 'D'.
Payment:
LOOP AT T_BSEG WHERE AUGDT <> '00000000'.
IF T_BSEG-AUGBL <> _BKPF-BELNR
    T_BSEG-AUGDT <> _BKPF-BUDAT.
SELECT * FROM BKPF INTO _BKPF
                    WHERE BUKRS = T_BSEG-BUKRS
                      AND BELNR = T_BSEG-AUGBL
                      AND BUDAT = T_BSEG-AUGDT.
   EXIT.
ENDSELECT.
SELECT * FROM BSEG APPENDING TABLE T_PAYMENT
                       WHERE BUKRS = _BKPF-BUKRS
                         AND BELNR = _BKPF-BELNR
                         AND GJAHR = _BKPF-GJAHR
                         AND KOART = 'D'.
ENDIF.
ENDLOOP.
Partial payment
SELECT * FROM BSAD INTO TABLE WHERE BUKRS = BKPF-BUKRS
                                AND KUNNR = T_BSEG-KUNNR
                                AND REBZG = BKPF-BELNR
                                AND REBZJ = BKPF-GJAHR.
Max