|
Lines 30-37
return {
Link Here
|
| 30 |
"There were $count budget(s) without budget_period_id. They all have been updated to be under budget called 'Budget for funds without budget' (id $aqbp_id)."; |
30 |
"There were $count budget(s) without budget_period_id. They all have been updated to be under budget called 'Budget for funds without budget' (id $aqbp_id)."; |
| 31 |
} |
31 |
} |
| 32 |
|
32 |
|
| 33 |
$dbh->do(q{ALTER TABLE aqbudgets DROP FOREIGN KEY aqbudgetperiods_ibfk_1}); |
33 |
if ( foreign_key_exists( 'aqbudgets', 'aqbudgetperiods_ibfk_1' ) ) { |
| 34 |
say $out "Dropped foreign key aqbudgetperiods_ibfk_1"; |
34 |
$dbh->do(q{ALTER TABLE aqbudgets DROP FOREIGN KEY aqbudgetperiods_ibfk_1}); |
|
|
35 |
say $out "Dropped foreign key aqbudgetperiods_ibfk_1"; |
| 36 |
} |
| 35 |
|
37 |
|
| 36 |
$dbh->do(q{ALTER TABLE aqbudgets MODIFY COLUMN `budget_period_id` INT(11) NOT NULL}); |
38 |
$dbh->do(q{ALTER TABLE aqbudgets MODIFY COLUMN `budget_period_id` INT(11) NOT NULL}); |
| 37 |
say $out "Updated aqbudgets.budget_period_id to NOT accept NULL values"; |
39 |
say $out "Updated aqbudgets.budget_period_id to NOT accept NULL values"; |
| 38 |
- |
|
|