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

(-)a/t/db_dependent/Barcodes.t (-2 / +50 lines)
Lines 17-24 Link Here
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
20
use Test::More tests => 73;
20
use Test::More tests => 76;
21
use Test::Warn;
21
use Test::Warn;
22
use Test::MockModule;
23
use t::lib::TestBuilder;
24
25
use Koha::Database;
22
26
23
$| = 1;
27
$| = 1;
24
28
Lines 28-33 BEGIN { Link Here
28
    use_ok('C4::Barcodes');
32
    use_ok('C4::Barcodes');
29
}
33
}
30
34
35
my $schema  = Koha::Database->new->schema;
36
$schema->storage->txn_begin;
37
38
my $builder = t::lib::TestBuilder->new;
39
40
my $dbh = C4::Context->dbh;
41
42
#Test generation of annual barcodes from
43
$dbh->do(q|DELETE FROM issues|);
44
$dbh->do(q|DELETE FROM items|);
45
46
my $barcodeobj = C4::Barcodes->new('annual');
47
48
my $barcodevalue = $barcodeobj->value();
49
50
my $item_1 = $builder->build({
51
    source => 'Item',
52
    value => {
53
        barcode => $barcodevalue
54
    }
55
});
56
57
ok($barcodevalue eq $barcodeobj->db_max(), "(annual) First barcode saved to db is equal to db_max" );
58
59
$barcodevalue = $barcodeobj->next_value();
60
$barcodevalue = $barcodeobj->next_value($barcodevalue);
61
$barcodevalue = $barcodeobj->next_value($barcodevalue);
62
$barcodevalue = $barcodeobj->next_value($barcodevalue);
63
$barcodevalue = $barcodeobj->next_value($barcodevalue);
64
65
my $item_2 = $builder->build({
66
    source => 'Item',
67
    value => {
68
        barcode => $barcodevalue
69
    }
70
});
71
72
$barcodeobj = C4::Barcodes->new('annual');
73
74
ok($barcodevalue eq $barcodeobj->db_max(), '(annual) db_max should equal the greatest barcode in the db when more than 1 present');
75
ok($barcodeobj->value() gt $barcodevalue, '(annual) new barcode object should be created with value greater and last value inserted into db');
76
77
$dbh->do(q|DELETE FROM issues|);
78
$dbh->do(q|DELETE FROM items|);
79
31
my %thash = (
80
my %thash = (
32
    incremental => [],
81
    incremental => [],
33
    annual => [],
82
    annual => [],
34
- 

Return to bug 15877