|
Lines 140-147
sub SetMessagingPreference {
Link Here
|
| 140 |
return; |
140 |
return; |
| 141 |
} |
141 |
} |
| 142 |
} |
142 |
} |
| 143 |
$params->{'days_in_advance'} = undef unless exists( $params->{'days_in_advance'} ); |
143 |
$params->{'days_in_advance'} = undef if !exists $params->{'days_in_advance'} || $params->{'days_in_advance'} <= 0; |
| 144 |
$params->{'wants_digest'} = 0 unless exists( $params->{'wants_digest'} ); |
144 |
$params->{'wants_digest'} = 0 unless exists( $params->{'wants_digest'} ); |
| 145 |
|
145 |
|
| 146 |
my $dbh = C4::Context->dbh(); |
146 |
my $dbh = C4::Context->dbh(); |
| 147 |
|
147 |
|
|
Lines 160-166
END_SQL
Link Here
|
| 160 |
my $sth = $dbh->prepare($delete_sql); |
160 |
my $sth = $dbh->prepare($delete_sql); |
| 161 |
my $deleted = $sth->execute(@bind_params); |
161 |
my $deleted = $sth->execute(@bind_params); |
| 162 |
|
162 |
|
| 163 |
if ( $params->{'message_transport_types'} ) { |
163 |
if ( $params->{'message_transport_types'} |
|
|
164 |
&& !( $params->{'message_attribute_id'} == 2 && !$params->{'days_in_advance'} ) ) |
| 165 |
{ |
| 164 |
my $insert_bmp = <<'END_SQL'; |
166 |
my $insert_bmp = <<'END_SQL'; |
| 165 |
INSERT INTO borrower_message_preferences |
167 |
INSERT INTO borrower_message_preferences |
| 166 |
(borrower_message_preference_id, borrowernumber, categorycode, message_attribute_id, days_in_advance, wants_digest) |
168 |
(borrower_message_preference_id, borrowernumber, categorycode, message_attribute_id, days_in_advance, wants_digest) |
| 167 |
- |
|
|