X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_event%2FCondition%2Fcust_bill_past_due.pm;h=5e24acfc941ee289a296b7d1b28bbe8dfa1408fc;hb=a83f6bb859327c0ff55d6aa30e39e8a0f657be75;hp=47a90cf4ab2c984483cabe69d91220812e4d8ccd;hpb=36a9d4661fffb85b8d9ec099ee2dc0ced8991e99;p=freeside.git diff --git a/FS/FS/part_event/Condition/cust_bill_past_due.pm b/FS/FS/part_event/Condition/cust_bill_past_due.pm index 47a90cf4a..5e24acfc9 100644 --- a/FS/FS/part_event/Condition/cust_bill_past_due.pm +++ b/FS/FS/part_event/Condition/cust_bill_past_due.pm @@ -35,13 +35,14 @@ sub condition { $as_of >= ($cust_bill->due_date || $cust_bill->_date); } -sub condition_sql { - my( $class, $table, %opt ) = @_; - return 'true' if $opt{'driver_name'} ne 'Pg'; - my $delay = $class->condition_sql_option_integer('delay', 'Pg'); - my ($sec,$min,$hour,$mday,$mon,$year) = (localtime($opt{'time'}))[0..5]; - my $as_of = timelocal(0,0,0,$mday,$mon,$year) . " - ($delay * 86400)"; - "( $as_of ) >= ".FS::cust_bill->due_date_sql; -} +#->due_date_sql can't cope with agent-specific invoice_default_terms +#sub condition_sql { +# my( $class, $table, %opt ) = @_; +# return 'true' if $opt{'driver_name'} ne 'Pg'; +# my $delay = $class->condition_sql_option_integer('delay', 'Pg'); +# my ($sec,$min,$hour,$mday,$mon,$year) = (localtime($opt{'time'}))[0..5]; +# my $as_of = timelocal(0,0,0,$mday,$mon,$year) . " - ($delay * 86400)"; +# "( $as_of ) >= ".FS::cust_bill->due_date_sql; +#} 1;