|
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 |
- |
|
|