|
Lines 909-914
sub CheckReserves {
Link Here
|
| 909 |
|
909 |
|
| 910 |
# Find this item in the reserves |
910 |
# Find this item in the reserves |
| 911 |
my @reserves = _Findgroupreserve( $bibitem, $biblio, $itemnumber, $lookahead_days, $ignore_borrowers); |
911 |
my @reserves = _Findgroupreserve( $bibitem, $biblio, $itemnumber, $lookahead_days, $ignore_borrowers); |
|
|
912 |
# When IndependentBranchesTransfers is activate remove the reserve made from other branches |
| 913 |
@reserves = _Removereserve( @reserves ); |
| 912 |
|
914 |
|
| 913 |
# $priority and $highest are used to find the most important item |
915 |
# $priority and $highest are used to find the most important item |
| 914 |
# in the list returned by &_Findgroupreserve. (The lower $priority, |
916 |
# in the list returned by &_Findgroupreserve. (The lower $priority, |
|
Lines 1843-1848
sub _Findgroupreserve {
Link Here
|
| 1843 |
return @results; |
1845 |
return @results; |
| 1844 |
} |
1846 |
} |
| 1845 |
|
1847 |
|
|
|
1848 |
=head2 _Removereserve |
| 1849 |
|
| 1850 |
@reserves = &_Removereserve( @reserves ); |
| 1851 |
|
| 1852 |
Check transfers is allowed from system preference and remove the reserves made from other branches |
| 1853 |
|
| 1854 |
C<&_Removereserve> returns : |
| 1855 |
C<@results> is an array of references-to-hash whose keys are mostly |
| 1856 |
fields from the reserves table of the Koha database, plus |
| 1857 |
|
| 1858 |
=cut |
| 1859 |
|
| 1860 |
sub _Removereserve { |
| 1861 |
my ( @reserves) = @_; |
| 1862 |
if ( C4::Context->preference("IndependentBranchesTransfers") && !C4::Context->IsSuperLibrarian() && scalar @reserves) { |
| 1863 |
my @results; |
| 1864 |
foreach my $res (@reserves) { |
| 1865 |
push( @results, $res ) if ($res->{branchcode} eq C4::Context->userenv->{'branch'}); |
| 1866 |
} |
| 1867 |
return @results; |
| 1868 |
} |
| 1869 |
return @reserves; |
| 1870 |
} |
| 1871 |
|
| 1846 |
=head2 _koha_notify_reserve |
1872 |
=head2 _koha_notify_reserve |
| 1847 |
|
1873 |
|
| 1848 |
_koha_notify_reserve( $hold->reserve_id ); |
1874 |
_koha_notify_reserve( $hold->reserve_id ); |
| 1849 |
- |
|
|