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

(-)a/Koha/ILL/Backend/Standard.pm (+2 lines)
Lines 1000-1005 sub add_request { Link Here
1000
    } keys %{$request_details};
1000
    } keys %{$request_details};
1001
    $request->extended_attributes( \@request_details_array );
1001
    $request->extended_attributes( \@request_details_array );
1002
1002
1003
    $request->after_created;
1004
1003
    return $request;
1005
    return $request;
1004
}
1006
}
1005
1007
(-)a/Koha/ILL/Request.pm (-1 / +53 lines)
Lines 904-909 sub mark_completed { Link Here
904
    my ($self) = @_;
904
    my ($self) = @_;
905
    $self->status('COMP')->store;
905
    $self->status('COMP')->store;
906
    $self->completed( dt_from_string() )->store;
906
    $self->completed( dt_from_string() )->store;
907
    $self->after_completed();
907
    return {
908
    return {
908
        error   => 0,
909
        error   => 0,
909
        status  => '',
910
        status  => '',
Lines 2052-2057 sub store { Link Here
2052
    return $ret;
2053
    return $ret;
2053
}
2054
}
2054
2055
2056
=head3 after_completed
2057
2058
    $request->after_completed;
2059
2060
Actions to be done after the request has been completed
2061
2062
=cut
2063
2064
sub after_completed {
2065
    my ($self) = @_;
2066
2067
    C4::Stats::UpdateStats(
2068
        {
2069
            borrowernumber => $self->borrowernumber // undef,
2070
            branch         => $self->branchcode,
2071
            categorycode   => $self->patron ? $self->patron->categorycode : undef,
2072
            ccode          => undef,
2073
            illrequest_id  => $self->illrequest_id,
2074
            itemnumber     => undef,
2075
            itemtype       => undef,
2076
            location       => undef,
2077
            type           => 'illreq_comp',
2078
        }
2079
    );
2080
}
2081
2082
=head3 after_created
2083
2084
    $request->after_created;
2085
2086
Actions to be done after the request has been fully created
2087
2088
=cut
2089
2090
sub after_created {
2091
    my ($self) = @_;
2092
2093
    C4::Stats::UpdateStats(
2094
        {
2095
            borrowernumber => $self->borrowernumber // undef,
2096
            branch         => $self->branchcode,
2097
            categorycode   => $self->patron ? $self->patron->categorycode : undef,
2098
            ccode          => undef,
2099
            illrequest_id  => $self->illrequest_id,
2100
            itemnumber     => undef,
2101
            itemtype       => undef,
2102
            location       => undef,
2103
            type           => 'illreq_created',
2104
        }
2105
    );
2106
}
2107
2055
=head3 requested_partners
2108
=head3 requested_partners
2056
2109
2057
    my $partners_string = $request->requested_partners;
2110
    my $partners_string = $request->requested_partners;
2058
- 

Return to bug 37901