Attachment #150524 for bug #33393

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




use Modern::Perl;

return {
    bug_number => "33393",
    description => "Modify sentence above the order table in English 1-page order PDF",
    up => sub {
        my ($args) = @_;
        my ($dbh, $out) = @$args{qw(dbh out)};

        $dbh->do(q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('1PageOrderPDFText', 'Order number must appear on all related correspondence, shipping papers and invoices. Notify us immediately if \n you are unable to supply item(s).', NULL, 'Text to be used above the order table in the 1-page order PDF file', 'textarea') });

        say $out "Added system preference '1PageOrderPDFText'";
    },
};

Lines 1-4 Link Here

(-)a/installer/data/mysql/mandatory/sysprefs.sql (+1 lines)
1	INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` ) VALUES	1	INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` ) VALUES
		2	('1PageOrderPDFText', 'Order number must appear on all related correspondence, shipping papers and invoices. Notify us immediately if \n you are unable to supply item(s).', NULL, 'Text to be used above the order table in the 1-page order PDF file', 'textarea'),
2	('AccessControlAllowOrigin', '', NULL, 'Set the Access-Control-Allow-Origin header to the specified value', 'Free'),	3	('AccessControlAllowOrigin', '', NULL, 'Set the Access-Control-Allow-Origin header to the specified value', 'Free'),
3	('AccountAutoReconcile','0',NULL,'If enabled, patron balances will get reconciled automatically on each transaction.','YesNo'),	4	('AccountAutoReconcile','0',NULL,'If enabled, patron balances will get reconciled automatically on each transaction.','YesNo'),
4	('AcqCreateItem','ordering','ordering\|receiving\|cataloguing','Define when the item is created : when ordering, when receiving, or in cataloguing module','Choice'),	5	('AcqCreateItem','ordering','ordering\|receiving\|cataloguing','Define when the item is created : when ordering, when receiving, or in cataloguing module','Choice'),

Lines 125-130 Acquisitions: Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/acquisitions.pref (-1 / +4 lines)
125	"pdfformat::layout3pagesfr": French 3-page	125	"pdfformat::layout3pagesfr": French 3-page
126	"pdfformat::layout2pagesde": German 2-page	126	"pdfformat::layout2pagesde": German 2-page
127	- layout when printing basket groups.	127	- layout when printing basket groups.
		128	-
		129	- "Text to be used above the order table in the 1-page order PDF file. Note: Press enter to add line breaks to your sentence"
		130	- pref: 1PageOrderPDFText
		131	type: textarea
128	EDIFACT:	132	EDIFACT:
129	-	133	-
130	- pref: EDIFACT	134	- pref: EDIFACT
131	-

Return to bug 33393

Line 0 Link Here

(-)a/installer/data/mysql/atomicupdate/bug_33393-add_1PageOrderPDFText.pl (+14 lines)
	1	use Modern::Perl;
	2
	3	return {
	4	bug_number => "33393",
	5	description => "Modify sentence above the order table in English 1-page order PDF",
	6	up => sub {
	7	my ($args) = @_;
	8	my ($dbh, $out) = @$args{qw(dbh out)};
	9
	10	$dbh->do(q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('1PageOrderPDFText', 'Order number must appear on all related correspondence, shipping papers and invoices. Notify us immediately if \n you are unable to supply item(s).', NULL, 'Text to be used above the order table in the 1-page order PDF file', 'textarea') });
	11
	12	say $out "Added system preference '1PageOrderPDFText'";
	13	},
	14	};