Lines 107-112
if ( $response->is_success ) {
Link Here
|
107 |
interface => C4::Context->interface |
107 |
interface => C4::Context->interface |
108 |
} |
108 |
} |
109 |
); |
109 |
); |
|
|
110 |
|
111 |
if ( |
112 |
C4::Context->preference('MarkLostItemsAsReturned') =~ m|OnPayment| ) |
113 |
{ |
114 |
my $lines = Koha::Account::Lines->search( |
115 |
{ |
116 |
accountlines_id => { -in => \@accountlines } |
117 |
} |
118 |
); |
119 |
while ( my $debit = $lines->next ) { |
120 |
if ( $debit->amountoutstanding == 0 |
121 |
&& $debit->itemnumber |
122 |
&& $debit->debit_type_code |
123 |
&& ( $debit->debit_type_code eq 'LOST' ) ) |
124 |
{ |
125 |
C4::Circulation::ReturnLostItem( $borrowernumber, |
126 |
$debit->itemnumber ); |
127 |
} |
128 |
} |
129 |
} |
110 |
} |
130 |
} |
111 |
else { |
131 |
else { |
112 |
$error = "PAYPAL_ERROR_PROCESSING"; |
132 |
$error = "PAYPAL_ERROR_PROCESSING"; |
113 |
- |
|
|