Fixes P&L page to allow for specific locatiosn

src/clj/auto_ap/datomic/ledger.clj

@@ -98,6 +98,11 @@
                                       :where ['[?li :journal-entry-line/location ?location]]}
                               :args [(:location args)]})
 
+                (not-empty (:locations args)) 
+                (merge-query {:query {:in    ['[?location ...]]
+                                      :where ['[?li :journal-entry-line/location ?location]]}
+                              :args  [(:locations args)]})
+
                 (limited-clients (:id args))
                 (merge-query {:query {:in ['[?xx ...]]
                                       :where ['[?e :journal-entry/client ?xx]]}

src/clj/auto_ap/graphql/ledger.clj

@@ -821,6 +821,7 @@
              :bank_account_id   {:type :id}
              :date_range        {:type :date_range}
              :location          {:type 'String}
+             :locations          {:type '(list String)}
              :numeric_code      {:type '(list :numeric_code_range)}
              :start             {:type 'Int}
              :per_page          {:type 'Int}