Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision da61b6b1

Von Moritz Bunkus vor fast 14 Jahren hinzugefügt

  • ID da61b6b19c9c0a857e55eee6e52370d811048cb0
  • Vorgänger dd04aff2
  • Nachfolger 9008f9b6

link_filter für Chart-Manager

Unterschiede anzeigen:

SL/DB/Chart.pm
3 3
use strict;
4 4

  
5 5
use SL::DB::MetaSetup::Chart;
6
use SL::DB::Manager::Chart;
6 7
use SL::DB::TaxKey;
7 8

  
8 9
__PACKAGE__->meta->add_relationships(taxkeys => { type         => 'one to many',
......
12 13
                                    );
13 14

  
14 15
__PACKAGE__->meta->initialize;
15
__PACKAGE__->meta->make_manager_class;
16 16

  
17 17
sub get_active_taxkey {
18 18
  my ($self, $date) = @_;
SL/DB/Manager/Chart.pm
1
package SL::DB::Manager::Chart;
2

  
3
use strict;
4

  
5
use SL::DB::Helper::Manager;
6
use base qw(SL::DB::Helper::Manager);
7

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

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

  
12
__PACKAGE__->make_manager_methods;
13

  
14
sub link_filter {
15
  my ($class, $link) = @_;
16

  
17
  return (or => [ link => $link,
18
                  link => { like => "${link}:\%"    },
19
                  link => { like => "\%:${link}"    },
20
                  link => { like => "\%:${link}:\%" } ]);
21
}
22

  
23
1;
24

  
25
__END__
26

  
27
=pod
28

  
29
=encoding utf8
30

  
31
=head1 NAME
32

  
33
SL::DB::Manager::Chart - Manager class for the model for the C<chart> table
34

  
35
=head1 FUNCTIONS
36

  
37
=over 4
38

  
39
=item C<link_filter $link>
40

  
41
Returns a query builder filter that matches charts whose 'C<link>'
42
field contains C<$link>. Matching is done so that the exact value of
43
C<$link> matches but not if C<$link> is only a substring of a
44
match. Therefore C<$link = 'AR'> will match the column content 'C<AR>'
45
or 'C<AR_paid:AR>' but not 'C<AR_amount>'.
46

  
47
=back
48

  
49
=head1 BUGS
50

  
51
Nothing here yet.
52

  
53
=head1 AUTHOR
54

  
55
Moritz Bunkus E<lt>m.bunkus@linet-services.deE<gt>
56

  
57
=cut

Auch abrufbar als: Unified diff