=item calc_setup CUST_PKG START_DATE DETAILS_ARRAYREF OPTIONS_HASHREF
-=item calc_recur CUST_PKG START_DATE DETAILS_ARRAYREF OPTIONS_HASHREF
+=item calc_recur CUST_PKG START_DATE_SCALARREF DETAILS_ARRAYREF OPTIONS_HASHREF
Calculates and returns the setup or recurring fees, respectively, for this
package. Implementation is in the FS::part_pkg:* module specific to this price
}
sub base_setup {
- my($self, $cust_pkg, $sdate, $details, $param ) = @_;
+ my($self, $cust_pkg, $time, $details, $param ) = @_;
- $self->calc_currency_option('setup_fee', $cust_pkg, $sdate, $details, $param);
+ $self->calc_currency_option('setup_fee', $cust_pkg, $time, $details, $param);
}
sub calc_setup {
- my($self, $cust_pkg, $sdate, $details, $param) = @_;
+ my($self, $cust_pkg, $time, $details, $param) = @_;
- return 0 if $self->prorate_setup($cust_pkg, $sdate);
+ return 0 if $self->prorate_setup($cust_pkg, $time);
- $self->base_setup($cust_pkg, $sdate, $details, $param);
+ $self->base_setup($cust_pkg, $time, $details, $param);
}
use FS::Conf;
sub calc_currency_option {
- my($self, $optionname, $cust_or_quotation_pkg, $sdate, $details, $param) = @_;
+ my($self, $optionname, $cust_or_quotation_pkg, $time, $details, $param) = @_;
my($currency, $amount) =
$cust_or_quotation_pkg->part_pkg_currency_option($optionname);