summaryrefslogtreecommitdiff
path: root/httemplate/misc
diff options
context:
space:
mode:
authorJonathan Prykop <jonathan@freeside.biz>2015-08-28 00:56:49 -0500
committerJonathan Prykop <jonathan@freeside.biz>2015-08-28 00:56:49 -0500
commit46bbbb1a78fd822805226abea832b6206273c091 (patch)
treeaedc878b1ee1ca33f065678f61d5805b7c6d9da9 /httemplate/misc
parent76e8fffdfe3b6f6f8ab422038b62e40cc10f95e8 (diff)
RT#37064: Add action link to manually refund a payment
Diffstat (limited to 'httemplate/misc')
-rwxr-xr-xhttemplate/misc/unapply-cust_pay.cgi6
1 files changed, 2 insertions, 4 deletions
diff --git a/httemplate/misc/unapply-cust_pay.cgi b/httemplate/misc/unapply-cust_pay.cgi
index 8cdac180b..b0343d034 100755
--- a/httemplate/misc/unapply-cust_pay.cgi
+++ b/httemplate/misc/unapply-cust_pay.cgi
@@ -12,9 +12,7 @@ my $paynum = $1;
my $cust_pay = qsearchs('cust_pay', { 'paynum' => $paynum } );
my $custnum = $cust_pay->custnum;
-foreach my $cust_bill_pay ( $cust_pay->cust_bill_pay ) {
- my $error = $cust_bill_pay->delete;
- errorpage($error) if $error;
-}
+my $error = $cust_pay->delete_cust_bill_pay;
+errorpage($error) if $error;
</%init>