Added new vendors
This commit is contained in:
@@ -55,12 +55,12 @@
|
|||||||
{:vendor "Southbay Fresh Produce"
|
{:vendor "Southbay Fresh Produce"
|
||||||
:keywords [#"SOUTH BAY FRESH PRODUCE"]
|
:keywords [#"SOUTH BAY FRESH PRODUCE"]
|
||||||
:extract {:date #"^([0-9]+/[0-9]+/[0-9]+)"
|
:extract {:date #"^([0-9]+/[0-9]+/[0-9]+)"
|
||||||
:customer-identifier #"FAX:[^\n]+\n\s+([A-Za-z ]+)\s{2}"
|
:customer-identifier #"To:[^\n]*\n\s+([A-Za-z' ]+)\s{2}"
|
||||||
:invoice-number #"^[0-9]+/[0-9]+/[0-9]+\s+(\d+)"
|
:invoice-number #"INV #\/(\d+)"
|
||||||
:total #"\$([0-9.]+)"}
|
:total #"\$([0-9.]+)\."}
|
||||||
:parser {:date [:clj-time "MM/dd/yyyy"]}
|
:parser {:date [:clj-time "MM/dd/yyyy"]}
|
||||||
:multi #"\n"
|
:multi #"\n"
|
||||||
:multi-match? #"^[0-9]+/[0-9]+/[0-9]+\s+(\d+)"}
|
:multi-match? #"^[0-9]+/[0-9]+/[0-9]+\s+INV "}
|
||||||
{:vendor "Performance Food Group - LEDYARD"
|
{:vendor "Performance Food Group - LEDYARD"
|
||||||
:keywords [#"performancefoodservice"]
|
:keywords [#"performancefoodservice"]
|
||||||
:extract {:date #"DELIVER TO[^\n]+\n.+?(?=[0-9]+/[0-9]+/[0-9]+)([0-9]+/[0-9]+/[0-9]+)"
|
:extract {:date #"DELIVER TO[^\n]+\n.+?(?=[0-9]+/[0-9]+/[0-9]+)([0-9]+/[0-9]+/[0-9]+)"
|
||||||
@@ -89,6 +89,15 @@
|
|||||||
:invoice-number #"Invoice No: ([^\n]+)\n"
|
:invoice-number #"Invoice No: ([^\n]+)\n"
|
||||||
:total #" Total:\s+([\d\.]+)"}
|
:total #" Total:\s+([\d\.]+)"}
|
||||||
:parser {:date [:clj-time "MMM dd, yyyy"]}}
|
:parser {:date [:clj-time "MMM dd, yyyy"]}}
|
||||||
|
{:vendor "A&B Produce"
|
||||||
|
:keywords [#"ABProduce"]
|
||||||
|
:extract {:date #"^\s+([0-9]+/[0-9]+/[0-9]+)"
|
||||||
|
:customer-identifier #"BILL TO:[^\n]+\n[^\n]+\n[^\n]+\n(.*)\s{2,}"
|
||||||
|
:invoice-number #"(\d+)\s+INV"
|
||||||
|
:total #" INV\s+([\d\.]+)"}
|
||||||
|
:parser {:date [:clj-time "MM/dd/yyyy"]}
|
||||||
|
:multi #"\n"
|
||||||
|
:multi-match? #"^\s+[0-9]+/[0-9]+/[0-9]+\s+\d+\s+INV\s+"}
|
||||||
{:vendor "Performance Food Group - ROMA"
|
{:vendor "Performance Food Group - ROMA"
|
||||||
:keywords [#"Performance Food Group, Inc\n\f"]
|
:keywords [#"Performance Food Group, Inc\n\f"]
|
||||||
:extract {:date #"Date: ([0-9]+/[0-9]+/[0-9]+)"
|
:extract {:date #"Date: ([0-9]+/[0-9]+/[0-9]+)"
|
||||||
|
|||||||
@@ -160,6 +160,21 @@
|
|||||||
(recur (concat transactions transaction-batch) (+ batch-size skip))
|
(recur (concat transactions transaction-batch) (+ batch-size skip))
|
||||||
transactions)))))
|
transactions)))))
|
||||||
|
|
||||||
|
(defn count-specific-transactions [account]
|
||||||
|
(let [cob-session (login-cobrand)
|
||||||
|
user-session (login-user cob-session)]
|
||||||
|
|
||||||
|
(-> (str (:yodlee-base-url env) "/transactions/count?accountId=" account)
|
||||||
|
(doto println)
|
||||||
|
|
||||||
|
(client/get {:headers (doto
|
||||||
|
(merge base-headers {"Authorization" (auth-header cob-session user-session)})
|
||||||
|
println)
|
||||||
|
:as :json})
|
||||||
|
:body
|
||||||
|
:transaction
|
||||||
|
)))
|
||||||
|
|
||||||
(defn get-access-token []
|
(defn get-access-token []
|
||||||
(let [cob-session (login-cobrand)
|
(let [cob-session (login-cobrand)
|
||||||
user-session (login-user cob-session)
|
user-session (login-user cob-session)
|
||||||
|
|||||||
Reference in New Issue
Block a user