Lines 2009-2014
possibly records the fact that something happened
Link Here
|
2009 |
sub store { |
2009 |
sub store { |
2010 |
my ( $self, $attrs ) = @_; |
2010 |
my ( $self, $attrs ) = @_; |
2011 |
|
2011 |
|
|
|
2012 |
my $is_new_request = !$self->in_storage; |
2012 |
my %updated_columns = $self->_result->get_dirty_columns; |
2013 |
my %updated_columns = $self->_result->get_dirty_columns; |
2013 |
|
2014 |
|
2014 |
my @holds; |
2015 |
my @holds; |
Lines 2049-2054
sub store {
Link Here
|
2049 |
); |
2050 |
); |
2050 |
} |
2051 |
} |
2051 |
|
2052 |
|
|
|
2053 |
return $ret unless $is_new_request; |
2054 |
|
2055 |
C4::Stats::UpdateStats( |
2056 |
{ |
2057 |
borrowernumber => $self->borrowernumber // undef, |
2058 |
branch => $self->branchcode, |
2059 |
categorycode => $self->patron ? $self->patron->categorycode : undef, |
2060 |
ccode => undef, |
2061 |
illrequest_id => $self->illrequest_id, |
2062 |
itemnumber => undef, |
2063 |
itemtype => undef, |
2064 |
location => undef, |
2065 |
type => 'ill_request', |
2066 |
} |
2067 |
); |
2068 |
|
2052 |
return $ret; |
2069 |
return $ret; |
2053 |
} |
2070 |
} |
2054 |
|
2071 |
|
2055 |
- |
|
|