View | Details | Raw Unified | Return to bug 37901
Collapse All | Expand All

(-)a/Koha/ILL/Backend/Standard.pm (+2 lines)
Lines 1017-1022 sub add_request { Link Here
1017
    $request->extended_attributes( \@request_details_array );
1017
    $request->extended_attributes( \@request_details_array );
1018
    $request->add_unauthenticated_data( $params->{other} ) if $unauthenticated_request;
1018
    $request->add_unauthenticated_data( $params->{other} ) if $unauthenticated_request;
1019
1019
1020
    $request->after_created;
1021
1020
    return $request;
1022
    return $request;
1021
}
1023
}
1022
1024
(-)a/Koha/ILL/Request.pm (-1 / +53 lines)
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
- 

Return to bug 37901