|
Lines 142-148
sub discharge {
Link Here
|
| 142 |
|
142 |
|
| 143 |
# Generate the discharge |
143 |
# Generate the discharge |
| 144 |
my $rs = Koha::Database->new->schema->resultset('Discharge'); |
144 |
my $rs = Koha::Database->new->schema->resultset('Discharge'); |
| 145 |
my $discharge = $rs->search( { borrower => $borrowernumber }, { order_by => { -desc => 'needed' }, rows => 1 } ); |
145 |
my $discharge = $rs->search( |
|
|
146 |
{ |
| 147 |
borrower => $borrowernumber, |
| 148 |
validated => undef, |
| 149 |
}, |
| 150 |
{ |
| 151 |
order_by => { -desc => 'needed' }, |
| 152 |
rows => 1 |
| 153 |
} |
| 154 |
); |
| 146 |
if ( $discharge->count > 0 ) { |
155 |
if ( $discharge->count > 0 ) { |
| 147 |
$discharge->update( |
156 |
$discharge->update( |
| 148 |
{ |
157 |
{ |
| 149 |
- |
|
|