Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 0c227fb2

Von Moritz Bunkus vor etwa 5 Jahren hinzugefügt

Schnellsuche für Verkaufs- & Einkaufslieferscheine

Unterschiede anzeigen:

SL/DB/Manager/DeliveryOrder.pm
6 6 

  		




  7
  7
  
    
use SL::DB::Helper::Paginated;


  		




  8
  8
  
    
use SL::DB::Helper::Sorted;


  		




  
  9
  
    
use SL::DB::Helper::Filtered;


  		




  9
  10
  
    

  		




  10
  11
  
    
sub object_class { 'SL::DB::DeliveryOrder' }


  		




  11
  12
  
    

  		




  12
  13
  
    
__PACKAGE__->make_manager_methods;


  		




  13
  14
  
    

  		




  
  15
  
    
__PACKAGE__->add_filter_specs(


  		




  
  16
  
    
  type => sub {


  		




  
  17
  
    
    my ($key, $value, $prefix) = @_;


  		




  
  18
  
    
    return __PACKAGE__->type_filter($value, $prefix);


  		




  
  19
  
    
  },


  		




  
  20
  
    
  all => sub {


  		




  
  21
  
    
    my ($key, $value, $prefix) = @_;


  		




  
  22
  
    
    return or => [ map { $prefix . $_ => $value } qw(donumber customer.name vendor.name transaction_description orderitems.serialnumber) ]


  		




  
  23
  
    
  }


  		




  
  24
  
    
);


  		




  
  25
  
    

  		




  14
  26
  
    
sub type_filter {


  		




  15
  27
  
    
  my $class = shift;


  		




  16
  28
  
    
  my $type  = lc(shift || '');


  		












Auch abrufbar als:  Unified diff