diff --git a/src/clj/auto_ap/background/sysco.clj b/src/clj/auto_ap/background/sysco.clj index 83ea08d6..b6df974b 100644 --- a/src/clj/auto_ap/background/sysco.clj +++ b/src/clj/auto_ap/background/sysco.clj @@ -70,6 +70,7 @@ (and customer-identifier (parse/best-match clients customer-identifier))) total (Double/parseDouble (summary-row "TotalExtendedPrice")) + tax (Double/parseDouble (summary-row "TotalTaxAmount")) date (t/parse (header-row "InvoiceDate") "yyMMdd") @@ -79,7 +80,7 @@ (log/infof "Importing %s for %s" (header-row "InvoiceNumber") (header-row "CustomerName")) [:propose-invoice (cond-> #:invoice {:invoice-number (header-row "InvoiceNumber") - :total total + :total (+ total tax) :outstanding-balance total :date (coerce/to-date date) :vendor (:db/id sysco-vendor )