|
Lines 1299-1310
sub AddIssue {
Link Here
|
| 1299 |
my $biblio = GetBiblioFromItemNumber( $item->{itemnumber} ); |
1299 |
my $biblio = GetBiblioFromItemNumber( $item->{itemnumber} ); |
| 1300 |
|
1300 |
|
| 1301 |
# check if we just renew the issue. |
1301 |
# check if we just renew the issue. |
| 1302 |
if ( $actualissue->{borrowernumber} eq $borrower->{'borrowernumber'} |
1302 |
if ( $actualissue->{borrowernumber} eq $borrower->{borrowernumber} |
| 1303 |
and not $switch_onsite_checkout ) { |
1303 |
and not $switch_onsite_checkout ) |
|
|
1304 |
{ |
| 1304 |
$datedue = AddRenewal( |
1305 |
$datedue = AddRenewal( |
| 1305 |
$borrower->{'borrowernumber'}, |
1306 |
$borrower->{borrowernumber}, |
| 1306 |
$item->{'itemnumber'}, |
1307 |
$item->{itemnumber}, |
| 1307 |
$branch, |
1308 |
C4::Context->userenv ? C4::Context->userenv->{branch} : $branch, |
| 1308 |
$datedue, |
1309 |
$datedue, |
| 1309 |
$issuedate, # here interpreted as the renewal date |
1310 |
$issuedate, # here interpreted as the renewal date |
| 1310 |
); |
1311 |
); |
| 1311 |
- |
|
|