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

(-)a/Koha/Account/Line.pm (+1 lines)
Lines 535-540 sub reduce { Link Here
535
                    borrowernumber    => $self->borrowernumber,
535
                    borrowernumber    => $self->borrowernumber,
536
                    interface         => $params->{interface},
536
                    interface         => $params->{interface},
537
                    branchcode        => $params->{branch},
537
                    branchcode        => $params->{branch},
538
                    note              => $params->{note},
538
                }
539
                }
539
            )->store();
540
            )->store();
540
541
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/members/boraccount.tt (+4 lines)
Lines 403-408 Link Here
403
                        <ol>
403
                        <ol>
404
                            <li> <span id="item" class="label">Account type: </span><span></span> </li>
404
                            <li> <span id="item" class="label">Account type: </span><span></span> </li>
405
                            <li> <span id="charged" class="label">Amount charged: </span><span></span> </li>
405
                            <li> <span id="charged" class="label">Amount charged: </span><span></span> </li>
406
                            <li>
407
                                <label for="apply_discount_note">Note: </label>
408
                                <input type="text" id="apply_discount_note" name="apply_discount_note" />
409
                            </li>
406
                            <li>
410
                            <li>
407
                                <label class="required" for="amount">Discount to apply: </label>
411
                                <label class="required" for="amount">Discount to apply: </label>
408
                                <input type="text" inputmode="numeric" pattern="[0-9]*" id="discount" name="amount" required="required" />
412
                                <input type="text" inputmode="numeric" pattern="[0-9]*" id="discount" name="amount" required="required" />
(-)a/members/boraccount.pl (-2 / +4 lines)
Lines 163-168 if ( $op eq 'cud-discount' ) { Link Here
163
    my $charge_id = scalar $input->param('accountlines_id');
163
    my $charge_id = scalar $input->param('accountlines_id');
164
    my $charge    = Koha::Account::Lines->find($charge_id);
164
    my $charge    = Koha::Account::Lines->find($charge_id);
165
    my $amount    = scalar $input->param('amount');
165
    my $amount    = scalar $input->param('amount');
166
    my $note      = scalar $input->param('apply_discount_note');
167
166
    $schema->txn_do(
168
    $schema->txn_do(
167
        sub {
169
        sub {
168
170
Lines 172-178 if ( $op eq 'cud-discount' ) { Link Here
172
                    branch         => $library_id,
174
                    branch         => $library_id,
173
                    staff_id       => $logged_in_user->id,
175
                    staff_id       => $logged_in_user->id,
174
                    interface      => 'intranet',
176
                    interface      => 'intranet',
175
                    amount         => $amount
177
                    amount         => $amount,
178
                    note           => $note,
176
                }
179
                }
177
            );
180
            );
178
        }
181
        }
179
- 

Return to bug 23674