|
Lines 754-759
END_SQL
Link Here
|
| 754 |
$borrower_overdues->{'B_email'} = $data->{'B_email'}; |
754 |
$borrower_overdues->{'B_email'} = $data->{'B_email'}; |
| 755 |
$borrower_overdues->{'smsalertnumber'} = $data->{'smsalertnumber'}; |
755 |
$borrower_overdues->{'smsalertnumber'} = $data->{'smsalertnumber'}; |
| 756 |
$borrower_overdues->{'phone'} = $data->{'phone'}; |
756 |
$borrower_overdues->{'phone'} = $data->{'phone'}; |
|
|
757 |
$borrower_overdues->{'firstname'} = $data->{'firstname'}; |
| 758 |
$borrower_overdues->{'surname'} = $data->{'surname'}; |
| 759 |
$borrower_overdues->{'address'} = $data->{'address'}; |
| 760 |
$borrower_overdues->{'address2'} = $data->{'address2'}; |
| 761 |
$borrower_overdues->{'city'} = $data->{'city'}; |
| 762 |
$borrower_overdues->{'zipcode'} = $data->{'zipcode'}; |
| 763 |
$borrower_overdues->{'country'} = $data->{'country'}; |
| 764 |
$borrower_overdues->{'cardnumber'} = $data->{'cardnumber'}; |
| 757 |
} |
765 |
} |
| 758 |
} |
766 |
} |
| 759 |
$sth->finish; |
767 |
$sth->finish; |
|
Lines 849-855
sub _enact_trigger {
Link Here
|
| 849 |
my $branchcode = $borrower_overdues->{branchcode}; |
857 |
my $branchcode = $borrower_overdues->{branchcode}; |
| 850 |
my $patron = Koha::Patrons->find($borrowernumber); |
858 |
my $patron = Koha::Patrons->find($borrowernumber); |
| 851 |
my ( $library, $admin_email_address, $branch_email_address ); |
859 |
my ( $library, $admin_email_address, $branch_email_address ); |
| 852 |
$library = Koha::Libraries->find($branchcode); |
860 |
$library = Koha::Libraries->find($branchcode); |
|
|
861 |
$admin_email_address = $library->from_email_address; |
| 853 |
|
862 |
|
| 854 |
if ($patron_homelibrary) { |
863 |
if ($patron_homelibrary) { |
| 855 |
$branchcode = $patron->branchcode; |
864 |
$branchcode = $patron->branchcode; |
|
Lines 891-897
sub _enact_trigger {
Link Here
|
| 891 |
my $itemcount = 0; |
900 |
my $itemcount = 0; |
| 892 |
my $titles = ""; |
901 |
my $titles = ""; |
| 893 |
my @items = (); |
902 |
my @items = (); |
| 894 |
for my $item_info ( @{ $borrower_overdues->{triggers}->{$trigger}->{$notice}->{$effective_mtt} } ) { |
903 |
for my $item_info ( @{ $borrower_overdues->{triggers}->{$trigger}->{$notice}->{$mtt} } ) { |
| 895 |
if ( ( scalar(@emails_to_use) == 0 || $nomail ) |
904 |
if ( ( scalar(@emails_to_use) == 0 || $nomail ) |
| 896 |
&& $PrintNoticesMaxLines |
905 |
&& $PrintNoticesMaxLines |
| 897 |
&& $j >= $PrintNoticesMaxLines ) |
906 |
&& $j >= $PrintNoticesMaxLines ) |
| 898 |
- |
|
|