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