diff options
| author | ivan <ivan> | 2008-05-30 03:55:49 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2008-05-30 03:55:49 +0000 |
| commit | 2ec94a2d96b62fd452556819eb594dea6be2c65d (patch) | |
| tree | e83274120de50aebc6c459d8bdc8068c62c52158 | |
| parent | 0182501c5e99b67911bee1f9393cd494f4e00f36 (diff) | |
1.7 sucks. add a "balance over" option to the 1.7 style agent-specific invoice send event
| -rw-r--r-- | FS/FS/cust_bill.pm | 8 | ||||
| -rwxr-xr-x | httemplate/edit/part_bill_event.cgi | 13 |
2 files changed, 20 insertions, 1 deletions
diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index 9b7c4add7..b96b09710 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -798,6 +798,9 @@ single agent) or an arrayref of agentnums. INVOICE_FROM, if specified, overrides the default email invoice From: address. +AMOUNT, if specified, only sends the invoice if the total amount owed on this +invoice and all older invoices is greater than the specified amount. + =cut sub queueable_send { @@ -828,6 +831,11 @@ sub send { ? shift : ( $self->_agent_invoice_from || $conf->config('invoice_from') ); + my $balance_over = ( scalar(@_) && $_[0] !~ /^\s*$/ ) ? shift : 0; + + return '' + unless $self->cust_main->total_owed_date($self->_date) > $balance_over; + my @invoicing_list = $self->cust_main->invoicing_list; $self->email($template, $invoice_from) diff --git a/httemplate/edit/part_bill_event.cgi b/httemplate/edit/part_bill_event.cgi index 6dd92c0fc..df09bab7a 100755 --- a/httemplate/edit/part_bill_event.cgi +++ b/httemplate/edit/part_bill_event.cgi @@ -249,7 +249,11 @@ Invoice Event #<% $hashref->{eventpart} ? $hashref->{eventpart} : "(NEW)" %> % % 'send_agent' => { % 'name' => 'Send invoice (email/print/fax) ', -% 'code' => '$cust_bill->send(\'%%%agent_templatename%%%\', [ %%%agentnum%%% ], \'%%%agent_invoice_from%%%\');', +% 'code' => '$cust_bill->send( \'%%%agent_templatename%%%\', +% [ %%%agentnum%%% ], +% \'%%%agent_invoice_from%%%\', +% %%%agent_balanceover%%% +% );', % 'html' => sub { % '<TABLE BORDER=0> % <TR> @@ -268,6 +272,13 @@ Invoice Event #<% $hashref->{eventpart} ? $hashref->{eventpart} : "(NEW)" %> % <INPUT TYPE="text" NAME="agent_invoice_from" VALUE="%%%agent_invoice_from%%%"> % </TD> % </TR> +% <TR> +% <TD ALIGN="right">if balance (this invoice and previous) over +% </TD> +% <TD> +% '. $money_char. '<INPUT TYPE="text" SIZE="7" NAME="agent_balanceover" VALUE="%%%agent_balanceover%%%"> +% </TD> +% </TR> % </TABLE>'; % }, % 'weight' => 50, |