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

(-)a/Koha/Illrequest.pm (-5 / +3 lines)
Lines 39-45 use Koha::Biblios; Link Here
39
use Koha::Items;
39
use Koha::Items;
40
use Koha::ItemTypes;
40
use Koha::ItemTypes;
41
use Koha::Libraries;
41
use Koha::Libraries;
42
use C4::Items qw( AddItem );
43
use C4::Circulation qw( CanBookBeIssued AddIssue  );
42
use C4::Circulation qw( CanBookBeIssued AddIssue  );
44
43
45
use base qw(Koha::Object);
44
use base qw(Koha::Object);
Lines 1166-1180 sub check_out { Link Here
1166
        my $itemnumber;
1165
        my $itemnumber;
1167
        if ($item_count == 0) {
1166
        if ($item_count == 0) {
1168
            my $item_hash = {
1167
            my $item_hash = {
1168
                biblionumber  => $self->biblio_id,
1169
                homebranch    => $params->{branchcode},
1169
                homebranch    => $params->{branchcode},
1170
                holdingbranch => $params->{branchcode},
1170
                holdingbranch => $params->{branchcode},
1171
                location      => $params->{branchcode},
1171
                location      => $params->{branchcode},
1172
                itype         => $params->{item_type},
1172
                itype         => $params->{item_type},
1173
                barcode       => 'ILL-' . $self->illrequest_id
1173
                barcode       => 'ILL-' . $self->illrequest_id
1174
            };
1174
            };
1175
            my (undef, undef, $item_no) =
1175
            my $item = Koha::Item->new($item_hash);
1176
                AddItem($item_hash, $self->biblio_id);
1176
            $itemnumber = $item->itemnumber;
1177
            $itemnumber = $item_no;
1178
        } else {
1177
        } else {
1179
            $itemnumber = $items[0]->itemnumber;
1178
            $itemnumber = $items[0]->itemnumber;
1180
        }
1179
        }
1181
- 

Return to bug 23463