Lines 4217-4223
if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
Link Here
|
4217 |
|
4217 |
|
4218 |
$DBversion = '3.03.00.042'; |
4218 |
$DBversion = '3.03.00.042'; |
4219 |
if (C4::Context->preference("Version") < TransformToNum($DBversion) && $original_version < TransformToNum("3.02.06.001")) { |
4219 |
if (C4::Context->preference("Version") < TransformToNum($DBversion) && $original_version < TransformToNum("3.02.06.001")) { |
4220 |
$dbh->do("ALTER TABLE `items` DROP INDEX `itemsstocknumberidx`;"); |
4220 |
#check old indexes and possibly remove |
|
|
4221 |
my @row = $dbh->selectrow_array("SHOW INDEXES FROM items WHERE key_name='itemstocknumberidx'"); |
4222 |
$dbh->do("ALTER TABLE `items` DROP INDEX `itemstocknumberidx`;") if @row; |
4223 |
@row = $dbh->selectrow_array("SHOW INDEXES FROM items WHERE key_name='itemsstocknumberidx'"); |
4224 |
$dbh->do("ALTER TABLE `items` DROP INDEX `itemsstocknumberidx`;") if @row; |
4225 |
#add index |
4221 |
$dbh->do("ALTER TABLE items ADD INDEX itemstocknumberidx (stocknumber);"); |
4226 |
$dbh->do("ALTER TABLE items ADD INDEX itemstocknumberidx (stocknumber);"); |
4222 |
print "Upgrade to $DBversion done (Change items.stocknumber to be not unique)\n"; |
4227 |
print "Upgrade to $DBversion done (Change items.stocknumber to be not unique)\n"; |
4223 |
SetVersion ($DBversion); |
4228 |
SetVersion ($DBversion); |
4224 |
- |
|
|