adds general ledger links, allows starting new.

src/clj/auto_ap/ssr/invoices.clj

@@ -496,6 +496,11 @@
                                                                                                                          {:exact-match-id (:db/id (first (:payment/transaction p)))})
                                                                                                            :color :secondary
                                                                                                            :content "Transaction"})))))
+                                                          (when (:invoice/journal-entry i)
+                                                            [{:link (hu/url (bidi/path-for client-routes/routes :ledger)
+                                                                            {:exact-match-id (:db/id (first (:invoice/journal-entry i)))})
+                                                              :color :yellow
+                                                              :content "Ledger entry"}])
                                                           (when (:invoice/source-url i)
                                                             [{:link (:invoice/source-url i)
                                                               :color :secondary