manual ledger entries delete experience
This commit is contained in:
@@ -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
|
||||
|
||||
@@ -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"}
|
||||
|
||||
Reference in New Issue
Block a user