# add phone message transport type
$dbh->do("INSERT INTO message_transport_types (message_transport_type) VALUES ('phone')");
-# adds HOLD_PHONE and PREDUE_PHONE letters (as placeholders)
-$dbh->do("INSERT INTO letter (module, code, name, title, content) VALUES
- ('reserves', 'HOLD_PHONE', 'Item Available for Pick-up (phone notice)', 'Item Available for Pick-up (phone notice)', 'Your item is available for pickup'),
- ('circulation', 'PREDUE_PHONE', 'Advance Notice of Item Due (phone notice)', 'Advance Notice of Item Due (phone notice)', 'Your item is due soon'),
- ('circulation', 'OVERDUE_PHONE', 'Overdue Notice (phone notice)', 'Overdue Notice (phone notice)', 'Your item is overdue')
+# adds HOLD and PREDUE letters (as placeholders)
+$dbh->do("INSERT INTO letter (module, code, name, title, content, message_transport_type) VALUES
+ ('reserves', 'HOLD', 'Item Available for Pick-up (phone notice)', 'Item Available for Pick-up (phone notice)', 'Your item is available for pickup', 'phone'),
+ ('circulation', 'PREDUE', 'Advance Notice of Item Due (phone notice)', 'Advance Notice of Item Due (phone notice)', 'Your item is due soon', 'phone'),
+ ('circulation', 'OVERDUE', 'Overdue Notice (phone notice)', 'Overdue Notice (phone notice)', 'Your item is overdue', 'phone')
");
# add phone notifications to patron message preferences options
$dbh->do("INSERT INTO message_transports
(message_attribute_id, message_transport_type, is_digest, letter_module, letter_code) VALUES
- (4, 'phone', 0, 'reserves', 'HOLD_PHONE'),
- (2, 'phone', 0, 'circulation', 'PREDUE_PHONE')
+ (4, 'phone', 0, 'reserves', 'HOLD'),
+ (2, 'phone', 0, 'circulation', 'PREDUE')
");
# add TalkingTechItivaPhoneNotification syspref
}
+
+
+
+$DBversion = "3.15.00.XXX";
+if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
+ $dbh->do(q|
+ UPDATE letter
+ SET code="HOLD",
+ message_transport_type="phone",
+ name=(SELECT name FROM ( SELECT name FROM letter WHERE code="HOLD" LIMIT 1 ) AS t)
+ WHERE code="HOLD_PHONE"
+ |);
+
+ $dbh->do(q|
+ UPDATE letter
+ SET code="PREDUE",
+ message_transport_type="phone",
+ name=(SELECT name FROM ( SELECT name FROM letter WHERE code="HOLD" LIMIT 1 ) AS t)
+ WHERE code="PREDUE_PHONE"
+ |);
+
+ $dbh->do(q|
+ UPDATE letter
+ SET code="OVERDUE",
+ message_transport_type="phone",
+ name=(SELECT name FROM ( SELECT name FROM letter WHERE code="HOLD" LIMIT 1 ) AS t)
+ WHERE code="OVERDUE_PHONE"
+ |);
+
+ print "Upgrade to $DBversion done (Bug 11867: Update letters *_PHONE)\n";
+ SetVersion($DBversion);
+}
+
=head1 FUNCTIONS
=head2 TableExists($table)