|
Lines 419-425
if ($digest_per_branch) {
Link Here
|
| 419 |
while (my ($branchcode, $digests) = each %$due_digest) { |
419 |
while (my ($branchcode, $digests) = each %$due_digest) { |
| 420 |
send_digests({ |
420 |
send_digests({ |
| 421 |
sth => $sth_digest, |
421 |
sth => $sth_digest, |
| 422 |
digests => $due_digest, |
422 |
digests => $digests, |
| 423 |
letter_code => 'DUEDGST', |
423 |
letter_code => 'DUEDGST', |
| 424 |
branchcode => $branchcode, |
424 |
branchcode => $branchcode, |
| 425 |
message_name => 'item_due', |
425 |
message_name => 'item_due', |
| 426 |
- |
|
|