|
Lines 284-290
subtest 'mark_items_returned' => sub {
Link Here
|
| 284 |
}; |
284 |
}; |
| 285 |
|
285 |
|
| 286 |
subtest 'report' => sub { |
286 |
subtest 'report' => sub { |
| 287 |
plan tests => 5; |
287 |
plan tests => 7; |
| 288 |
|
288 |
|
| 289 |
my $item_1 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber } ); |
289 |
my $item_1 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber } ); |
| 290 |
my $item_2 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber } ); |
290 |
my $item_2 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber } ); |
|
Lines 297-303
subtest 'report' => sub {
Link Here
|
| 297 |
$report, |
297 |
$report, |
| 298 |
{ |
298 |
{ |
| 299 |
modified_itemnumbers => [ $item_1->itemnumber, $item_2->itemnumber ], |
299 |
modified_itemnumbers => [ $item_1->itemnumber, $item_2->itemnumber ], |
| 300 |
modified_fields => 2 |
300 |
modified_fields => 2, |
|
|
301 |
errors => [] |
| 301 |
} |
302 |
} |
| 302 |
); |
303 |
); |
| 303 |
|
304 |
|
|
Lines 308-314
subtest 'report' => sub {
Link Here
|
| 308 |
$report, |
309 |
$report, |
| 309 |
{ |
310 |
{ |
| 310 |
modified_itemnumbers => [ $item_1->itemnumber, $item_2->itemnumber ], |
311 |
modified_itemnumbers => [ $item_1->itemnumber, $item_2->itemnumber ], |
| 311 |
modified_fields => 2 |
312 |
modified_fields => 2, |
|
|
313 |
errors => [] |
| 312 |
} |
314 |
} |
| 313 |
); |
315 |
); |
| 314 |
|
316 |
|
|
Lines 320-326
subtest 'report' => sub {
Link Here
|
| 320 |
$report, |
322 |
$report, |
| 321 |
{ |
323 |
{ |
| 322 |
modified_itemnumbers => [ $item_1->itemnumber ], |
324 |
modified_itemnumbers => [ $item_1->itemnumber ], |
| 323 |
modified_fields => 1 |
325 |
modified_fields => 1, |
|
|
326 |
errors => [] |
| 324 |
} |
327 |
} |
| 325 |
); |
328 |
); |
| 326 |
|
329 |
|
|
Lines 331-337
subtest 'report' => sub {
Link Here
|
| 331 |
$report, |
334 |
$report, |
| 332 |
{ |
335 |
{ |
| 333 |
modified_itemnumbers => [ $item_1->itemnumber, $item_2->itemnumber ], |
336 |
modified_itemnumbers => [ $item_1->itemnumber, $item_2->itemnumber ], |
| 334 |
modified_fields => 4 |
337 |
modified_fields => 4, |
|
|
338 |
errors => [] |
| 335 |
} |
339 |
} |
| 336 |
); |
340 |
); |
| 337 |
|
341 |
|
|
Lines 349-358
subtest 'report' => sub {
Link Here
|
| 349 |
$report, |
353 |
$report, |
| 350 |
{ |
354 |
{ |
| 351 |
modified_itemnumbers => [ $item_1->itemnumber, $item_2->itemnumber ], |
355 |
modified_itemnumbers => [ $item_1->itemnumber, $item_2->itemnumber ], |
| 352 |
modified_fields => 7 |
356 |
modified_fields => 7, |
|
|
357 |
errors => [] |
| 358 |
} |
| 359 |
); |
| 360 |
t::lib::Mocks::mock_preference( 'PreventWithDrawingItemsStatus', 'intransit,checkedout' ); |
| 361 |
|
| 362 |
$item_2->get_from_storage->update( { onloan => '2025-01-01' } ); |
| 363 |
|
| 364 |
local $SIG{__WARN__} = sub { }; |
| 365 |
my ($report2) = $items->batch_update( { new_values => { withdrawn => 1 } } ); |
| 366 |
|
| 367 |
$items->reset; |
| 368 |
|
| 369 |
is_deeply( |
| 370 |
$report2, |
| 371 |
{ |
| 372 |
modified_itemnumbers => [ $item_1->itemnumber ], |
| 373 |
modified_fields => 1, |
| 374 |
errors => [ |
| 375 |
{ error => "Exception 'Koha::Exceptions::Item::Transfer::OnLoan' thrown 'onloan_cannot_withdraw'\n" } |
| 376 |
] |
| 353 |
} |
377 |
} |
| 354 |
); |
378 |
); |
| 355 |
|
379 |
|
|
|
380 |
my $item_3 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber } ); |
| 381 |
my $item_4 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber } ); |
| 382 |
|
| 383 |
Koha::Item::Transfer->new( |
| 384 |
{ |
| 385 |
itemnumber => $item_3->itemnumber, |
| 386 |
frombranch => $item_3->homebranch, |
| 387 |
tobranch => $builder->build( { source => 'Branch' } )->{branchcode}, |
| 388 |
datesent => '1999-01-01', |
| 389 |
} |
| 390 |
)->store; |
| 391 |
|
| 392 |
my $items2 = Koha::Items->search( { itemnumber => [ $item_3->itemnumber, $item_4->itemnumber ] } ); |
| 393 |
|
| 394 |
local $SIG{__WARN__} = sub { }; |
| 395 |
my ($report3) = $items2->batch_update( { new_values => { withdrawn => 1 } } ); |
| 396 |
|
| 397 |
$items2->reset; |
| 398 |
is_deeply( |
| 399 |
$report3, |
| 400 |
{ |
| 401 |
modified_itemnumbers => [ $item_4->itemnumber ], |
| 402 |
modified_fields => 1, |
| 403 |
errors => [ |
| 404 |
{ |
| 405 |
error => |
| 406 |
"Exception 'Koha::Exceptions::Item::Transfer::InTransit' thrown 'intransit_cannot_withdraw'\n" |
| 407 |
} |
| 408 |
] |
| 409 |
} |
| 410 |
); |
| 356 |
}; |
411 |
}; |
| 357 |
|
412 |
|
| 358 |
Koha::Caches->get_instance->clear_from_cache("MarcStructure-1-"); |
413 |
Koha::Caches->get_instance->clear_from_cache("MarcStructure-1-"); |
| 359 |
- |
|
|