|
Lines 49-54
my $minlocation = $input->param('minlocation') || '';
Link Here
|
| 49 |
my $maxlocation = $input->param('maxlocation'); |
49 |
my $maxlocation = $input->param('maxlocation'); |
| 50 |
my $class_source = $input->param('class_source'); |
50 |
my $class_source = $input->param('class_source'); |
| 51 |
$maxlocation = $minlocation . 'Z' unless ( $maxlocation || !$minlocation ); |
51 |
$maxlocation = $minlocation . 'Z' unless ( $maxlocation || !$minlocation ); |
|
|
52 |
my $items_bundle = $input->param('items_bundle'); |
| 52 |
my $location = $input->param('location') || ''; |
53 |
my $location = $input->param('location') || ''; |
| 53 |
my $ignoreissued = $input->param('ignoreissued'); |
54 |
my $ignoreissued = $input->param('ignoreissued'); |
| 54 |
my $ignore_waiting_holds = $input->param('ignore_waiting_holds'); |
55 |
my $ignore_waiting_holds = $input->param('ignore_waiting_holds'); |
|
Lines 70-75
my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
Link Here
|
| 70 |
} |
71 |
} |
| 71 |
); |
72 |
); |
| 72 |
|
73 |
|
|
|
74 |
my $schema = Koha::Database->new()->schema(); |
| 75 |
my $items_bundle_rs = $schema->resultset('ItemsBundle'); |
| 76 |
my @items_bundles = $items_bundle_rs->search( |
| 77 |
undef, |
| 78 |
{ |
| 79 |
order_by => { -asc => ['biblionumber.title'] }, |
| 80 |
join => ['biblionumber'], |
| 81 |
} |
| 82 |
); |
| 73 |
my @authorised_value_list; |
83 |
my @authorised_value_list; |
| 74 |
my $authorisedvalue_categories = ''; |
84 |
my $authorisedvalue_categories = ''; |
| 75 |
|
85 |
|
|
Lines 166-171
foreach my $itemtype (@itemtypes) {
Link Here
|
| 166 |
|
176 |
|
| 167 |
$template->param( |
177 |
$template->param( |
| 168 |
authorised_values => \@authorised_value_list, |
178 |
authorised_values => \@authorised_value_list, |
|
|
179 |
items_bundles => \@items_bundles, |
| 169 |
today => dt_from_string, |
180 |
today => dt_from_string, |
| 170 |
minlocation => $minlocation, |
181 |
minlocation => $minlocation, |
| 171 |
maxlocation => $maxlocation, |
182 |
maxlocation => $maxlocation, |
|
Lines 291-296
if ( $op eq 'cud-inventory' && ( !$uploadbarcodes || $compareinv2barcd ) ) {
Link Here
|
| 291 |
minlocation => $minlocation, |
302 |
minlocation => $minlocation, |
| 292 |
maxlocation => $maxlocation, |
303 |
maxlocation => $maxlocation, |
| 293 |
class_source => $class_source, |
304 |
class_source => $class_source, |
|
|
305 |
items_bundle => $items_bundle, |
| 294 |
location => $location, |
306 |
location => $location, |
| 295 |
ignoreissued => $ignoreissued, |
307 |
ignoreissued => $ignoreissued, |
| 296 |
datelastseen => $datelastseen, |
308 |
datelastseen => $datelastseen, |
|
Lines 315-320
if (@scanned_items) {
Link Here
|
| 315 |
maxlocation => $maxlocation, |
327 |
maxlocation => $maxlocation, |
| 316 |
class_source => $class_source, |
328 |
class_source => $class_source, |
| 317 |
location => $location, |
329 |
location => $location, |
|
|
330 |
items_bundle => $items_bundle, |
| 318 |
ignoreissued => undef, |
331 |
ignoreissued => undef, |
| 319 |
datelastseen => undef, |
332 |
datelastseen => undef, |
| 320 |
branchcode => $branchcode, |
333 |
branchcode => $branchcode, |
| 321 |
- |
|
|