Lines 1355-1360
sub GetItemsInfo {
Link Here
|
1355 |
} |
1355 |
} |
1356 |
$data->{itypenotforloan} = $data->{notforloan} if (C4::Context->preference('item-level_itypes')); |
1356 |
$data->{itypenotforloan} = $data->{notforloan} if (C4::Context->preference('item-level_itypes')); |
1357 |
|
1357 |
|
|
|
1358 |
# get restricted status and description if applicable |
1359 |
my $restrictedstatus = $dbh->prepare( |
1360 |
'SELECT authorised_value |
1361 |
FROM marc_subfield_structure |
1362 |
WHERE kohafield="items.restricted" |
1363 |
' |
1364 |
); |
1365 |
|
1366 |
$restrictedstatus->execute; |
1367 |
my ($authorised_valuecode) = $restrictedstatus->fetchrow; |
1368 |
if ($authorised_valuecode) { |
1369 |
$restrictedstatus = $dbh->prepare( |
1370 |
"SELECT lib,lib_opac FROM authorised_values |
1371 |
WHERE category=? |
1372 |
AND authorised_value=?" |
1373 |
); |
1374 |
$restrictedstatus->execute( $authorised_valuecode, |
1375 |
$data->{restricted} ); |
1376 |
|
1377 |
if ( my $rstdata = $restrictedstatus->fetchrow_hashref ) { |
1378 |
$data->{restricted} = $rstdata->{'lib'}; |
1379 |
$data->{restrictedopac} = $rstdata->{'lib_opac'}; |
1380 |
} |
1381 |
} |
1382 |
|
1358 |
# my stack procedures |
1383 |
# my stack procedures |
1359 |
my $stackstatus = $dbh->prepare( |
1384 |
my $stackstatus = $dbh->prepare( |
1360 |
'SELECT authorised_value |
1385 |
'SELECT authorised_value |