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

(-)a/C4/Circulation.pm (-26 / +11 lines)
Lines 3213-3245 sub AddIssuingCharge { Link Here
3213
3213
3214
    # FIXME What if checkout does not exist?
3214
    # FIXME What if checkout does not exist?
3215
3215
3216
    my $nextaccntno = C4::Accounts::getnextacctno( $checkout->borrowernumber );
3216
    my $account = Koha::Account->new({ patron_id => $checkout->borrowernumber });
3217
3217
    my $accountline = $account->add_debit(
3218
    my $manager_id  = 0;
3219
    $manager_id = C4::Context->userenv->{'number'} if C4::Context->userenv;
3220
3221
    my $accountline = Koha::Account::Line->new(
3222
        {
3223
            borrowernumber    => $checkout->borrowernumber,
3224
            itemnumber        => $checkout->itemnumber,
3225
            issue_id          => $checkout->issue_id,
3226
            accountno         => $nextaccntno,
3227
            amount            => $charge,
3228
            amountoutstanding => $charge,
3229
            manager_id        => $manager_id,
3230
            description       => 'Rental',
3231
            accounttype       => 'Rent',
3232
            date              => \'NOW()',
3233
        }
3234
    )->store();
3235
3236
    Koha::Account::Offset->new(
3237
        {
3218
        {
3238
            debit_id => $accountline->id,
3219
            amount      => $charge,
3239
            type     => 'Rental Fee',
3220
            description => 'Rental',
3240
            amount   => $charge,
3221
            note        => undef,
3222
            user_id     => C4::Context->userenv ? C4::Context->userenv->{'number'} : 0,
3223
            library_id  => C4::Context->userenv ? C4::Context->userenv->{'branch'} : undef,
3224
            type        => 'rent',
3225
            item_id     => $checkout->itemnumber,
3226
            issue_id    => $checkout->issue_id,
3241
        }
3227
        }
3242
    )->store();
3228
    );
3243
}
3229
}
3244
3230
3245
=head2 GetTransfers
3231
=head2 GetTransfers
3246
- 

Return to bug 21720