View | Details | Raw Unified | Return to bug 13961
Collapse All | Expand All

(-)a/C4/Letters.pm (+4 lines)
Lines 645-650 sub GetPreparedLetter { Link Here
645
645
646
    my $OPACBaseURL = C4::Context->preference('OPACBaseURL');
646
    my $OPACBaseURL = C4::Context->preference('OPACBaseURL');
647
    $letter->{content} =~ s/<<OPACBaseURL>>/$OPACBaseURL/go;
647
    $letter->{content} =~ s/<<OPACBaseURL>>/$OPACBaseURL/go;
648
    
649
    my ($totalfine) = C4::Members::GetMemberAccountRecords($tables->{borrowers});
650
    $totalfine = sprintf("%.2f", $totalfine);
651
    $letter->{content} =~ s/<<borrowers.totalfine>>/$totalfine/go;
648
652
649
    if ($want_librarian) {
653
    if ($want_librarian) {
650
        # parsing librarian name
654
        # parsing librarian name
(-)a/tools/letter.pl (-2 / +2 lines)
Lines 221-227 sub add_form { Link Here
221
            add_fields('items'),
221
            add_fields('items'),
222
            {value => 'items.content', text => 'items.content'},
222
            {value => 'items.content', text => 'items.content'},
223
            {value => 'items.fine',    text => 'items.fine'},
223
            {value => 'items.fine',    text => 'items.fine'},
224
            add_fields('borrowers');
224
            add_fields('borrowers'),
225
            {value => 'borrowers.totalfine', text => 'borrowers.totalfine' };
225
        if ($module eq 'circulation') {
226
        if ($module eq 'circulation') {
226
            push @{$field_selection}, add_fields('opac_news');
227
            push @{$field_selection}, add_fields('opac_news');
227
228
228
- 

Return to bug 13961