manual ledger entries delete experience

This commit is contained in:
Bryce Covert
2020-09-30 07:11:09 -07:00
parent 429b02884a
commit fc9f45b847
4 changed files with 40 additions and 7 deletions

View File

@@ -829,6 +829,11 @@
:args {:filters {:type :transaction_filters}
:ids {:type '(list :id)}}
:resolve :mutation/unapprove-transactions}
:delete_external_ledger {:type :message
:args {:filters {:type :ledger_filters}
:ids {:type '(list :id)}}
:resolve :mutation/delete-external-ledger}
:delete_transactions {:type :message
:args {:filters {:type :transaction_filters}
:ids {:type '(list :id)}}
@@ -1175,6 +1180,7 @@
:mutation/edit-invoice gq-invoices/edit-invoice
:mutation/edit-transaction gq-transactions/edit-transaction
:mutation/unapprove-transactions gq-transactions/unapprove-transactions
:mutation/delete-external-ledger gq-ledger/delete-external-ledger
:mutation/delete-transactions gq-transactions/delete-transactions
:mutation/upsert-transaction-rule gq-transaction-rules/upsert-transaction-rule
:test-transaction-rule gq-transaction-rules/test-transaction-rule

View File

@@ -205,6 +205,9 @@
(catch Exception e
(assoc entry :error (.getMessage e))))))
(defn delete-external-ledger [context args value]
)
(defn import-ledger [context args value]
(assert-admin (:id context))
(lc/with-context {:area "import ledger"}