Lines 81-88
if ( $op eq 'form' ) {
Link Here
|
81 |
for my $record_id ( uniq @record_ids ) { |
81 |
for my $record_id ( uniq @record_ids ) { |
82 |
if ( $recordtype eq 'biblio' ) { |
82 |
if ( $recordtype eq 'biblio' ) { |
83 |
# Retrieve biblio information |
83 |
# Retrieve biblio information |
84 |
my $biblio = Koha::Biblios->find( $record_id ); |
84 |
my $biblio_object = Koha::Biblios->find( $record_id ); |
85 |
unless ( $biblio ) { |
85 |
unless ( $biblio_object ) { |
86 |
push @messages, { |
86 |
push @messages, { |
87 |
type => 'warning', |
87 |
type => 'warning', |
88 |
code => 'biblio_not_exists', |
88 |
code => 'biblio_not_exists', |
Lines 90-101
if ( $op eq 'form' ) {
Link Here
|
90 |
}; |
90 |
}; |
91 |
next; |
91 |
next; |
92 |
} |
92 |
} |
93 |
my $holds_count = $biblio->holds->count; |
93 |
my $holds_count = $biblio_object->holds->count; |
94 |
$biblio = $biblio->unblessed; |
94 |
my $biblio = $biblio_object->unblessed; |
95 |
my $record = &GetMarcBiblio({ biblionumber => $record_id }); |
95 |
my $record = &GetMarcBiblio({ biblionumber => $record_id }); |
96 |
$biblio->{itemnumbers} = [Koha::Items->search({ biblionumber => $record_id })->get_column('itemnumber')]; |
96 |
$biblio->{itemnumbers} = [Koha::Items->search({ biblionumber => $record_id })->get_column('itemnumber')]; |
97 |
$biblio->{holds_count} = $holds_count; |
97 |
$biblio->{holds_count} = $holds_count; |
98 |
$biblio->{issues_count} = C4::Biblio::CountItemsIssued( $record_id ); |
98 |
$biblio->{issues_count} = C4::Biblio::CountItemsIssued( $record_id ); |
|
|
99 |
$biblio->{current_orders_count} = $biblio_object->orders->filter_by_current->count; |
100 |
$biblio->{cancelled_orders_count} = $biblio_object->orders->filter_by_cancelled->count; |
99 |
push @records, $biblio; |
101 |
push @records, $biblio; |
100 |
} else { |
102 |
} else { |
101 |
# Retrieve authority information |
103 |
# Retrieve authority information |
102 |
- |
|
|