switches to 90 days

things-to-search-for.txt

@@ -68,7 +68,30 @@ Merge branch into master
 Rename prod-cloud to prod everywhere
 Release again
 git push deploy master
-regenerate all sales queries
+regenerate all sales queries (clients.clj)
+
+;; update the index
+(doseq [[c]   (dc/q '[:find ?c :where [?c :client/code]] (dc/db conn))
+          :let  [_ (println "client " c)]
+          batch (->> (dc/q '[:find ?so ?d ?c
+                             :in $ ?c
+                             :where
+                             [?so :sales-order/client ?c]
+                             [?so :sales-order/date ?d]]
+                           (dc/db conn)
+                           c)
+                     (map (fn [[so d c]]
+                            {:db/id              so
+                             :sales-order/date   d
+                             :sales-order/client c}))
+                     (partition-all 1000))]
+
+    (println (count batch))
+    (print ".")
+    (flush)
+    (dc/transact conn {:tx-data batch})
+
+    )