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

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/members/mancredit.tt (-1 / +1 lines)
Lines 71-77 Link Here
71
                            <li><label for="desc">Description: </label><input type="text" name="desc" size="50" id="desc" /></li>
71
                            <li><label for="desc">Description: </label><input type="text" name="desc" size="50" id="desc" /></li>
72
                            <li><label for="note">Note: </label><input type="text" name="note" size="50" id="note" /></li>
72
                            <li><label for="note">Note: </label><input type="text" name="note" size="50" id="note" /></li>
73
                            <li><label for="amount">Amount: </label><input type="text" inputmode="decimal" pattern="^\d+(\.\d{2})?$" name="amount" id="amount" required="required" min="0" value=""/> Example: 5.00</li>
73
                            <li><label for="amount">Amount: </label><input type="text" inputmode="decimal" pattern="^\d+(\.\d{2})?$" name="amount" id="amount" required="required" min="0" value=""/> Example: 5.00</li>
74
                            [% INCLUDE 'transaction_types.inc' %]
74
                            [% INCLUDE 'transaction_types.inc' type="credit" %]
75
                            [% IF Koha.Preference('UseCashRegisters') %]
75
                            [% IF Koha.Preference('UseCashRegisters') %]
76
                            <li>
76
                            <li>
77
                                [% IF Koha.Preference('RequireCashRegister') %]
77
                                [% IF Koha.Preference('RequireCashRegister') %]
(-)a/members/mancredit.pl (-7 / +6 lines)
Lines 85-95 if ($add) { Link Here
85
        my $item = Koha::Items->find( { barcode => $barcode } );
85
        my $item = Koha::Items->find( { barcode => $barcode } );
86
        $item_id = $item->itemnumber if $item;
86
        $item_id = $item->itemnumber if $item;
87
    }
87
    }
88
    my $description  = $input->param('desc');
88
    my $description      = $input->param('desc');
89
    my $note         = $input->param('note');
89
    my $note             = $input->param('note');
90
    my $amount       = $input->param('amount') || 0;
90
    my $amount           = $input->param('amount') || 0;
91
    my $type         = $input->param('type');
91
    my $type             = $input->param('type');
92
    my $payment_type = $input->param('payment_type');
92
    my $credit_type      = $input->param('credit_type');
93
    my $cash_register_id = $input->param('cash_register');
93
    my $cash_register_id = $input->param('cash_register');
94
94
95
    $patron->account->add_credit(
95
    $patron->account->add_credit(
Lines 102-108 if ($add) { Link Here
102
            type          => $type,
102
            type          => $type,
103
            user_id       => $logged_in_user->id,
103
            user_id       => $logged_in_user->id,
104
            interface     => C4::Context->interface,
104
            interface     => C4::Context->interface,
105
            payment_type  => $payment_type,
105
            payment_type  => $credit_type,
106
            cash_register => $cash_register_id
106
            cash_register => $cash_register_id
107
        }
107
        }
108
    );
108
    );
109
- 

Return to bug 29987