View | Details | Raw Unified | Return to bug 27149
Collapse All | Expand All

(-)a/t/db_dependent/Koha/Z3950Responder/Session.t (-26 / +22 lines)
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
- 

Return to bug 27149