|
Lines 813-827
sub CanBookBeIssued {
Link Here
|
| 813 |
# |
813 |
# |
| 814 |
if ( $patron->category->category_type eq 'X' && ( $item_object->barcode )) { |
814 |
if ( $patron->category->category_type eq 'X' && ( $item_object->barcode )) { |
| 815 |
# stats only borrower -- add entry to statistics table, and return issuingimpossible{STATS} = 1 . |
815 |
# stats only borrower -- add entry to statistics table, and return issuingimpossible{STATS} = 1 . |
| 816 |
C4::Stats::UpdateStats({ |
816 |
C4::Stats::UpdateStats( |
| 817 |
branch => C4::Context->userenv->{'branch'}, |
817 |
{ |
| 818 |
type => 'localuse', |
818 |
branch => C4::Context->userenv->{'branch'}, |
| 819 |
itemnumber => $item_object->itemnumber, |
819 |
type => 'localuse', |
| 820 |
itemtype => $effective_itemtype, |
820 |
itemnumber => $item_object->itemnumber, |
| 821 |
borrowernumber => $patron->borrowernumber, |
821 |
itemtype => $effective_itemtype, |
| 822 |
ccode => $item_object->ccode}, |
822 |
borrowernumber => $patron->borrowernumber, |
| 823 |
usercode => $patron->categorycode, |
823 |
ccode => $item_object->ccode, |
| 824 |
); |
824 |
categorycode => $patron->categorycode, |
|
|
825 |
} |
| 826 |
); |
| 825 |
ModDateLastSeen( $item_object->itemnumber ); # FIXME Move to Koha::Item |
827 |
ModDateLastSeen( $item_object->itemnumber ); # FIXME Move to Koha::Item |
| 826 |
return( { STATS => 1 }, {}); |
828 |
return( { STATS => 1 }, {}); |
| 827 |
} |
829 |
} |
|
Lines 1741-1747
sub AddIssue {
Link Here
|
| 1741 |
location => $item_object->location, |
1743 |
location => $item_object->location, |
| 1742 |
borrowernumber => $borrower->{'borrowernumber'}, |
1744 |
borrowernumber => $borrower->{'borrowernumber'}, |
| 1743 |
ccode => $item_object->ccode, |
1745 |
ccode => $item_object->ccode, |
| 1744 |
usercode => $borrower->{'categorycode'} |
1746 |
categorycode => $borrower->{'categorycode'} |
| 1745 |
} |
1747 |
} |
| 1746 |
); |
1748 |
); |
| 1747 |
|
1749 |
|
|
Lines 2351-2356
sub AddReturn {
Link Here
|
| 2351 |
location => $item->location, |
2353 |
location => $item->location, |
| 2352 |
borrowernumber => $borrowernumber, |
2354 |
borrowernumber => $borrowernumber, |
| 2353 |
ccode => $item->ccode, |
2355 |
ccode => $item->ccode, |
|
|
2356 |
categorycode => $patron->categorycode, |
| 2354 |
}); |
2357 |
}); |
| 2355 |
|
2358 |
|
| 2356 |
# Send a check-in slip. # NOTE: borrower may be undef. Do not try to send messages then. |
2359 |
# Send a check-in slip. # NOTE: borrower may be undef. Do not try to send messages then. |
|
Lines 3190-3196
sub AddRenewal {
Link Here
|
| 3190 |
location => $item_object->location, |
3193 |
location => $item_object->location, |
| 3191 |
borrowernumber => $borrowernumber, |
3194 |
borrowernumber => $borrowernumber, |
| 3192 |
ccode => $item_object->ccode, |
3195 |
ccode => $item_object->ccode, |
| 3193 |
usercode => $patron->categorycode, |
3196 |
categorycode => $patron->categorycode, |
| 3194 |
} |
3197 |
} |
| 3195 |
); |
3198 |
); |
| 3196 |
|
3199 |
|