|
Line 0
Link Here
|
|
|
1 |
$DBversion = 'XXX'; # will be replaced by the RM |
| 2 |
if( CheckVersion( $DBversion ) ) { |
| 3 |
|
| 4 |
$dbh->do( " |
| 5 |
CREATE TABLE IF NOT EXISTS account_debit_types ( |
| 6 |
type_code varchar(5) NOT NULL, |
| 7 |
default_amount decimal(28,6) NULL, |
| 8 |
description varchar(200) NULL, |
| 9 |
can_be_deleted tinyint NOT NULL DEFAULT '1', |
| 10 |
can_be_added_manually tinyint(4) NOT NULL DEFAULT '1', |
| 11 |
PRIMARY KEY (type_code) |
| 12 |
) COMMENT='' ENGINE='InnoDB' COLLATE 'utf8_unicode_ci' |
| 13 |
" ); |
| 14 |
|
| 15 |
$dbh->do( " |
| 16 |
CREATE TABLE IF NOT EXISTS account_credit_types ( |
| 17 |
type_code varchar(5) NOT NULL, |
| 18 |
description varchar(200) NULL, |
| 19 |
can_be_deleted tinyint NOT NULL DEFAULT '1', |
| 20 |
can_be_added_manually tinyint(4) NOT NULL DEFAULT '1', |
| 21 |
PRIMARY KEY (type_code) |
| 22 |
) COMMENT='' ENGINE='InnoDB' COLLATE 'utf8_unicode_ci' |
| 23 |
" ); |
| 24 |
|
| 25 |
$dbh->do( " |
| 26 |
INSERT IGNORE INTO account_debit_types (type_code, default_amount, description, can_be_deleted, can_be_added_manually) VALUES |
| 27 |
('A', NULL, 'Account management fee', 0, 1), |
| 28 |
('F', NULL, 'Overdue fine', 0, 1), |
| 29 |
('FU', NULL, 'Accruing overdue fine', 0, 0), |
| 30 |
('L', NULL, 'Lost item', 0, 1), |
| 31 |
('LR', NULL, 'Lost and returned', 0, 0), |
| 32 |
('M', NULL, 'Sundry', 0, 1), |
| 33 |
('N', NULL, 'New card', 0, 1), |
| 34 |
('O', NULL, 'Overdue fine', 0, 0), |
| 35 |
('Rent', NULL, 'Rental fee', 0, 1), |
| 36 |
('Rep', NULL, 'Replacement', 0, 0), |
| 37 |
('Res', NULL, 'Reserve charge', 0, 1) |
| 38 |
" ); |
| 39 |
|
| 40 |
$dbh->do( " |
| 41 |
INSERT IGNORE INTO account_debit_types (type_code, default_amount, description, can_be_deleted, can_be_added_manually) |
| 42 |
SELECT SUBSTR(authorised_value,1,5), lib, authorised_value, 1, 1 |
| 43 |
FROM authorised_values WHERE category='MANUAL_INV' |
| 44 |
" ); |
| 45 |
|
| 46 |
$dbh->do( " |
| 47 |
INSERT IGNORE INTO account_credit_types (type_code, description, can_be_deleted, can_be_added_manually) VALUES |
| 48 |
('C', 'Credit', 0, 1), |
| 49 |
('CC', 'Credit card', 0, 0), |
| 50 |
('CR', 'Refunded found lost item', 0, 0), |
| 51 |
('FFOR', 'Forgiven overdue fine', 0, 0), |
| 52 |
('FOR', 'Forgiven', 0, 1), |
| 53 |
('OL', 'Other online payment service', 0, 0), |
| 54 |
('Pay', 'Cash', 0, 0), |
| 55 |
('Pay00', 'Cash via SIP2', 0, 0), |
| 56 |
('Pay01', 'VISA via SIP2', 0, 0), |
| 57 |
('Pay02', 'Credit card via SIP2', 0, 0), |
| 58 |
('PayPa', 'PayPal', 0, 0), |
| 59 |
('W', 'Write Off', 0, 0) |
| 60 |
" ); |
| 61 |
|
| 62 |
$dbh->do( " |
| 63 |
ALTER IGNORE TABLE `accountlines` ADD `paymenttype` varchar(5) COLLATE 'utf8_unicode_ci' NULL AFTER `accounttype` |
| 64 |
" ); |
| 65 |
|
| 66 |
SetVersion( $DBversion ); |
| 67 |
print "Upgrade to $DBversion done (Bug XXXXX - description)\n"; |
| 68 |
} |