@@ -, +, @@ phone notices --- misc/cronjobs/advance_notices.pl | 3 +++ misc/cronjobs/overdue_notices.pl | 1 + 2 files changed, 4 insertions(+) --- a/misc/cronjobs/advance_notices.pl +++ a/misc/cronjobs/advance_notices.pl @@ -285,6 +285,7 @@ UPCOMINGITEM: foreach my $upcoming ( @$upcoming_dues ) { ## Get branch info for borrowers home library. foreach my $transport ( keys %{$borrower_preferences->{'transports'}} ) { + next if $transport eq 'phone'; my $letter = parse_letter( { letter_code => $letter_type, borrowernumber => $upcoming->{'borrowernumber'}, branchcode => $upcoming->{'branchcode'}, @@ -323,6 +324,7 @@ UPCOMINGITEM: foreach my $upcoming ( @$upcoming_dues ) { ## Get branch info for borrowers home library. foreach my $transport ( keys %{$borrower_preferences->{'transports'}} ) { + next if $transport eq 'phone'; my $letter = parse_letter( { letter_code => $letter_type, borrowernumber => $upcoming->{'borrowernumber'}, branchcode => $upcoming->{'branchcode'}, @@ -566,6 +568,7 @@ sub send_digests { } foreach my $transport ( keys %{ $borrower_preferences->{'transports'} } ) { + next if $transport eq 'phone'; my $letter = parse_letter( { letter_code => $params->{letter_code}, --- a/misc/cronjobs/overdue_notices.pl +++ a/misc/cronjobs/overdue_notices.pl @@ -678,6 +678,7 @@ END_SQL my $print_sent = 0; # A print notice is not yet sent for this patron for my $mtt ( @message_transport_types ) { + next if $mtt eq 'phone'; my $effective_mtt = $mtt; if ( ($mtt eq 'email' and not scalar @emails_to_use) or ($mtt eq 'sms' and not $data->{smsalertnumber}) ) { # email or sms is requested but not exist, do a print. --