From: Mark Wells Date: Sun, 13 Oct 2013 01:45:26 +0000 (-0700) Subject: allow commissions based on setup fee, #23969, fallout from #6991 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=00d1a5be415015a90c17912304835307a8fc4e7e;p=freeside.git allow commissions based on setup fee, #23969, fallout from #6991 --- diff --git a/FS/FS/part_pkg.pm b/FS/FS/part_pkg.pm index 184f1cb9e..9ba5bb087 100644 --- a/FS/FS/part_pkg.pm +++ b/FS/FS/part_pkg.pm @@ -1539,6 +1539,17 @@ sub cust_bill_pkg_recur { $cust_bill_pkg->recur; } +=item unit_setup CUST_PKG + +Returns the setup fee for one unit of the package. + +=cut + +sub unit_setup { + my ($self, $cust_pkg) = @_; + $self->option('setup_fee') || 0; +} + =item format OPTION DATA Returns data formatted according to the function 'format' described