1 package Koha
::Club
::Enrollment
;
3 # Copyright ByWater Solutions 2014
5 # This file is part of Koha.
7 # Koha is free software; you can redistribute it and/or modify it under the
8 # terms of the GNU General Public License as published by the Free Software
9 # Foundation; either version 3 of the License, or (at your option) any later
12 # Koha is distributed in the hope that it will be useful, but WITHOUT ANY
13 # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
14 # A PARTICULAR PURPOSE. See the GNU General Public License for more details.
16 # You should have received a copy of the GNU General Public License along
17 # with Koha; if not, write to the Free Software Foundation, Inc.,
18 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
27 use Koha
::DateUtils
qw(dt_from_string);
30 use base
qw(Koha::Object);
34 Koha::Club::Enrollment
36 Represents a "pattern" on which many clubs can be created.
37 In this way we can directly compare different clubs of the same 'template'
38 for statistical purposes.
53 $self->_result()->update( { date_canceled
=> \'NOW
()' } );
64 return scalar Koha::Clubs->find( $self->club_id() );
73 return scalar Koha::Patrons->find( $self->borrowernumber() );
78 Determines if enrollment is canceled
85 return 0 unless $self->date_canceled;
86 my $today = dt_from_string;
87 my $date_canceled = dt_from_string( $self->date_canceled );
89 return DateTime->compare($date_canceled, $today) < 1;
97 return 'ClubEnrollment
';
102 Kyle M Hall <kyle@bywatersolutions.com>