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 7929-7934
if(CheckVersion($DBversion)) {
Link Here
|
7929 |
$dbh->do(qq{ |
7930 |
$dbh->do(qq{ |
7930 |
UPDATE issues SET issue_id = issue_id + ( SELECT COUNT(*) FROM old_issues ) ORDER BY issue_id DESC |
7931 |
UPDATE issues SET issue_id = issue_id + ( SELECT COUNT(*) FROM old_issues ) ORDER BY issue_id DESC |
7931 |
}); |
7932 |
}); |
|
|
7933 |
|
7934 |
my $schema = Koha::Database->new()->schema(); |
7935 |
my $max_issue_id = $schema->resultset('Issue')->get_column('issue_id')->max(); |
7936 |
$max_issue_id ||= $schema->resultset('OldIssue')->get_column('issue_id')->max(); |
7937 |
$max_issue_id ||= 0; |
7938 |
$max_issue_id++; |
7939 |
$dbh->do(qq{ |
7940 |
ALTER TABLE issues AUTO_INCREMENT = $max_issue_id |
7941 |
}); |
7942 |
|
7932 |
print "Upgrade to $DBversion done (Bug 9303 - relative's checkouts in the opac)\n"; |
7943 |
print "Upgrade to $DBversion done (Bug 9303 - relative's checkouts in the opac)\n"; |
7933 |
SetVersion($DBversion); |
7944 |
SetVersion($DBversion); |
7934 |
} |
7945 |
} |
7935 |
- |
|
|