summaryrefslogtreecommitdiff
path: root/FS/FS/part_fee.pm
diff options
context:
space:
mode:
Diffstat (limited to 'FS/FS/part_fee.pm')
-rw-r--r--FS/FS/part_fee.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/FS/FS/part_fee.pm b/FS/FS/part_fee.pm
index 186fb34..ccf1351 100644
--- a/FS/FS/part_fee.pm
+++ b/FS/FS/part_fee.pm
@@ -265,6 +265,8 @@ sub lineitem {
' FROM cust_bill_pkg WHERE billpkgnum = ?';
@item_base = map { FS::Record->scalar_sql($sql, $_->billpkgnum) }
@items;
+
+ $amount += $total_base * $self->percent / 100;
}
} else {
# the fee applies to _this_ invoice. It has no payments or credits, so
@@ -275,6 +277,8 @@ sub lineitem {
$total_base = $cust_bill->charged;
@item_base = map { $_->setup + $_->recur }
@items;
+
+ $amount += $total_base * $self->percent / 100;
}
}