Lines 68-74
my $title=$query->param('title');
Link Here
|
68 |
my $bi=$query->param('bi'); |
68 |
my $bi=$query->param('bi'); |
69 |
$bi = $biblionumber unless $bi; |
69 |
$bi = $biblionumber unless $bi; |
70 |
my $itemnumber = $query->param('itemnumber'); |
70 |
my $itemnumber = $query->param('itemnumber'); |
71 |
my $data=GetBiblioData($biblionumber); |
71 |
my $data = &GetBiblioData($biblionumber); |
72 |
my $dewey = $data->{'dewey'}; |
72 |
my $dewey = $data->{'dewey'}; |
73 |
my $showallitems = $query->param('showallitems'); |
73 |
my $showallitems = $query->param('showallitems'); |
74 |
|
74 |
|
Lines 86-92
my $subscriptionsnumber = CountSubscriptionFromBiblionumber($biblionumber);
Link Here
|
86 |
# $dewey=~ s/\.$//; |
86 |
# $dewey=~ s/\.$//; |
87 |
# $data->{'dewey'}=$dewey; |
87 |
# $data->{'dewey'}=$dewey; |
88 |
|
88 |
|
89 |
my @results; |
|
|
90 |
my $fw = GetFrameworkCode($biblionumber); |
89 |
my $fw = GetFrameworkCode($biblionumber); |
91 |
my @all_items= GetItemsInfo($biblionumber); |
90 |
my @all_items= GetItemsInfo($biblionumber); |
92 |
my @items; |
91 |
my @items; |
Lines 107-113
if (@hostitems){
Link Here
|
107 |
push (@items,@hostitems); |
106 |
push (@items,@hostitems); |
108 |
} |
107 |
} |
109 |
|
108 |
|
110 |
|
109 |
my $subtitle = GetRecordValue('subtitle', $record, $fw); |
111 |
|
110 |
|
112 |
my $totalcount=@all_items; |
111 |
my $totalcount=@all_items; |
113 |
my $showncount=@items; |
112 |
my $showncount=@items; |
Lines 120-126
my $ccodes= GetKohaAuthorisedValues('items.ccode',$fw);
Link Here
|
120 |
my $itemtypes = GetItemTypes; |
119 |
my $itemtypes = GetItemTypes; |
121 |
|
120 |
|
122 |
$data->{'itemtypename'} = $itemtypes->{$data->{'itemtype'}}->{'description'}; |
121 |
$data->{'itemtypename'} = $itemtypes->{$data->{'itemtype'}}->{'description'}; |
123 |
$results[0]=$data; |
122 |
|
|
|
123 |
foreach ( keys %{$data} ) { |
124 |
$template->param( "$_" => defined $data->{$_} ? $data->{$_} : '' ); |
125 |
} |
126 |
|
124 |
($itemnumber) and @items = (grep {$_->{'itemnumber'} == $itemnumber} @items); |
127 |
($itemnumber) and @items = (grep {$_->{'itemnumber'} == $itemnumber} @items); |
125 |
foreach my $item (@items){ |
128 |
foreach my $item (@items){ |
126 |
$item->{itemlostloop}= GetAuthorisedValues(GetAuthValCode('items.itemlost',$fw),$item->{itemlost}) if GetAuthValCode('items.itemlost',$fw); |
129 |
$item->{itemlostloop}= GetAuthorisedValues(GetAuthValCode('items.itemlost',$fw),$item->{itemlost}) if GetAuthValCode('items.itemlost',$fw); |
Lines 169-183
$template->param(count => $data->{'count'},
Link Here
|
169 |
subscriptiontitle => $data->{title}, |
172 |
subscriptiontitle => $data->{title}, |
170 |
C4::Search::enabled_staff_search_views, |
173 |
C4::Search::enabled_staff_search_views, |
171 |
); |
174 |
); |
172 |
$template->param(BIBITEM_DATA => \@results); |
175 |
|
173 |
$template->param(ITEM_DATA => \@items); |
176 |
$template->param( |
174 |
$template->param(moredetailview => 1); |
177 |
ITEM_DATA => \@items, |
175 |
$template->param(loggedinuser => $loggedinuser); |
178 |
moredetailview => 1, |
176 |
$template->param(biblionumber => $biblionumber); |
179 |
loggedinuser => $loggedinuser, |
177 |
$template->param(biblioitemnumber => $bi); |
180 |
biblionumber => $biblionumber, |
178 |
$template->param(itemnumber => $itemnumber); |
181 |
biblioitemnumber => $bi, |
|
|
182 |
itemnumber => $itemnumber, |
183 |
z3950_search_params => C4::Search::z3950_search_args(GetBiblioData($biblionumber)), |
184 |
subtitle => $subtitle, |
185 |
); |
179 |
$template->param(ONLY_ONE => 1) if ( $itemnumber && $showncount != @items ); |
186 |
$template->param(ONLY_ONE => 1) if ( $itemnumber && $showncount != @items ); |
180 |
$template->param(z3950_search_params => C4::Search::z3950_search_args(GetBiblioData($biblionumber))); |
|
|
181 |
|
187 |
|
182 |
output_html_with_http_headers $query, $cookie, $template->output; |
188 |
output_html_with_http_headers $query, $cookie, $template->output; |
183 |
|
189 |
|