diff options
author | Ivan Kohler <ivan@freeside.biz> | 2015-05-19 14:57:33 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2015-05-19 14:57:33 -0700 |
commit | 34c9b9f788546382cfa1164d9039876932475f7c (patch) | |
tree | 1fda3e765fb996ffe61e1fdd1743cd2f5a159328 | |
parent | a4da08852e2b5f30bbb8926ddd4310ce1f128449 (diff) |
add "skip customers without postal billing" option to invoice spool csv event, RT#35023
-rw-r--r-- | FS/FS/part_event/Action/cust_bill_spool_csv.pm | 7 |
1 files changed, 7 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 250c83042..0d84e77c4 100644 --- a/FS/FS/part_event/Action/cust_bill_spool_csv.pm +++ b/FS/FS/part_event/Action/cust_bill_spool_csv.pm @@ -33,6 +33,10 @@ sub option_fields { empty_label => '(do not upload)', order_by => 'targetnum', }, + 'skip_nopost' => { label => 'Skip customers without postal billing enabled', + type => 'checkbox', + value => 'Y', + }, ); } @@ -44,6 +48,9 @@ sub do_action { #my $cust_main = $self->cust_main($cust_bill); my $cust_main = $cust_bill->cust_main; + return if $self->option('skip_nopost') + && ! grep { $_ eq 'POST' } $cust_main->invoicing_list; + $cust_bill->spool_csv( 'time' => $cust_event->_date, 'format' => $self->option('spoolformat'), |