Lines 48-55
sub force_borrower_messaging_defaults {
Link Here
|
48 |
$dbh->{AutoCommit} = 0; |
48 |
$dbh->{AutoCommit} = 0; |
49 |
|
49 |
|
50 |
if ( $doit && $truncate ) { |
50 |
if ( $doit && $truncate ) { |
51 |
my $sth = $dbh->prepare("TRUNCATE borrower_message_preferences"); |
51 |
$dbh->do(q|SET FOREIGN_KEY_CHECKS = 0|); |
52 |
$sth->execute(); |
52 |
$dbh->do(q|TRUNCATE borrower_message_transport_preferences|); |
|
|
53 |
$dbh->do(q|TRUNCATE borrower_message_preferences|); |
54 |
$dbh->do(q|SET FOREIGN_KEY_CHECKS = 1|); |
53 |
} |
55 |
} |
54 |
|
56 |
|
55 |
my $sth = $dbh->prepare("SELECT borrowernumber, categorycode FROM borrowers WHERE dateenrolled >= ?"); |
57 |
my $sth = $dbh->prepare("SELECT borrowernumber, categorycode FROM borrowers WHERE dateenrolled >= ?"); |
56 |
- |
|
|