improvements.

src/clj/auto_ap/ssr/invoice/new_invoice_wizard.clj

@@ -277,7 +277,17 @@
                                                       "New account"))))])
      :footer
      (mm/default-step-footer linear-wizard this :validation-route ::route/new-wizard-navigate)
-                :validation-route ::route/new-wizard-navigate)))
+     :validation-route ::route/new-wizard-navigate))
+  mm/Initializable
+  (init-step-params
+   [_ request]
+   (alog/peek ::INIT {:invoice/expense-accounts [{:db/id "123"
+                                :invoice-expense-account/amount 100}]})
+   {:invoice/expense-accounts [{:db/id "123"
+                                :invoice-expense-account/location "Shared"
+                                :invoice-expense-account/account (ffirst (dc/q '[:find ?a :where [?a :account/name]]
+                                                                               (dc/db conn)))
+                                :invoice-expense-account/amount 100}]}))