X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fpart_event_condition.pm;h=16f84fa77899cc3b6ad393c73b38e50b75dc4312;hp=200049da7a4f339bb0af9929a27a4c788d8f9dcf;hb=8d0e8149e7b19ad8543ac6c8c663be63dbc34762;hpb=a4d4d3df88b33a6db30b565921f6d62efb252351 diff --git a/FS/FS/part_event_condition.pm b/FS/FS/part_event_condition.pm index 200049da7..16f84fa77 100644 --- a/FS/FS/part_event_condition.pm +++ b/FS/FS/part_event_condition.pm @@ -1,13 +1,11 @@ package FS::part_event_condition; +use base qw( FS::option_Common ); use strict; -use vars qw( @ISA $DEBUG @SKIP_CONDITION_SQL ); +use vars qw( $DEBUG @SKIP_CONDITION_SQL ); use FS::UID qw( dbh driver_name ); -use FS::Record qw( qsearch qsearchs ); -use FS::option_Common; use FS::part_event; #for order_conditions_sql... -@ISA = qw( FS::option_Common ); # FS::Record ); $DEBUG = 0; @SKIP_CONDITION_SQL = (); @@ -354,45 +352,6 @@ sub order_conditions_sql { } -sub _upgrade_data { #class method - my ($class, %opts) = @_; - - foreach my $part_event_condition ( - qsearch('part_event_condition', { 'conditionname' => 'payby' } ) - ) { - - my $payby = $part_event_condition->option('payby'); - - if ( scalar( keys %$payby ) == 1 ) { - - if ( $payby->{'CARD'} ) { - - $part_event_condition->conditionname('has_cust_payby_auto'); - - } elsif ( $payby->{'CHEK'} ) { - - $part_event_condition->conditionname('has_cust_payby_auto'); - - } - - } elsif ( $payby->{'BILL'} && ! $payby->{'CARD'} && ! $payby->{'CHEK'} ) { - - $part_event_condition->conditionname('hasnt_cust_payby_auto'); - - } else { - - die 'Unable to automatically convert payby condition for event #'. - $part_event_condition->eventpart. "\n"; - - } - - my $error = $part_event_condition->replace; - die $error if $error; - - } - -} - =back =head1 BUGS