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

(-)a/t/db_dependent/Barcodes.t (-11 / +6 lines)
Lines 83-104 $schema->storage->txn_begin; Link Here
83
};
83
};
84
84
85
85
86
$schema->storage->txn_begin;
87
88
subtest 'Test generation of hbyymmincr barcodes from DB values' => sub {
86
subtest 'Test generation of hbyymmincr barcodes from DB values' => sub {
89
87
88
    $schema->storage->txn_begin;
90
    plan tests => 5;
89
    plan tests => 5;
91
90
92
    $builder->schema->resultset( 'Issue' )->delete_all;
91
    $builder->schema->resultset( 'Issue' )->delete_all;
93
    $builder->schema->resultset( 'Item' )->delete_all;
92
    $builder->schema->resultset( 'Item' )->delete_all;
94
93
95
    my$barcode_branch = $builder->build({
94
    my $branchcode_1 = "LETTERS"; #NOTE: This barcode type supports only letters in the branchcode
96
            source => 'Branch',
97
            branchcode => 'LETTERS',
98
            });
99
100
    my $branchcode_1 = "LETT";
101
    print "$branchcode_1\n";
102
    my $barcodeobj;
95
    my $barcodeobj;
103
96
104
    warnings_are { $barcodeobj = C4::Barcodes->new('hbyymmincr'); }
97
    warnings_are { $barcodeobj = C4::Barcodes->new('hbyymmincr'); }
Lines 145-150 subtest 'Test generation of hbyymmincr barcodes from DB values' => sub { Link Here
145
    $schema->storage->txn_rollback;
138
    $schema->storage->txn_rollback;
146
};
139
};
147
140
141
142
$schema->storage->txn_begin;
143
148
$builder->schema->resultset( 'Issue' )->delete_all;
144
$builder->schema->resultset( 'Issue' )->delete_all;
149
$builder->schema->resultset( 'Item' )->delete_all;
145
$builder->schema->resultset( 'Item' )->delete_all;
150
146
Lines 246-250 foreach $format (@formats) { Link Here
246
    }
242
    }
247
}
243
}
248
244
249
    $schema->storage->txn_rollback;
245
$schema->storage->txn_rollback;
250
246
251
- 

Return to bug 15878