| Lines 177-186
          sub SearchSuggestion {
      
      
        Link Here | 
        
          | 177 |     foreach my $field (qw( suggesteddate manageddate accepteddate )) { | 177 |     foreach my $field (qw( suggesteddate manageddate accepteddate )) { | 
        
          | 178 |         my $from = $field . "_from"; | 178 |         my $from = $field . "_from"; | 
        
          | 179 |         my $to   = $field . "_to"; | 179 |         my $to   = $field . "_to"; | 
            
              |  |  | 180 |         my $from_dt; | 
            
              | 181 |         $from_dt = eval { dt_from_string( $suggestion->{$from} ) } if ( $suggestion->{$from} ); | 
            
              | 182 |         my $from_sql = '0000-00-00'; | 
            
              | 183 |         $from_sql = output_pref({ dt => $from_dt, dateformat => 'iso', dateonly => 1 }) | 
            
              | 184 |             if ($from_dt); | 
            
              | 185 |         $debug && warn "SQL for start date ($field): $from_sql"; | 
        
          | 180 |         if ( $suggestion->{$from} || $suggestion->{$to} ) { | 186 |         if ( $suggestion->{$from} || $suggestion->{$to} ) { | 
        
          | 181 |             push @query, qq{ AND suggestions.$field BETWEEN ? AND ? }; | 187 |             push @query, qq{ AND suggestions.$field BETWEEN ? AND ? }; | 
          
            
              | 182 |             push @sql_params, | 188 |             push @sql_params, $from_sql; | 
            
              | 183 |               output_pref({ dt => dt_from_string( $suggestion->{$from} ), dateformat => 'iso', dateonly => 1 }) || '0000-00-00'; |  |  | 
        
          | 184 |             push @sql_params, | 189 |             push @sql_params, | 
        
          | 185 |               output_pref({ dt => dt_from_string( $suggestion->{$to} ), dateformat => 'iso', dateonly => 1 }) || output_pref({ dt => dt_from_string, dateformat => 'iso', dateonly => 1 }); | 190 |               output_pref({ dt => dt_from_string( $suggestion->{$to} ), dateformat => 'iso', dateonly => 1 }) || output_pref({ dt => dt_from_string, dateformat => 'iso', dateonly => 1 }); | 
        
          | 186 |         } | 191 |         } | 
            
              | 187 | -  |  |  |