|
Lines 37-42
use Getopt::Long;
Link Here
|
| 37 |
use C4::Context; |
37 |
use C4::Context; |
| 38 |
use C4::Installer; |
38 |
use C4::Installer; |
| 39 |
use C4::Dates; |
39 |
use C4::Dates; |
|
|
40 |
use Koha::Database; |
| 40 |
|
41 |
|
| 41 |
use MARC::Record; |
42 |
use MARC::Record; |
| 42 |
use MARC::File::XML ( BinaryEncoding => 'utf8' ); |
43 |
use MARC::File::XML ( BinaryEncoding => 'utf8' ); |
|
Lines 7962-7967
if(CheckVersion($DBversion)) {
Link Here
|
| 7962 |
$dbh->do(qq{ |
7963 |
$dbh->do(qq{ |
| 7963 |
UPDATE issues SET issue_id = issue_id + ( SELECT COUNT(*) FROM old_issues ) ORDER BY issue_id DESC |
7964 |
UPDATE issues SET issue_id = issue_id + ( SELECT COUNT(*) FROM old_issues ) ORDER BY issue_id DESC |
| 7964 |
}); |
7965 |
}); |
|
|
7966 |
|
| 7967 |
my $schema = Koha::Database->new()->schema(); |
| 7968 |
my $max_issue_id = $schema->resultset('Issue')->get_column('issue_id')->max(); |
| 7969 |
$max_issue_id ||= $schema->resultset('OldIssue')->get_column('issue_id')->max(); |
| 7970 |
$max_issue_id ||= 0; |
| 7971 |
$max_issue_id++; |
| 7972 |
$dbh->do(qq{ |
| 7973 |
ALTER TABLE issues AUTO_INCREMENT = $max_issue_id |
| 7974 |
}); |
| 7975 |
|
| 7965 |
print "Upgrade to $DBversion done (Bug 9303 - relative's checkouts in the opac)\n"; |
7976 |
print "Upgrade to $DBversion done (Bug 9303 - relative's checkouts in the opac)\n"; |
| 7966 |
SetVersion($DBversion); |
7977 |
SetVersion($DBversion); |
| 7967 |
} |
7978 |
} |
| 7968 |
- |
|
|