1 package FS::part_event::Condition::hasnt_cust_payby_auto;
6 use base qw( FS::part_event::Condition );
9 'Customer does not have automatic payment information';
13 my( $self, $object ) = @_;
15 my $cust_main = $self->cust_main($object);
18 'table' => 'cust_payby',
19 'hashref' => { 'custnum' => $cust_main->custnum,
21 'extra_sql' => "AND payby IN ( 'CARD', 'CHEK' )",
22 'order_by' => 'LIMIT 1',