|
Lines 279-285
sub load_db_schema {
Link Here
|
| 279 |
my $self = shift; |
279 |
my $self = shift; |
| 280 |
|
280 |
|
| 281 |
my $datadir = C4::Context->config('intranetdir') . "/installer/data/$self->{dbms}"; |
281 |
my $datadir = C4::Context->config('intranetdir') . "/installer/data/$self->{dbms}"; |
|
|
282 |
|
| 283 |
# Disable checks before load |
| 284 |
$self->{'dbh'}->do(q{SET @OLD_CHARACTER_SET_CLIENT=@@CHARACTER_SET_CLIENT}); |
| 285 |
$self->{'dbh'}->do(q{@OLD_CHARACTER_SET_RESULTS=@@CHARACTER_SET_RESULTS}); |
| 286 |
$self->{'dbh'}->do(q{@OLD_COLLATION_CONNECTION=@@COLLATION_CONNECTION}); |
| 287 |
$self->{'dbh'}->do(q{SET NAMES utf8mb4}); |
| 288 |
$self->{'dbh'}->do(q{@OLD_TIME_ZONE=@@TIME_ZONE}); |
| 289 |
$self->{'dbh'}->do(q{SET TIME_ZONE='+00:00'}); |
| 290 |
$self->{'dbh'}->do(q{SET @OLD_UNIQUE_CHECKS=@@UNIQUE_CHECKS, UNIQUE_CHECKS=0}); |
| 291 |
$self->{'dbh'}->do(q{SET @OLD_FOREIGN_KEY_CHECKS=@@FOREIGN_KEY_CHECKS, FOREIGN_KEY_CHECKS=0}); |
| 292 |
$self->{'dbh'}->do(q{SET @OLD_SQL_MODE=@@SQL_MODE, SQL_MODE='NO_AUTO_VALUE_ON_ZERO'}); |
| 293 |
$self->{'dbh'}->do(q{SET @OLD_SQL_NOTES=@@SQL_NOTES, SQL_NOTES=0}); |
| 294 |
|
| 295 |
# Load kohastructure |
| 282 |
my $error = $self->load_sql("$datadir/kohastructure.sql"); |
296 |
my $error = $self->load_sql("$datadir/kohastructure.sql"); |
|
|
297 |
|
| 298 |
# Re-enable checks after load |
| 299 |
$self->{'dbh'}->do(q{SET character_set_client = @saved_cs_client}); |
| 300 |
$self->{'dbh'}->do(q{SET TIME_ZONE=@OLD_TIME_ZONE}); |
| 301 |
$self->{'dbh'}->do(q{SET SQL_MODE=@OLD_SQL_MODE}); |
| 302 |
$self->{'dbh'}->do(q{SET FOREIGN_KEY_CHECKS=@OLD_FOREIGN_KEY_CHECKS}); |
| 303 |
$self->{'dbh'}->do(q{SET UNIQUE_CHECKS=@OLD_UNIQUE_CHECKS}); |
| 304 |
$self->{'dbh'}->do(q{SET CHARACTER_SET_CLIENT=@OLD_CHARACTER_SET_CLIENT}); |
| 305 |
$self->{'dbh'}->do(q{SET CHARACTER_SET_RESULTS=@OLD_CHARACTER_SET_RESULTS}); |
| 306 |
$self->{'dbh'}->do(q{SET COLLATION_CONNECTION=@OLD_COLLATION_CONNECTION}); |
| 307 |
$self->{'dbh'}->do(q{SET SQL_NOTES=@OLD_SQL_NOTES}); |
| 308 |
|
| 283 |
return $error; |
309 |
return $error; |
| 284 |
|
310 |
|
| 285 |
} |
311 |
} |
| 286 |
- |
|
|