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

(-)a/Koha/Account.pm (-8 / +5 lines)
Lines 692-711 sub payout_amount { Link Here
692
        sub {
692
        sub {
693
693
694
            # A 'payout' is a 'debit'
694
            # A 'payout' is a 'debit'
695
            $payout = Koha::Account::Line->new(
695
            $payout = $self->add_debit(
696
                {
696
                {
697
                    date              => \'NOW()',
697
                    amount            => $params->{amount},
698
                    amount            => $amount,
698
                    type              => 'PAYOUT',
699
                    debit_type_code   => 'PAYOUT',
700
                    payment_type      => $params->{payout_type},
699
                    payment_type      => $params->{payout_type},
701
                    amountoutstanding => $amount,
700
                    amountoutstanding => $params->{amount},
702
                    manager_id        => $params->{staff_id},
701
                    manager_id        => $params->{staff_id},
703
                    borrowernumber    => $self->{patron_id},
704
                    interface         => $params->{interface},
702
                    interface         => $params->{interface},
705
                    branchcode        => $params->{branch},
703
                    branchcode        => $params->{branch},
706
                    register_id       => $params->{cash_register}
704
                    register_id       => $params->{cash_register}
707
                }
705
                }
708
            )->store();
706
            );
709
707
710
            # Offset against credits
708
            # Offset against credits
711
            for my $credit ( @{$outstanding_credits} ) {
709
            for my $credit ( @{$outstanding_credits} ) {
712
- 

Return to bug 24300