diff --git a/src/clj/auto_ap/graphql/clients.clj b/src/clj/auto_ap/graphql/clients.clj index 9781ebec..65335915 100644 --- a/src/clj/auto_ap/graphql/clients.clj +++ b/src/clj/auto_ap/graphql/clients.clj @@ -293,7 +293,9 @@ :in $ :where [?s :sales-order/client [:client/code \"%s\"]] +[(ground (clj-time.coerce/to-date (clj-time.core/minus (auto-ap.time/local-now) (clj-time.core/days 90)))) ?min-d] [?s :sales-order/date ?d] +[(>= ?d ?min-d)] [?s :sales-order/total ?total] [?s :sales-order/tax ?tax] [?s :sales-order/tip ?tip] @@ -311,7 +313,9 @@ :in $ :where [?s :sales-order/client [:client/code \"%s\"]] + [(ground (clj-time.coerce/to-date (clj-time.core/minus (auto-ap.time/local-now) (clj-time.core/days 90)))) ?min-d] [?s :sales-order/date ?d] + [(>= ?d ?min-d)] [?s :sales-order/line-items ?li] [?li :order-line-item/category ?n] [(get-else $ ?li :order-line-item/item-name \"\") ?n2] @@ -344,6 +348,9 @@ :where [?c :client/code \"%s\"] [?s :sales-order/client ?c] +[(ground (clj-time.coerce/to-date (clj-time.core/minus (auto-ap.time/local-now) (clj-time.core/days 90)))) ?min-d] +[?s :sales-order/date ?date] +[(>= ?date ?min-date)] [?s :sales-order/charges ?charge] [?charge :charge/type-name ?type] [?charge :charge/total ?total] @@ -351,7 +358,6 @@ [(get-else $ ?charge :charge/processor :na) ?ccp] [(get-else $ ?ccp :db/ident :na) ?p] [(name ?p) ?p2] -[?s :sales-order/date ?date] [(clj-time.coerce/to-date-time ?date) ?d2] [(auto-ap.time/localize ?d2) ?d3] [(auto-ap.time/unparse-local ?d3 auto-ap.time/normal-date) ?d4]