Lines 1030-1036
ENDSQL
Link Here
|
1030 |
letter_code => $letter_code, |
1030 |
letter_code => $letter_code, |
1031 |
borrowernumber => $who_letter_is_for, |
1031 |
borrowernumber => $who_letter_is_for, |
1032 |
limit => 50, |
1032 |
limit => 50, |
1033 |
verbose => 1 |
1033 |
verbose => 1, |
|
|
1034 |
type => 'sms', |
1034 |
}); |
1035 |
}); |
1035 |
|
1036 |
|
1036 |
Sends all of the 'pending' items in the message queue, unless |
1037 |
Sends all of the 'pending' items in the message queue, unless |
Lines 1054-1059
sub SendQueuedMessages {
Link Here
|
1054 |
'limit' => $params->{'limit'} // 0, |
1055 |
'limit' => $params->{'limit'} // 0, |
1055 |
'borrowernumber' => $params->{'borrowernumber'} // q{}, |
1056 |
'borrowernumber' => $params->{'borrowernumber'} // q{}, |
1056 |
'letter_code' => $params->{'letter_code'} // q{}, |
1057 |
'letter_code' => $params->{'letter_code'} // q{}, |
|
|
1058 |
'type' => $params->{'type'} // q{}, |
1057 |
}; |
1059 |
}; |
1058 |
my $unsent_messages = _get_unsent_messages( $which_unsent_messages ); |
1060 |
my $unsent_messages = _get_unsent_messages( $which_unsent_messages ); |
1059 |
MESSAGE: foreach my $message ( @$unsent_messages ) { |
1061 |
MESSAGE: foreach my $message ( @$unsent_messages ) { |
Lines 1324-1329
sub _get_unsent_messages {
Link Here
|
1324 |
$statement .= ' AND mq.letter_code = ? '; |
1326 |
$statement .= ' AND mq.letter_code = ? '; |
1325 |
push @query_params, $params->{'letter_code'}; |
1327 |
push @query_params, $params->{'letter_code'}; |
1326 |
} |
1328 |
} |
|
|
1329 |
if ( $params->{'type'} ) { |
1330 |
$statement .= ' AND message_transport_type = ? '; |
1331 |
push @query_params, $params->{'type'}; |
1332 |
} |
1327 |
if ( $params->{'limit'} ) { |
1333 |
if ( $params->{'limit'} ) { |
1328 |
$statement .= ' limit ? '; |
1334 |
$statement .= ' limit ? '; |
1329 |
push @query_params, $params->{'limit'}; |
1335 |
push @query_params, $params->{'limit'}; |