沖銷已過賬外向交貨單
阿新 • • 發佈:2019-01-02
*&---------------------------------------------------------------------*
*& Form reverse_goodsissue
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM REVERSE_GOODSISSUE .
DATA : LV_VBTYP LIKE LIKP-VBTYP.
SELECT SINGLE VBTYP "SD 憑證類別
FROM LIKP
INTO LV_VBTYP
WHERE VBELN = P_VBELN.
CALL FUNCTION 'WS_REVERSE_GOODS_ISSUE'
EXPORTING
I_VBELN = P_VBELN
I_BUDAT = SY-DATUM
I_TCODE = 'VL09'
I_VBTYP = LV_VBTYP "SD 憑證類別