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

(-)a/Koha/Item.pm (-1 / +21 lines)
Lines 1183-1188 sub _set_found_trigger { Link Here
1183
            }
1183
            }
1184
        )->single;
1184
        )->single;
1185
1185
1186
        # refund processing charge made for lost book
1187
        my $processing_charge = Koha::Account::Lines->search(
1188
            {
1189
                itemnumber      => $self->itemnumber,
1190
                debit_type_code => 'PROCESSING',
1191
                status          => [ undef, { '<>' => 'FOUND' } ]
1192
            },
1193
            {
1194
                order_by => { -desc => [ 'date', 'accountlines_id' ] },
1195
                rows     => 1
1196
            }
1197
        )->single;
1198
1186
        if ( $lost_charge ) {
1199
        if ( $lost_charge ) {
1187
1200
1188
            my $patron = $lost_charge->patron;
1201
            my $patron = $lost_charge->patron;
Lines 1256-1261 sub _set_found_trigger { Link Here
1256
                $lost_charge->status('FOUND');
1269
                $lost_charge->status('FOUND');
1257
                $lost_charge->store();
1270
                $lost_charge->store();
1258
1271
1272
                if ( $processing_charge && $processing_charge->borrowernumber == $lost_charge->borrowernumber ) {
1273
                    $processing_charge->status('FOUND')->store;
1274
                }
1275
1259
                # Reconcile balances if required
1276
                # Reconcile balances if required
1260
                if ( C4::Context->preference('AccountAutoReconcile') ) {
1277
                if ( C4::Context->preference('AccountAutoReconcile') ) {
1261
                    $account->reconcile_balance;
1278
                    $account->reconcile_balance;
Lines 1286-1291 sub _set_found_trigger { Link Here
1286
                    # Update status of fine
1303
                    # Update status of fine
1287
                    $lost_overdue->status('FOUND')->store();
1304
                    $lost_overdue->status('FOUND')->store();
1288
1305
1306
                    if ( $processing_charge && $processing_charge->borrowernumber == $lost_charge->borrowernumber ) {
1307
                        $processing_charge->status('FOUND')->store;
1308
                    }
1309
1289
                    # Find related forgive credit
1310
                    # Find related forgive credit
1290
                    my $refund = $lost_overdue->credits(
1311
                    my $refund = $lost_overdue->credits(
1291
                        {
1312
                        {
1292
- 

Return to bug 23012