|
Lines 37-46
Koha::Patron - Koha Patron Object class
Link Here
|
| 37 |
|
37 |
|
| 38 |
=head1 API |
38 |
=head1 API |
| 39 |
|
39 |
|
| 40 |
=head2 Class Methods |
40 |
=head2 Class methods |
| 41 |
|
41 |
|
| 42 |
=cut |
42 |
=cut |
| 43 |
|
43 |
|
|
|
44 |
=head3 find_by_identifier |
| 45 |
|
| 46 |
my $patron = Koha::Patrons->find_by_identifier($identifier); |
| 47 |
|
| 48 |
Find a patron by either userid or cardnumber. Returns the first patron found |
| 49 |
or undef if no patron matches the identifier. |
| 50 |
|
| 51 |
This method searches first by userid, then by cardnumber if no match is found. |
| 52 |
|
| 53 |
=cut |
| 54 |
|
| 55 |
sub find_by_identifier { |
| 56 |
my ( $self, $identifier ) = @_; |
| 57 |
|
| 58 |
return unless defined $identifier && $identifier ne ''; |
| 59 |
|
| 60 |
# First try to find by userid |
| 61 |
my $patron = $self->search( { userid => $identifier } )->next; |
| 62 |
|
| 63 |
# If not found by userid, try cardnumber |
| 64 |
$patron = $self->search( { cardnumber => $identifier } )->next unless $patron; |
| 65 |
|
| 66 |
return $patron; |
| 67 |
} |
| 68 |
|
| 44 |
=head3 search_limited |
69 |
=head3 search_limited |
| 45 |
|
70 |
|
| 46 |
my $patrons = Koha::Patrons->search_limit( $params, $attributes ); |
71 |
my $patrons = Koha::Patrons->search_limit( $params, $attributes ); |
| 47 |
- |
|
|