Attachment #157674 for bug #35131

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




use Modern::Perl;

return {
    bug_number  => 35131,
    description => "Add preference ShowBarcodeOnPatronRecord",
    up          => sub {
        my ($args) = @_;
        my ( $dbh, $out ) = @$args{qw(dbh out)};
        $dbh->do(
            q{
INSERT IGNORE INTO systempreferences (`variable`, `value`, `options`, `explanation`, `type` ) VALUES
('ShowBarcodeOnPatronRecord', '0', '|0|Code39|COOP2of5|EAN13|EAN8|IATA2of5|Industrial2of5|ITF|Matrix2of5|NW7|QRcode|UPCA|UPCE', 'Show a patron carnumber as a barcode on the patron record ', 'Choice')
        }
        );
        say $out "Added new system preference 'ShowBarcodeOnPatronRecord'";
    },
};

Lines 1264-1269 dd { Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/css/src/staff-global.scss (+4 lines)
1264	> div {	1264	> div {
1265	width: 100%;	1265	width: 100%;
1266	}	1266	}
		1267
		1268	#patron-barcode {
		1269	margin-left: 0.9em;
		1270	}
1267	}	1271	}
1268		1272
1269	.patroninfo-section {	1273	.patroninfo-section {

Lines 11-17 Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/includes/circ-menu.inc (-2 / +5 lines)
11	[% patron_type_class = 'is-staff' %]	11	[% patron_type_class = 'is-staff' %]
12	[% END %]	12	[% END %]
13	<div class="patroninfo [% patron_type_class \| html %]">	13	<div class="patroninfo [% patron_type_class \| html %]">
14		14	[% IF patron.cardnumber && Koha.Preference('ShowBarcodeOnPatronRecord') %]
		15	<div id="patron-barcode">
		16	<img src="/cgi-bin/koha/svc/barcode?type=[% Koha.Preference('ShowBarcodeOnPatronRecord') \| uri %]&notext=1&height=50&barcode=[% patron.cardnumber \| uri %]" alt="[% patron.cardnumber \| html %]" />
		17	</div>
		18	[% END %]
15	[% IF ( patronimages ) %]	19	[% IF ( patronimages ) %]
16	<h5 class="text-center">	20	<h5 class="text-center">
17	[% ELSE %]	21	[% ELSE %]
Lines 58-64 Link Here
58	[% IF patron.pronouns %]	62	[% IF patron.pronouns %]
59	<li class="patronpronouns">([% patron.pronouns \| html %])</li>	63	<li class="patronpronouns">([% patron.pronouns \| html %])</li>
60	[% END %]	64	[% END %]
61
62	[% PROCESS 'display-address-style' %]	65	[% PROCESS 'display-address-style' %]
63		66
64	[% IF ( patron.phone \|\| patron.mobile \|\| patron.phonepro ) %]<li class="patronphone">	67	[% IF ( patron.phone \|\| patron.mobile \|\| patron.phonepro ) %]<li class="patronphone">




           class: integer
         - days. Leave empty to disable this behavior.
         - "<br><strong>NOTE:</strong> This system preference requires the misc/cronjobs/cleanup_database.pl cronjob. Ask your system administrator to schedule it."
     -
         - "Show a "
         - pref: ShowBarcodeOnPatronRecord
           default: no
           choices:
               0: "Don't show"
               Code39: "Code39"
               COOP2of5: "COOP2of5"
               EAN13: "EAN13"
               EAN8: "EAN8"
               IATA2of5: "IATA2of5"
               Industrial2of5: "Industrial2of5"
               ITF: "ITF"
               Matrix2of5: "Matrix2of5"
               NW7: "NW7"
               QRcode: "QRcode"
               UPCA: "UPCA"
               UPCE: "UPCE"
         - " barcode of the patron record."

    Membership expiry:
     -
- 

Return to bug 35131

Lines 1-15 Link Here

(-)a/installer/data/mysql/atomicupdate/bug_35131.pl (-5 / +7 lines)
1	use Modern::Perl;	1	use Modern::Perl;
2		2
3	return {	3	return {
4	bug_number => 35131,	4	bug_number => 35131,
5	description => "Add preference ShowBarcodeOnPatronRecord",	5	description => "Add preference ShowBarcodeOnPatronRecord",
6	up => sub {	6	up => sub {
7	my ($args) = @_;	7	my ($args) = @_;
8	my ($dbh, $out) = @$args{qw(dbh out)};	8	my ( $dbh, $out ) = @$args{qw(dbh out)};
9	$dbh->do(q{	9	$dbh->do(
		10	q{
10	INSERT IGNORE INTO systempreferences (`variable`, `value`, `options`, `explanation`, `type` ) VALUES	11	INSERT IGNORE INTO systempreferences (`variable`, `value`, `options`, `explanation`, `type` ) VALUES
11	('ShowBarcodeOnPatronRecord', '0', '\|0\|Code39\|COOP2of5\|EAN13\|EAN8\|IATA2of5\|Industrial2of5\|ITF\|Matrix2of5\|NW7\|QRcode\|UPCA\|UPCE', 'Show a patron carnumber as a barcode on the patron record ', 'Choice')	12	('ShowBarcodeOnPatronRecord', '0', '\|0\|Code39\|COOP2of5\|EAN13\|EAN8\|IATA2of5\|Industrial2of5\|ITF\|Matrix2of5\|NW7\|QRcode\|UPCA\|UPCE', 'Show a patron carnumber as a barcode on the patron record ', 'Choice')
12	});	13	}
		14	);
13	say $out "Added new system preference 'ShowBarcodeOnPatronRecord'";	15	say $out "Added new system preference 'ShowBarcodeOnPatronRecord'";
14	},	16	},
15	};	17	};

Lines 125-130 Patrons: Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/patrons.pref (-1 / +19 lines)
125	class: integer	125	class: integer
126	- days. Leave empty to disable this behavior.	126	- days. Leave empty to disable this behavior.
127	- "<br><strong>NOTE:</strong> This system preference requires the misc/cronjobs/cleanup_database.pl cronjob. Ask your system administrator to schedule it."	127	- "<br><strong>NOTE:</strong> This system preference requires the misc/cronjobs/cleanup_database.pl cronjob. Ask your system administrator to schedule it."
		128	-
		129	- "Show a "
		130	- pref: ShowBarcodeOnPatronRecord
		131	default: no
		132	choices:
		133	0: "Don't show"
		134	Code39: "Code39"
		135	COOP2of5: "COOP2of5"
		136	EAN13: "EAN13"
		137	EAN8: "EAN8"
		138	IATA2of5: "IATA2of5"
		139	Industrial2of5: "Industrial2of5"
		140	ITF: "ITF"
		141	Matrix2of5: "Matrix2of5"
		142	NW7: "NW7"
		143	QRcode: "QRcode"
		144	UPCA: "UPCA"
		145	UPCE: "UPCE"
		146	- " barcode of the patron record."
128		147
129	Membership expiry:	148	Membership expiry:
130	-	149	-
131	-