1 package FS::part_event::Condition::nopostal;
2 use base qw( FS::part_event::Condition );
6 'Customer does not receive a postal mail invoice';
10 my( $self, $object ) = @_;
11 my $cust_main = $self->cust_main($object);
13 scalar( grep { $_ eq 'POST' } $cust_main->invoicing_list ) ? 0 : 1;
17 my( $self, $table ) = @_;
19 " NOT EXISTS( SELECT 1 FROM cust_main_invoice
20 WHERE cust_main_invoice.custnum = cust_main.custnum
21 AND cust_main_invoice.dest = 'POST'