|
Lines 11098-11106
if ( CheckVersion($DBversion) ) {
Link Here
|
| 11098 |
$DBversion = "3.21.00.036"; |
11098 |
$DBversion = "3.21.00.036"; |
| 11099 |
if ( CheckVersion($DBversion) ) { |
11099 |
if ( CheckVersion($DBversion) ) { |
| 11100 |
$dbh->do(q{ |
11100 |
$dbh->do(q{ |
| 11101 |
ALTER TABLE authorised_values_branches |
11101 |
ALTER TABLE authorised_values_branches |
| 11102 |
CHANGE av_id av_id INT( 11 ) NOT NULL, |
11102 |
DROP FOREIGN KEY authorised_values_branches_ibfk_1, |
| 11103 |
CHANGE branchcode branchcode VARCHAR( 10 ) NOT NULL |
11103 |
DROP FOREIGN KEY authorised_values_branches_ibfk_2 |
|
|
11104 |
}); |
| 11105 |
$dbh->do(q{ |
| 11106 |
ALTER TABLE authorised_values_branches |
| 11107 |
MODIFY av_id INT( 11 ) NOT NULL, |
| 11108 |
MODIFY branchcode VARCHAR( 10 ) NOT NULL, |
| 11109 |
ADD FOREIGN KEY (`av_id`) REFERENCES `authorised_values` (`id`) ON DELETE CASCADE, |
| 11110 |
ADD FOREIGN KEY (`branchcode`) REFERENCES `branches` (`branchcode`) ON DELETE CASCADE |
| 11104 |
}); |
11111 |
}); |
| 11105 |
print "Upgrade to $DBversion done (Bug 10363: There is no package for authorised values)\n"; |
11112 |
print "Upgrade to $DBversion done (Bug 10363: There is no package for authorised values)\n"; |
| 11106 |
SetVersion($DBversion); |
11113 |
SetVersion($DBversion); |
| 11107 |
- |
|
|