|
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 |
- |
|
|