1 package FS::part_event::Condition::cust_status;
5 use base qw( FS::part_event::Condition );
6 use FS::Record qw( qsearch );
15 'status' => { 'label' => 'Customer Status',
16 'type' => 'select-cust_main-status',
23 my( $self, $object) = @_;
25 my $cust_main = $self->cust_main($object);
28 my $hashref = $self->option('status') || {};
29 $hashref->{ $cust_main->status };
33 my( $self, $table ) = @_;
35 '('.FS::cust_main->cust_status_sql . ') IN '.
36 $self->condition_sql_option_option('status');