- # record a AR/AP with a payment
- if ($form->round_amount($paymentamount, 2) > 0) {
- $form->{invnumber} = "";
- OP::overpayment("", $myconfig, $form, $dbh, $paymentamount, $ml, 1);
- }
-
- if ($form->round_amount($paymentamount, 2) < 0) {
- $dbh->rollback;
- $rc = 0;
- }
- if ($form->round_amount($paymentamount, 2) == 0) {
- $rc = $dbh->commit;
- }
-
- $dbh->disconnect;
-
- $main::lxdebug->leave_sub();
-
- return $rc;