X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fmisc%2Fcust-part_pkg.cgi;h=9850fb017aa1d0e7cb6451721b6f16c4fd31e888;hb=e5731af379db55e629ad3ea4cd14ea53554e0595;hp=178d12e04f6750fbccb12ac476c8dd9f5f87338d;hpb=efb2486d14bb726c53a6f06e6b877352c648c2fc;p=freeside.git diff --git a/httemplate/misc/cust-part_pkg.cgi b/httemplate/misc/cust-part_pkg.cgi index 178d12e04..9850fb017 100644 --- a/httemplate/misc/cust-part_pkg.cgi +++ b/httemplate/misc/cust-part_pkg.cgi @@ -27,10 +27,18 @@ my $conf = new FS::Conf; my $date_format = $conf->config('date_format') || '%m/%d/%Y'; -my $default_start_date = $conf->exists('order_pkg-no_start-date') +my $default_start_date = $conf->exists('order_pkg-no_start_date') ? '' : $cust_main->next_bill_date; +#num_billing_pkgs may be slightly better (will allow you to fill in a start +# date in the weird edge case where you're using sync_next_bill and +# prorate_defer_bill in flat.pm and there's one-time charges hanging around +# for this customer but no active ones) +#but we don't have an easy method for that, and definitely don't want to pull +# all package objects +my $num_ncancelled_pkgs = $cust_main ? $cust_main->num_ncancelled_pkgs : 0; + my @return = map { my $start_date = $_->delay_start_date || $default_start_date; @@ -39,7 +47,9 @@ my @return = map { ( $_->pkgpart, $_->pkg_comment, $_->can_discount, - $_->can_start_date, + $_->can_start_date( + num_ncancelled_pkgs => $num_ncancelled_pkgs, + ), $start_date, ) }