projekt kivitendo

package SL::DB::Manager::PartClassification;

use strict;

use parent qw(SL::DB::Helper::Manager);

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

sub object_class { 'SL::DB::PartClassification' }

__PACKAGE__->make_manager_methods;

sub classification_filter {

  my ($class, $classification, $prefix) = @_;

  return () unless $classification;

  $prefix //= '';

  my @classifications = grep { $_ } listify($classification);

  return ( $prefix . 'classification_id' => \@classifications );

}

1;

__END__

=encoding utf-8

=head1 NAME

SL::DB::Manager::PartClassification

=cut