Lines 429-435
sub BuildItemsData{
Link Here
|
429 |
my %this_row; |
429 |
my %this_row; |
430 |
foreach my $field (grep {$_->tag() eq $itemtagfield} $itemmarc->fields()) { |
430 |
foreach my $field (grep {$_->tag() eq $itemtagfield} $itemmarc->fields()) { |
431 |
# loop through each subfield |
431 |
# loop through each subfield |
432 |
if (my $itembranchcode=$field->subfield($branchtagsubfield) && C4::Context->preference("IndependantBranches")) { |
432 |
my $itembranchcode=$field->subfield($branchtagsubfield); |
|
|
433 |
if ($itembranchcode && C4::Context->preference("IndependantBranches")) { |
433 |
#verifying rights |
434 |
#verifying rights |
434 |
my $userenv = C4::Context->userenv(); |
435 |
my $userenv = C4::Context->userenv(); |
435 |
unless (($userenv->{'flags'} == 1) or (($userenv->{'branch'} eq $itembranchcode))){ |
436 |
unless (($userenv->{'flags'} == 1) or (($userenv->{'branch'} eq $itembranchcode))){ |
436 |
- |
|
|