FI_TERMS_OF_PAYMENT_PROPOSE

*FI_TERMS_OF_PAYMENT_PROPOSE

*FI/CO インタフェースの FI サービス  支払基準日を計算

*----- 支払基準日を計算

  CALL FUNCTION 'FI_TERMS_OF_PAYMENT_PROPOSE'

    EXPORTING

      I_BLDAT         = SY-DATUM                 "伝票の伝票日付

      I_BUDAT         = BUDAT                    "伝票の転記日付

      I_ZTERM         = ZTERM                    "支払条件

    IMPORTING

      E_ZFBDT         = ZFBDT                    "期日計算の支払基準日

    EXCEPTIONS

      TERMS_NOT_FOUND = 1

      OTHERS          = 2.

  IF SY-SUBRC <> 0.

*----- システムエラー

  ENDIF.