|
Lines 1355-1384
sub AddIssue {
Link Here
|
| 1355 |
} |
1355 |
} |
| 1356 |
$datedue->truncate( to => 'minute' ); |
1356 |
$datedue->truncate( to => 'minute' ); |
| 1357 |
|
1357 |
|
| 1358 |
$issue = |
1358 |
my $issue_attributes = { |
| 1359 |
Koha::Checkouts->find( { itemnumber => $item->{'itemnumber'} } ); |
1359 |
borrowernumber => $borrower->{'borrowernumber'}, |
|
|
1360 |
issuedate => $issuedate->strftime('%Y-%m-%d %H:%M:%S'), |
| 1361 |
date_due => $datedue->strftime('%Y-%m-%d %H:%M:%S'), |
| 1362 |
branchcode => C4::Context->userenv->{'branch'}, |
| 1363 |
onsite_checkout => $onsite_checkout, |
| 1364 |
auto_renew => $auto_renew ? 1 : 0, |
| 1365 |
}; |
| 1366 |
|
| 1367 |
$issue = Koha::Checkouts->find( { itemnumber => $item->{itemnumber} } ); |
| 1360 |
if ($issue) { |
1368 |
if ($issue) { |
| 1361 |
$issue->set( |
1369 |
$issue->set($issue_attributes)->store; |
| 1362 |
{ |
|
|
| 1363 |
borrowernumber => $borrower->{'borrowernumber'}, |
| 1364 |
issuedate => $issuedate->strftime('%Y-%m-%d %H:%M:%S'), |
| 1365 |
date_due => $datedue->strftime('%Y-%m-%d %H:%M:%S'), |
| 1366 |
branchcode => C4::Context->userenv->{'branch'}, |
| 1367 |
onsite_checkout => $onsite_checkout, |
| 1368 |
auto_renew => $auto_renew ? 1 : 0 |
| 1369 |
} |
| 1370 |
)->store; |
| 1371 |
} |
1370 |
} |
| 1372 |
else { |
1371 |
else { |
| 1373 |
$issue = Koha::Checkout->new( |
1372 |
$issue = Koha::Checkout->new( |
| 1374 |
{ |
1373 |
{ |
| 1375 |
borrowernumber => $borrower->{'borrowernumber'}, |
1374 |
itemnumber => $item->{itemnumber}, |
| 1376 |
itemnumber => $item->{'itemnumber'}, |
1375 |
%$issue_attributes, |
| 1377 |
issuedate => $issuedate->strftime('%Y-%m-%d %H:%M:%S'), |
|
|
| 1378 |
date_due => $datedue->strftime('%Y-%m-%d %H:%M:%S'), |
| 1379 |
branchcode => C4::Context->userenv->{'branch'}, |
| 1380 |
onsite_checkout => $onsite_checkout, |
| 1381 |
auto_renew => $auto_renew ? 1 : 0 |
| 1382 |
} |
1376 |
} |
| 1383 |
)->store; |
1377 |
)->store; |
| 1384 |
} |
1378 |
} |
| 1385 |
- |
|
|