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 |
- |
|
|