Lines 42-47
use Koha::AuthorisedValues;
Link Here
|
42 |
use Koha::BiblioFrameworks; |
42 |
use Koha::BiblioFrameworks; |
43 |
use Koha::ClassSources; |
43 |
use Koha::ClassSources; |
44 |
use Koha::Items; |
44 |
use Koha::Items; |
|
|
45 |
use Koha::Item::Bundles; |
45 |
|
46 |
|
46 |
use List::MoreUtils qw( none ); |
47 |
use List::MoreUtils qw( none ); |
47 |
|
48 |
|
Lines 70-87
my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
Link Here
|
70 |
} |
71 |
} |
71 |
); |
72 |
); |
72 |
|
73 |
|
73 |
my $schema = Koha::Database->new()->schema(); |
74 |
my @item_bundles = Koha::Item::Bundles->search( |
74 |
my $item_bundles_rs = Koha::Items->search( |
75 |
{}, |
75 |
{ |
76 |
{ group_by => [ 'host' ], columns => [ 'host' ] }, |
76 |
'item_bundles_hosts.item' => { '!=' => undef }, |
77 |
)->as_list; |
77 |
}, |
|
|
78 |
{ |
79 |
join => 'item_bundles_hosts', |
80 |
group_by => 'itemnumber', |
81 |
} |
82 |
); |
83 |
|
84 |
my @item_bundles = $item_bundles_rs->as_list; |
85 |
|
78 |
|
86 |
my @authorised_value_list; |
79 |
my @authorised_value_list; |
87 |
my $authorisedvalue_categories = ''; |
80 |
my $authorisedvalue_categories = ''; |
88 |
- |
|
|