Output problem in (Material doc.)

Question

Hi,
I had developed a code in which i am displaying that these are the material document of whoes payments are done to thier vendors.
my problem is that if i  execute it for no vendor it takes by default mat. doc. and displays the output.
can anyone tell me how to solve this problem. here's d code:-
***********************************WHEN MAT. DOC. ARE PAID**********************************
TABLES: BKPF,MKPF,BSAK.
DATA: BEGIN OF ITBKPF OCCURS 0,
      MBLNR LIKE MKPF-MBLNR,
      MJAHR LIKE MKPF-MJAHR,
      XBLNR LIKE MKPF-XBLNR,
      BUKRS LIKE BKPF-BUKRS,
      BELNR LIKE BKPF-BELNR,
      GJAHR LIKE BKPF-GJAHR,
      AWTYP LIKE BKPF-AWTYP,
      AWKEY LIKE BKPF-AWKEY,
      BUDAT LIKE BKPF-BUDAT,
      END OF ITBKPF.
DATA: BEGIN OF ITAB OCCURS 0,
      BELNR LIKE BSAK-BELNR,
      WRBTR LIKE BSAK-WRBTR,
      LIFNR LIKE BSAK-LIFNR,
      BUKRS LIKE BSAK-BUKRS,
      GJAHR LIKE BSAK-GJAHR,
      BUDAT LIKE BSAK-BUDAT,
      AUGBL LIKE BSAK-AUGBL,
      AUGDT LIKE BSAK-AUGDT,
      END OF ITAB.
DATA: BEGIN OF ITFINAL OCCURS 0,
      MBLNR LIKE MKPF-MBLNR,
      MJAHR LIKE MKPF-MJAHR,
      XBLNR LIKE MKPF-XBLNR,
      BELNR LIKE BSAK-BELNR,
      WRBTR LIKE BSAK-WRBTR,
      LIFNR LIKE BSAK-LIFNR,
      BUKRS LIKE BSAK-BUKRS,
      GJAHR LIKE BSAK-GJAHR,
      BUDAT LIKE BSAK-BUDAT,
      AUGBL LIKE BSAK-AUGBL,
      AUGDT LIKE BSAK-AUGDT,
      END OF ITFINAL.
      SELECT-OPTIONS: P_MBLNR FOR MKPF-MBLNR,
                      P_LIFNR FOR BSAK-LIFNR.
      SELECT BMBLNR BMJAHR BXBLNR ABUKRS ABELNR AGJAHR AAWTYP AAWKEY A~BUDAT FROM BKPF AS A
      INNER JOIN MKPF AS B ON BXBLNR = AXBLNR INTO TABLE ITBKPF
      WHERE  AAWTYP = 'MKPF' AND BXBLNR > 0 AND B~MBLNR IN P_MBLNR.
      IF NOT ITBKPF[] IS INITIAL.
      SELECT ABELNR AWRBTR ALIFNR ABUKRS AGJAHR ABUDAT  AAUGBL AAUGDT FROM BSAK AS A
      INTO TABLE ITAB
      FOR ALL ENTRIES IN ITBKPF
      WHERE ABUKRS = ITBKPF-BUKRS AND AGJAHR = ITBKPF-GJAHR AND A~LIFNR IN P_LIFNR.
      ENDIF.
      SORT  ITAB BY LIFNR.
      LOOP AT ITAB.
      READ TABLE ITBKPF WITH KEY BUKRS = ITAB-BUKRS.  " BINARY SEARCH.
      CHECK sy-subrc EQ 0.
      ITFINAL-MBLNR = ITBKPF-MBLNR.
      ITFINAL-MJAHR = ITBKPF-MJAHR.
      ITFINAL-XBLNR = ITBKPF-XBLNR.
      ITFINAL-BELNR = ITAB-BELNR.
      ITFINAL-WRBTR = ITAB-WRBTR.
      ITFINAL-LIFNR = ITAB-LIFNR.
      ITFINAL-AUGBL = ITAB-AUGBL.
      APPEND ITFINAL.
      CLEAR ITFINAL.
      ENDLOOP.
      LOOP AT ITFINAL.
      WRITE: / ITFINAL-MBLNR,ITFINAL-AUGBL,ITFINAL-MJAHR,ITFINAL-BELNR,ITFINAL-WRBTR,ITBKPF-XBLNR,ITFINAL-LIFNR.
      ENDLOOP.

Answer 1

Hi Nav ,
let me know what kind of logic do u want to put for Output , based on that i can say which one u can use .
Regards
Peram