|
Lines 9585-9590
if ( CheckVersion($DBversion) ) {
Link Here
|
| 9585 |
SetVersion ($DBversion); |
9585 |
SetVersion ($DBversion); |
| 9586 |
} |
9586 |
} |
| 9587 |
|
9587 |
|
|
|
9588 |
$DBversion = "3.19.00.XXX"; |
| 9589 |
if ( CheckVersion($DBversion) ) { |
| 9590 |
$dbh->do(q{ |
| 9591 |
INSERT INTO letter ( module, code, branchcode, name, is_html, title, content, message_transport_type ) |
| 9592 |
VALUES ( 'circulation', 'OVERDUES_SLIP', '', 'Overdues Slip', '0', 'OVERDUES_SLIP', 'The following item(s) is/are currently overdue: |
| 9593 |
|
| 9594 |
<item>"<<biblio.title>>" by <<biblio.author>>, <<items.itemcallnumber>>, Barcode: <<items.barcode>> Fine: <<items.fine>></item> |
| 9595 |
', 'print' ) |
| 9596 |
}); |
| 9597 |
print "Upgrade to $DBversion done (Bug 12933 - Add ability to print overdue slip from staff intranet)\n"; |
| 9598 |
SetVersion ($DBversion); |
| 9599 |
} |
| 9600 |
|
| 9588 |
=head1 FUNCTIONS |
9601 |
=head1 FUNCTIONS |
| 9589 |
|
9602 |
|
| 9590 |
=head2 TableExists($table) |
9603 |
=head2 TableExists($table) |
| 9591 |
- |
|
|