invoice parsing fixes.

This commit is contained in:
Bryce
2023-07-28 08:15:26 -07:00
parent 529dbe393d
commit 9c6c5d8f9e
2 changed files with 12 additions and 2 deletions

View File

@@ -172,8 +172,8 @@
(map (fn [[invoice-number date due amount standard :as row]]
{:vendor-code "Performance Food Group - LEDYARD"
:invoice-number invoice-number
:date (some-> date not-empty (parse-date-fallover ["MM/dd/yyyy"]))
:due (some-> due not-empty (parse-date-fallover ["MM/dd/yyyy"]))
:date (some-> date not-empty (parse-date-fallover ["MM/dd/yy"]))
:due (some-> due not-empty (parse-date-fallover ["MM/dd/yy"]))
:total (str/replace amount #"[\$,]" "")
:text (str/join " " row)
:full-text (str/join " " row)}))