[ABAP] Billing 취소 BAPI (BAPI_BILLINGDOC_CANCEL1)

🚩 코드

  DATA : LV_BILLING_DOC  TYPE BAPIVBRKSUCCESS-BILL_DOC,
         LV_BILLING_DATE TYPE BF_DATM1EB,
         LT_RETURN       TYPE TABLE OF BAPIRETURN1.


  CLEAR : GV_ERROR.

"(1) ALV에서 선택한 납품문서 번호로 취소할 빌링 문서를 찾아낸다.
  SELECT SINGLE VBRK~VBELN,  "청구문서.
                VBRK~FKDAT   "청구일
    FROM VBRK
   INNER JOIN VBRP  ON  VBRK~VBELN  EQ  VBRP~VBELN
   WHERE VBRP~VGBEL EQ 'ALV에서 선택한 납품문서'
     AND VBRK~FKSTO EQ ''          "빌링 취소 여부.
     AND VBRK~SFAKN EQ ''          "빌링 취소 문서.
     AND VBRK~VF_STATUS NE @GC_C   "빌링 상태.
    INTO ( @DATA(LV_VBELN), @DATA(LV_FKDAT) ).


  IF SY-SUBRC NE GC_0.
    GV_ERROR = GC_X.
    EXIT.
  ENDIF.


"(2) 빌링 취소 수행.
  LV_BILLING_DOC  = LV_VBELN.
  LV_BILLING_DATE = LV_FKDAT.

  CALL FUNCTION 'BAPI_BILLINGDOC_CANCEL1'
    EXPORTING
      BILLINGDOCUMENT = LV_BILLING_DOC
      BILLINGDATE     = LV_BILLING_DATE
    TABLES
      RETURN          = LT_RETURN
      SUCCESS         = PT_SUCCESS.