Lines 1070-1076
sub GetQueuedMessages {
Link Here
|
1070 |
|
1070 |
|
1071 |
my $dbh = C4::Context->dbh(); |
1071 |
my $dbh = C4::Context->dbh(); |
1072 |
my $statement = << 'ENDSQL'; |
1072 |
my $statement = << 'ENDSQL'; |
1073 |
SELECT message_id, borrowernumber, subject, content, message_transport_type, status, time_queued |
1073 |
SELECT message_id, borrowernumber, subject, content, message_transport_type, status, time_queued, updated_on |
1074 |
FROM message_queue |
1074 |
FROM message_queue |
1075 |
ENDSQL |
1075 |
ENDSQL |
1076 |
|
1076 |
|
Lines 1124-1130
sub GetMessage {
Link Here
|
1124 |
return unless $message_id; |
1124 |
return unless $message_id; |
1125 |
my $dbh = C4::Context->dbh; |
1125 |
my $dbh = C4::Context->dbh; |
1126 |
return $dbh->selectrow_hashref(q| |
1126 |
return $dbh->selectrow_hashref(q| |
1127 |
SELECT message_id, borrowernumber, subject, content, metadata, letter_code, message_transport_type, status, time_queued, to_address, from_address, content_type |
1127 |
SELECT message_id, borrowernumber, subject, content, metadata, letter_code, message_transport_type, status, time_queued, updated_on, to_address, from_address, content_type |
1128 |
FROM message_queue |
1128 |
FROM message_queue |
1129 |
WHERE message_id = ? |
1129 |
WHERE message_id = ? |
1130 |
|, {}, $message_id ); |
1130 |
|, {}, $message_id ); |
Lines 1368-1374
sub _is_duplicate {
Link Here
|
1368 |
WHERE message_transport_type = ? |
1368 |
WHERE message_transport_type = ? |
1369 |
AND borrowernumber = ? |
1369 |
AND borrowernumber = ? |
1370 |
AND letter_code = ? |
1370 |
AND letter_code = ? |
1371 |
AND CAST(time_queued AS date) = CAST(NOW() AS date) |
1371 |
AND CAST(updated_on AS date) = CAST(NOW() AS date) |
1372 |
AND status="sent" |
1372 |
AND status="sent" |
1373 |
AND content = ? |
1373 |
AND content = ? |
1374 |
|, {}, $message->{message_transport_type}, $message->{borrowernumber}, $message->{letter_code}, $message->{content} ); |
1374 |
|, {}, $message->{message_transport_type}, $message->{borrowernumber}, $message->{letter_code}, $message->{content} ); |