Lines 99-112
if (defined C4::Context->preference('SCOAllowCheckin')) {
Link Here
|
99 |
} |
99 |
} |
100 |
|
100 |
|
101 |
my $issuerid = $loggedinuser; |
101 |
my $issuerid = $loggedinuser; |
102 |
my ($op, $patronid, $patronlogin, $patronpw, $barcode, $confirmed, $seen, $newissues) = ( |
102 |
my ($op, $patronid, $patronlogin, $patronpw, $barcode, $confirmed, $newissues) = ( |
103 |
$query->param("op") || '', |
103 |
$query->param("op") || '', |
104 |
$query->param("patronid") || '', |
104 |
$query->param("patronid") || '', |
105 |
$query->param("patronlogin")|| '', |
105 |
$query->param("patronlogin")|| '', |
106 |
$query->param("patronpw") || '', |
106 |
$query->param("patronpw") || '', |
107 |
$query->param("barcode") || '', |
107 |
$query->param("barcode") || '', |
108 |
$query->param("confirmed") || '', |
108 |
$query->param("confirmed") || '', |
109 |
$query->param("seen") || 0, |
|
|
110 |
$query->param("newissues") || '', |
109 |
$query->param("newissues") || '', |
111 |
); |
110 |
); |
112 |
|
111 |
|
Lines 269-275
if ( $patron && ( $op eq 'renew' ) ) {
Link Here
|
269 |
my ($status,$renewerror) = CanBookBeRenewed( $borrower->{borrowernumber}, $item->itemnumber ); |
268 |
my ($status,$renewerror) = CanBookBeRenewed( $borrower->{borrowernumber}, $item->itemnumber ); |
270 |
if ($status) { |
269 |
if ($status) { |
271 |
#warn "renewing"; |
270 |
#warn "renewing"; |
272 |
AddRenewal( $borrower->{borrowernumber}, $item->itemnumber, undef, undef, undef, undef, $seen ); |
271 |
AddRenewal( $borrower->{borrowernumber}, $item->itemnumber, undef, undef, undef, undef, 1 ); |
273 |
push @newissueslist, $barcode; |
272 |
push @newissueslist, $barcode; |
274 |
$template->param( renewed => 1 ); |
273 |
$template->param( renewed => 1 ); |
275 |
} |
274 |
} |
276 |
- |
|
|