Vbfa and vbrk tables invoice issue

Question

Hi friends,
Here I am facing one problem in one of my report in that i am first match delivery no with likp and vbfa table then i am take vbeln from vbfa table
like that
SELECT SINGLE *
         FROM vbfa WHERE vbelv = likp-vbeln  AND vbtyp_n = 'M'
        AND vbtyp_v = 'J' AND rfmng NE 0 AND rfwrt NE 0.
    itab2-invno = vbfa-vbeln.
Then I go in vbrk table like
IF sy-subrc = 0.
SELECT SINGLE * FROM vbrk WHERE vbeln = itab2-invno AND   fksto <> 'X'.                                             
       itab2-invdt = vbrk-fkdat .
endif.
so here its take's cancelled invoice also so I add one condition for from vbrk and add it here " fksto  'X'  ".
so my problem is that I  want to filter vbeln which have  fksto <> 'X'.
So how can I edit my code and take vbeln fvbrk.
see this code and modify it if u hv any idea.
THnaks,
Prashant.

Answer 1

Check how different was your code especially in the extraction parameters compared to the one in the above.
When you need FKSTO NE 'X' i.e Non-Cancelled document, ofcourse you can change the condition and use accordingly.
Eg: I dont have any syntax errors with the following code:
PARAMETERS: p_vbelv TYPE vbeln_vl.
DATA: l_vbeln TYPE vbeln,
      l_fkdat TYPE fkdat.
SELECT SINGLE a~vbeln b~fkdat INTO (l_vbeln, l_fkdat)
       FROM vbfa AS a
       INNER JOIN vbrk AS b
       ON a~vbeln = b~vbeln
       WHERE a~vbelv = p_vbelv "likp-vblen
       AND   a~vbtyp_n = 'M'
       AND   a~vbtyp_v = 'J'
       AND   a~rfmng NE 0
       AND   a~rfwrt NE 0
       AND   b~fksto NE 'X'.
IF sy-subrc EQ 0.
  WRITE:/ 'Billing Document:', l_vbeln,
        / 'Date:', l_fkdat.
ENDIF.