X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_main%2FBilling.pm;h=b710f33266308d5b46ce5b1a66327e6e2ab05677;hb=b5c4237a34aef94976bc343c8d9e138664fc3984;hp=64dd8e4cacd63a5c061b41087ab669963ef94491;hpb=adaed99f98856d3a2a72804c77ef006a0bce6cb8;p=freeside.git diff --git a/FS/FS/cust_main/Billing.pm b/FS/FS/cust_main/Billing.pm index 64dd8e4ca..b710f3326 100644 --- a/FS/FS/cust_main/Billing.pm +++ b/FS/FS/cust_main/Billing.pm @@ -897,13 +897,6 @@ sub _make_lines { || $cust_pkg->setup || $time; - if ( $DEBUG > 2 ) { - warn 'part_pkg.freq: '. $part_pkg->freq. "\n"; - warn 'cust_pkg.bill: '. $cust_pkg->getfield('bill'). "\n"; - warn "time: $time\n"; - warn "options{cancel}: $options{cancel}\n"; - } - #over two params! lets at least switch to a hashref for the rest... my $increment_next_bill = ( $part_pkg->freq ne '0' && ( $cust_pkg->getfield('bill') || 0 ) <= $time @@ -925,7 +918,7 @@ sub _make_lines { warn "calling $method on cust_pkg ". $cust_pkg->pkgnum. " for pkgpart ". $cust_pkg->pkgpart. - " with params ". join(' / ', map "$_=>$params{$_}", keys %param). "\n" + " with params ". join(' / ', map "$_=>$param{$_}", keys %param). "\n" if $DEBUG > 2; $recur = eval { $cust_pkg->$method( \$sdate, \@details, \%param ) }; @@ -1026,11 +1019,11 @@ sub _make_lines { 'freq' => $part_pkg->freq, }; - if ( $part_pkg->option('recur_temporality', 1) eq 'preceding' ) { + if ( $part_pkg->recur_temporality eq 'preceding' ) { $cust_bill_pkg->sdate( $hash{last_bill} ); $cust_bill_pkg->edate( $sdate - 86399 ); #60s*60m*24h-1 $cust_bill_pkg->edate( $time ) if $options{cancel}; - } else { #if ( $part_pkg->option('recur_temporality', 1) eq 'upcoming' ) { + } else { #if ( $part_pkg->recur_temporality eq 'upcoming' ) { $cust_bill_pkg->sdate( $sdate ); $cust_bill_pkg->edate( $cust_pkg->bill ); #$cust_bill_pkg->edate( $time ) if $options{cancel};