Lines 17-54
$schema->storage->txn_begin;
Link Here
|
17 |
|
17 |
|
18 |
subtest 'add_item_status' => sub { |
18 |
subtest 'add_item_status' => sub { |
19 |
|
19 |
|
20 |
plan tests => 2; |
20 |
plan tests => 3; |
21 |
|
21 |
|
22 |
## FIRST ITEM HAS ALL THE STATUSES ## |
22 |
## FIRST ITEM HAS ALL THE STATUSES ## |
23 |
my $item_1 = $builder->build({ |
23 |
my $item_1 = $builder->build_sample_item({ |
24 |
source => 'Item', |
24 |
onloan => '2017-07-07', |
25 |
value => { |
25 |
itemlost => 1, |
26 |
onloan => '2017-07-07', |
26 |
notforloan => 1, |
27 |
itemlost => 1, |
27 |
damaged => 1, |
28 |
notforloan => 1, |
28 |
withdrawn => 1, |
29 |
damaged => 1, |
|
|
30 |
withdrawn => 1, |
31 |
} |
32 |
}); |
29 |
}); |
33 |
my $item_marc_1 = C4::Items::GetMarcItem( $item_1->{biblionumber}, $item_1->{itemnumber} ); |
30 |
my ( $itemtag, $itemsubfield ) = C4::Biblio::GetMarcFromKohaField( "items.itemnumber" ); |
34 |
my $item_field_1 = scalar $item_marc_1->field('952'); |
31 |
my $item_marc_1 = C4::Items::GetMarcItem( $item_1->biblionumber, $item_1->itemnumber ); |
35 |
$builder->build({ source => 'Reserve', value=> { itemnumber => $item_1->{itemnumber} } }); |
32 |
my $item_field_1 = scalar $item_marc_1->field($itemtag); |
36 |
$builder->build({ source => 'Branchtransfer', value=> { itemnumber => $item_1->{itemnumber}, datearrived => undef } }); |
33 |
$builder->build({ source => 'Reserve', value=> { itemnumber => $item_1->itemnumber } }); |
|
|
34 |
$builder->build({ source => 'Branchtransfer', value=> { itemnumber => $item_1->itemnumber, datearrived => undef } }); |
37 |
## END FIRST ITEM ## |
35 |
## END FIRST ITEM ## |
38 |
|
36 |
|
39 |
## SECOND ITEM HAS NO STATUSES ## |
37 |
## SECOND ITEM HAS NO STATUSES ## |
40 |
my $item_2 = $builder->build({ |
38 |
my $item_2 = $builder->build_sample_item({ |
41 |
source => 'Item', |
39 |
onloan => undef, |
42 |
value => { |
40 |
itemlost => 0, |
43 |
onloan => undef, |
41 |
notforloan => 0, |
44 |
itemlost => 0, |
42 |
damaged => 0, |
45 |
notforloan => 0, |
43 |
withdrawn => 0, |
46 |
damaged => 0, |
|
|
47 |
withdrawn => 0, |
48 |
} |
49 |
}); |
44 |
}); |
50 |
my $item_marc_2 = C4::Items::GetMarcItem( $item_2->{biblionumber}, $item_2->{itemnumber} ); |
45 |
my $item_marc_2 = C4::Items::GetMarcItem( $item_2->biblionumber, $item_2->itemnumber ); |
51 |
my $item_field_2 = scalar $item_marc_2->field('952'); |
46 |
my $item_field_2 = scalar $item_marc_2->field($itemtag); |
52 |
## END SECOND ITEM ## |
47 |
## END SECOND ITEM ## |
53 |
|
48 |
|
54 |
# Create the responder |
49 |
# Create the responder |
Lines 62-67
subtest 'add_item_status' => sub {
Link Here
|
62 |
$args->{HANDLE}->add_item_status($item_field_2); |
57 |
$args->{HANDLE}->add_item_status($item_field_2); |
63 |
is($item_field_2->subfield('k'),'Available',"Available status added as expected"); |
58 |
is($item_field_2->subfield('k'),'Available',"Available status added as expected"); |
64 |
|
59 |
|
|
|
60 |
is($item_field_2->subfield( $itemsubfield ), $item_2->itemnumber, "Itemnumber not removed when status added"); |
61 |
|
65 |
}; |
62 |
}; |
66 |
|
63 |
|
67 |
$schema->storage->txn_rollback; |
64 |
$schema->storage->txn_rollback; |
68 |
- |
|
|