[new-owner-report] RHS invoice amount links APAR instead of transfer

because invoices can have more than 1 non-APAR split.
This commit is contained in:
Christopher Lam 2020-01-24 22:58:06 +08:00
parent d91a9512a4
commit a9d51dd9e3

View File

@ -637,8 +637,7 @@
(gnc:make-gnc-monetary currency overpayment))
result)))))
(((inv . APAR-split) . rest)
(let* ((tfr-txn (gncInvoiceGetPostedTxn inv))
(tfr-split (txn->transfer-split tfr-txn)))
(let* ((tfr-txn (gncInvoiceGetPostedTxn inv)))
(lp rest
(cons (make-link-data
(qof-print-date (gncInvoiceGetDatePosted inv))
@ -655,7 +654,7 @@
currency (AP-negate (- (xaccSplitGetAmount APAR-split))))))
(gnc:make-html-text
(gnc:html-markup-anchor
(gnc:split-anchor-text tfr-split)
(gnc:split-anchor-text APAR-split)
(gnc:make-gnc-monetary
currency (invoice->total inv)))))
result)))))))