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

(-)a/C4/Barcodes/hbyymmincr.pm (-6 / +2 lines)
Lines 29-44 use Koha::DateUtils qw( dt_from_string output_pref ); Link Here
29
29
30
use vars qw(@ISA);
30
use vars qw(@ISA);
31
use vars qw($debug $cgi_debug);	# from C4::Debug, of course
31
use vars qw($debug $cgi_debug);	# from C4::Debug, of course
32
use vars qw($branch $width);
32
our $branch = '';
33
our $width = 4;		# FIXME: 4 is too small for sizeable or multi-branch libraries.
33
34
34
BEGIN {
35
BEGIN {
35
    @ISA = qw(C4::Barcodes);
36
    @ISA = qw(C4::Barcodes);
36
}
37
}
37
38
38
INIT {
39
	$branch = '';
40
	$width = 4;		# FIXME: 4 is too small for sizeable or multi-branch libraries.
41
}
42
# Generates barcode where hb = home branch Code, yymm = year/month catalogued, incr = incremental number,
39
# Generates barcode where hb = home branch Code, yymm = year/month catalogued, incr = incremental number,
43
# 	increment resets yearly -fbcit
40
# 	increment resets yearly -fbcit
44
41
45
- 

Return to bug 16635