Lines 913-918
sub mark_completed {
Link Here
|
913 |
my ($self) = @_; |
913 |
my ($self) = @_; |
914 |
$self->status('COMP')->store; |
914 |
$self->status('COMP')->store; |
915 |
$self->completed( dt_from_string() )->store; |
915 |
$self->completed( dt_from_string() )->store; |
|
|
916 |
$self->after_completed(); |
916 |
return { |
917 |
return { |
917 |
error => 0, |
918 |
error => 0, |
918 |
status => '', |
919 |
status => '', |
Lines 2117-2122
sub store {
Link Here
|
2117 |
return $ret; |
2118 |
return $ret; |
2118 |
} |
2119 |
} |
2119 |
|
2120 |
|
|
|
2121 |
=head3 after_completed |
2122 |
|
2123 |
$request->after_completed; |
2124 |
|
2125 |
Actions to be done after the request has been completed |
2126 |
|
2127 |
=cut |
2128 |
|
2129 |
sub after_completed { |
2130 |
my ($self) = @_; |
2131 |
|
2132 |
C4::Stats::UpdateStats( |
2133 |
{ |
2134 |
borrowernumber => $self->borrowernumber // undef, |
2135 |
branch => $self->branchcode, |
2136 |
categorycode => $self->patron ? $self->patron->categorycode : undef, |
2137 |
ccode => undef, |
2138 |
illrequest_id => $self->illrequest_id, |
2139 |
itemnumber => undef, |
2140 |
itemtype => undef, |
2141 |
location => undef, |
2142 |
type => 'illreq_comp', |
2143 |
} |
2144 |
); |
2145 |
} |
2146 |
|
2147 |
=head3 after_created |
2148 |
|
2149 |
$request->after_created; |
2150 |
|
2151 |
Actions to be done after the request has been fully created |
2152 |
|
2153 |
=cut |
2154 |
|
2155 |
sub after_created { |
2156 |
my ($self) = @_; |
2157 |
|
2158 |
C4::Stats::UpdateStats( |
2159 |
{ |
2160 |
borrowernumber => $self->borrowernumber // undef, |
2161 |
branch => $self->branchcode, |
2162 |
categorycode => $self->patron ? $self->patron->categorycode : undef, |
2163 |
ccode => undef, |
2164 |
illrequest_id => $self->illrequest_id, |
2165 |
itemnumber => undef, |
2166 |
itemtype => undef, |
2167 |
location => undef, |
2168 |
type => 'illreq_created', |
2169 |
} |
2170 |
); |
2171 |
} |
2172 |
|
2120 |
=head3 requested_partners |
2173 |
=head3 requested_partners |
2121 |
|
2174 |
|
2122 |
my $partners_string = $request->requested_partners; |
2175 |
my $partners_string = $request->requested_partners; |
2123 |
- |
|
|