|
Lines 129-136
sub SetMessagingPreference {
Link Here
|
| 129 |
return; |
129 |
return; |
| 130 |
} |
130 |
} |
| 131 |
} |
131 |
} |
| 132 |
$params->{'days_in_advance'} = undef unless exists( $params->{'days_in_advance'} ); |
132 |
$params->{'days_in_advance'} = undef if !exists $params->{'days_in_advance'} || $params->{'days_in_advance'} <= 0; |
| 133 |
$params->{'wants_digest'} = 0 unless exists( $params->{'wants_digest'} ); |
133 |
$params->{'wants_digest'} = 0 unless exists( $params->{'wants_digest'} ); |
| 134 |
|
134 |
|
| 135 |
my $dbh = C4::Context->dbh(); |
135 |
my $dbh = C4::Context->dbh(); |
| 136 |
|
136 |
|
|
Lines 149-155
END_SQL
Link Here
|
| 149 |
my $sth = $dbh->prepare($delete_sql); |
149 |
my $sth = $dbh->prepare($delete_sql); |
| 150 |
my $deleted = $sth->execute(@bind_params); |
150 |
my $deleted = $sth->execute(@bind_params); |
| 151 |
|
151 |
|
| 152 |
if ( $params->{'message_transport_types'} ) { |
152 |
if ( $params->{'message_transport_types'} |
|
|
153 |
&& !( $params->{'message_attribute_id'} == 2 && !$params->{'days_in_advance'} ) ) |
| 154 |
{ |
| 153 |
my $insert_bmp = <<'END_SQL'; |
155 |
my $insert_bmp = <<'END_SQL'; |
| 154 |
INSERT INTO borrower_message_preferences |
156 |
INSERT INTO borrower_message_preferences |
| 155 |
(borrower_message_preference_id, borrowernumber, categorycode, message_attribute_id, days_in_advance, wants_digest) |
157 |
(borrower_message_preference_id, borrowernumber, categorycode, message_attribute_id, days_in_advance, wants_digest) |
| 156 |
- |
|
|