diff --git a/src/clj/auto_ap/datomic/transactions.clj b/src/clj/auto_ap/datomic/transactions.clj
index d180438c..9b13fcae 100644
--- a/src/clj/auto_ap/datomic/transactions.clj
+++ b/src/clj/auto_ap/datomic/transactions.clj
@@ -26,7 +26,8 @@
                 :where
                 [?tx :transaction/bank-account ?ba]
                 [?tx :transaction/amount ?amount]
-                [?tx :transaction/date ?date]]
+                [?tx :transaction/date ?date]
+                (not [?tx :transaction/approval-status :transaction-approval-status/suppressed])]
               db
               (:bank-account-id args))
          (group-by (fn [[tx amount date]]