Enforce one-payment-per-xact-per-call user/miker/one-payment-per-xact
authorMike Rylander <mrylander@gmail.com>
Fri, 15 Nov 2013 21:40:36 +0000 (16:40 -0500)
committerMike Rylander <mrylander@gmail.com>
Fri, 15 Nov 2013 21:40:36 +0000 (16:40 -0500)
commitfbdf2c62c030e4fb08fafbcff22026b8bb3cfcd1
tree48909e36955e7c6081b2ae0ef9254e8c1ae6b90b
parent28915dd494bb0e255358581e6961e1ace60dbe7b
Enforce one-payment-per-xact-per-call

There is no legitimate reason for a transaction to receive more than
one payment per call to open-ils.circ open-ils.circ.money.payment,
but we have seen the staff client generate such a data structure. This
leads to seemingly duplicate payments, and is bad all around.  So,
we will enforce the restriction by taking only the first payment per
xact in the list of payments.

Signed-off-by: Mike Rylander <mrylander@gmail.com>
Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Money.pm