diff options
-rw-r--r-- | FS/FS/part_event/Action/cust_bill_spool_csv.pm | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/FS/FS/part_event/Action/cust_bill_spool_csv.pm b/FS/FS/part_event/Action/cust_bill_spool_csv.pm index 11ecbc555..43d230033 100644 --- a/FS/FS/part_event/Action/cust_bill_spool_csv.pm +++ b/FS/FS/part_event/Action/cust_bill_spool_csv.pm @@ -20,6 +20,15 @@ sub option_fields { 'billco' => 'Billco', }, }, + 'spooldest' => { label => 'For destination', + type => 'select', + options => [ '', qw( POST EMAIL FAX ) ], + option_labels => { '' => '(all)', + 'POST' => 'Postal Mail', + 'EMAIL' => 'Email', + 'FAX' => 'Fax', + }, + }, 'spoolbalanceover' => { label => 'If balance (this invoice and previous) over', type => 'money', @@ -41,6 +50,7 @@ sub do_action { $cust_bill->spool_csv( 'format' => $self->option('spoolformat'), + 'dest' => $self->option('spooldest'), 'balanceover' => $self->option('spoolbalanceover'), 'agent_spools' => $self->option('spoolagent_spools'), ); |