Lines 94-99
sub _get_label_item {
Link Here
|
94 |
my $data1 = $sth1->fetchrow_hashref; |
94 |
my $data1 = $sth1->fetchrow_hashref; |
95 |
$data->{'itemtype'} = $data1->{'description'}; |
95 |
$data->{'itemtype'} = $data1->{'description'}; |
96 |
$data->{'itype'} = $data1->{'description'}; |
96 |
$data->{'itype'} = $data1->{'description'}; |
|
|
97 |
#Replace item's branch codes with branch names |
98 |
if ($data->{'homebranch'} || $data->{'holdingbranch'}){ |
99 |
require C4::Branch; |
100 |
$data->{'homebranch'} = C4::Branch::GetBranchName($data->{'homebranch'}) if $data->{'homebranch'}; |
101 |
$data->{'holdingbranch'} = C4::Branch::GetBranchName($data->{'holdingbranch'}) if $data->{'holdingbranch'}; |
102 |
} |
103 |
#Replace ccode, location, permanent_location with descriptions |
104 |
my $ccode = C4::Biblio::GetAuthorisedValueDesc('','', $data->{'ccode'} ,'','','CCODE', 1); |
105 |
$data->{'ccode'} = $ccode if $ccode; |
106 |
my $location = C4::Biblio::GetAuthorisedValueDesc('','', $data->{'location'} ,'','','LOC', 1); |
107 |
$data->{'location'} = $location if $location; |
108 |
my $permanent_location = C4::Biblio::GetAuthorisedValueDesc('','', $data->{'permanent_location'} ,'','','LOC', 1); |
109 |
$data->{'permanent_location'} = $permanent_location if $permanent_location; |
97 |
$barcode_only ? return $data->{'barcode'} : return $data; |
110 |
$barcode_only ? return $data->{'barcode'} : return $data; |
98 |
} |
111 |
} |
99 |
|
112 |
|
100 |
- |
|
|