|
Lines 172-177
$dat->{'hiddencount'} = scalar @all_items + @hostitems - scalar @items;
Link Here
|
| 172 |
|
172 |
|
| 173 |
my $shelflocations = GetKohaAuthorisedValues('items.location', $fw); |
173 |
my $shelflocations = GetKohaAuthorisedValues('items.location', $fw); |
| 174 |
my $collections = GetKohaAuthorisedValues('items.ccode' , $fw); |
174 |
my $collections = GetKohaAuthorisedValues('items.ccode' , $fw); |
|
|
175 |
my $copynumbers = GetKohaAuthorisedValues('items.copynumber', $fw); |
| 175 |
my (@itemloop, %itemfields); |
176 |
my (@itemloop, %itemfields); |
| 176 |
my $norequests = 1; |
177 |
my $norequests = 1; |
| 177 |
my $authvalcode_items_itemlost = GetAuthValCode('items.itemlost',$fw); |
178 |
my $authvalcode_items_itemlost = GetAuthValCode('items.itemlost',$fw); |
|
Lines 203-212
foreach my $item (@items) {
Link Here
|
| 203 |
$item->{itemdamagedloop} = GetAuthorisedValues($authvalcode_items_damaged, $item->{damaged}) if $authvalcode_items_damaged; |
204 |
$item->{itemdamagedloop} = GetAuthorisedValues($authvalcode_items_damaged, $item->{damaged}) if $authvalcode_items_damaged; |
| 204 |
} |
205 |
} |
| 205 |
#get shelf location and collection code description if they are authorised value. |
206 |
#get shelf location and collection code description if they are authorised value. |
|
|
207 |
# same thing for copy number |
| 206 |
my $shelfcode = $item->{'location'}; |
208 |
my $shelfcode = $item->{'location'}; |
| 207 |
$item->{'location'} = $shelflocations->{$shelfcode} if ( defined( $shelfcode ) && defined($shelflocations) && exists( $shelflocations->{$shelfcode} ) ); |
209 |
$item->{'location'} = $shelflocations->{$shelfcode} if ( defined( $shelfcode ) && defined($shelflocations) && exists( $shelflocations->{$shelfcode} ) ); |
| 208 |
my $ccode = $item->{'ccode'}; |
210 |
my $ccode = $item->{'ccode'}; |
| 209 |
$item->{'ccode'} = $collections->{$ccode} if ( defined( $ccode ) && defined($collections) && exists( $collections->{$ccode} ) ); |
211 |
$item->{'ccode'} = $collections->{$ccode} if ( defined( $ccode ) && defined($collections) && exists( $collections->{$ccode} ) ); |
|
|
212 |
my $copynumber = $item->{'copynumber'}; |
| 213 |
$item->{'copynumber'} = $copynumbers->{$copynumber} if ( defined($copynumber) && defined($copynumbers) && exists( $copynumbers->{$copynumber} ) ); |
| 210 |
foreach (qw(ccode enumchron copynumber itemnotes uri)) { |
214 |
foreach (qw(ccode enumchron copynumber itemnotes uri)) { |
| 211 |
$itemfields{$_} = 1 if ( $item->{$_} ); |
215 |
$itemfields{$_} = 1 if ( $item->{$_} ); |
| 212 |
} |
216 |
} |