notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

made cloud tests work again.

Browse Source
This commit is contained in:
Bryce Covert
2023-05-01 20:21:58 -07:00
parent 721596d6f9
commit f2025c2e65
14 changed files with 62 additions and 47 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
test/clj/auto_ap/integration/graphql/accounts.clj
View File

@@ -10,7 +10,7 @@
(deftest test-account-search
(testing "It should find matching account names"
(dc/transact conn [{:account/name "Food Research"
@(dc/transact conn [{:account/name "Food Research"
:db/ident :client-specific-account
:account/numeric-code 51100
:account/search-terms "Food Research"
@@ -29,7 +29,7 @@
))
1)))
(testing "It should filter out accounts that are not allowed for clients"
(dc/transact conn [{:account/name "CLIENT SPECIFIC"
@(dc/transact conn [{:account/name "CLIENT SPECIFIC"
:db/ident :client-specific-account
:account/numeric-code 99999
:account/search-terms "CLIENTSPECIFIC"
@@ -42,7 +42,7 @@
)))
(testing "It should show up for the client specific version"
(let [client-id (-> (dc/transact conn [{:client/name "CLIENT"
(let [client-id (-> @(dc/transact conn [{:client/name "CLIENT"
:db/id "client"}
{:db/ident :client-specific-account
:account/client-overrides [{:account-client-override/client "client"
@@ -57,7 +57,7 @@
nil))))))
(testing "It should hide accounts that arent applicable"
(dc/transact conn [{:account/name "DENIED"
@(dc/transact conn [{:account/name "DENIED"
:db/ident :denied-account
:account/numeric-code 99998
:account/search-terms "DENIED"
@@ -78,7 +78,7 @@
nil)))))
(testing "It should warn when using a warn account"
(dc/transact conn [{:account/name "WARNING"
@(dc/transact conn [{:account/name "WARNING"
:db/ident :warn-account
:account/numeric-code 99997
:account/search-terms "WARNING"
@@ -100,7 +100,7 @@
:allowance :vendor}
nil))))))
(testing "It should only include admin accounts for admins"
(dc/transact conn [{:account/name "ADMINONLY"
@(dc/transact conn [{:account/name "ADMINONLY"
:db/ident :warn-account
:account/numeric-code 99997
:account/search-terms "ADMINONLY"
@@ -117,7 +117,7 @@
nil)))))
(testing "It should allow searching for vendor accounts for invoices"
(let [vendor-id (-> (dc/transact conn [{:account/name "VENDORONLY"
(let [vendor-id (-> @(dc/transact conn [{:account/name "VENDORONLY"
:db/id "vendor-only"
:db/ident :vendor-only
:account/numeric-code 99996
@@ -145,7 +145,7 @@
(deftest get-graphql
(testing "should retrieve a single account"
(dc/transact conn [{:account/numeric-code 1
@(dc/transact conn [{:account/numeric-code 1
:account/default-allowance :allowance/allowed
:account/type :account-type/asset
:account/location "A"