Lines 2294-2307
sub PrepareItemrecordDisplay {
Link Here
|
2294 |
$subfield_data{repeatable} = $tagslib->{$tag}->{$subfield}->{repeatable}; |
2294 |
$subfield_data{repeatable} = $tagslib->{$tag}->{$subfield}->{repeatable}; |
2295 |
$subfield_data{hidden} = "display:none" |
2295 |
$subfield_data{hidden} = "display:none" |
2296 |
if $tagslib->{$tag}->{$subfield}->{hidden}; |
2296 |
if $tagslib->{$tag}->{$subfield}->{hidden}; |
2297 |
my ( $x, $value ); |
2297 |
my ( $x, $defaultvalue ); |
2298 |
if ($itemrecord) { |
2298 |
if ($itemrecord) { |
2299 |
( $x, $value ) = _find_value( $tag, $subfield, $itemrecord ); |
2299 |
( $x, $defaultvalue ) = _find_value( $tag, $subfield, $itemrecord ); |
2300 |
} |
2300 |
} |
2301 |
if ( !defined $value ) { |
2301 |
$defaultvalue = $tagslib->{$tag}->{$subfield}->{defaultvalue} unless $defaultvalue; |
2302 |
$value = q||; |
2302 |
if ( !defined $defaultvalue ) { |
|
|
2303 |
$defaultvalue = q||; |
2303 |
} |
2304 |
} |
2304 |
$value =~ s/"/"/g; |
2305 |
$defaultvalue =~ s/"/"/g; |
2305 |
|
2306 |
|
2306 |
# search for itemcallnumber if applicable |
2307 |
# search for itemcallnumber if applicable |
2307 |
if ( $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.itemcallnumber' |
2308 |
if ( $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.itemcallnumber' |
Lines 2310-2316
sub PrepareItemrecordDisplay {
Link Here
|
2310 |
my $CNsubfield = substr( C4::Context->preference('itemcallnumber'), 3, 1 ); |
2311 |
my $CNsubfield = substr( C4::Context->preference('itemcallnumber'), 3, 1 ); |
2311 |
my $temp = $itemrecord->field($CNtag) if ($itemrecord); |
2312 |
my $temp = $itemrecord->field($CNtag) if ($itemrecord); |
2312 |
if ($temp) { |
2313 |
if ($temp) { |
2313 |
$value = $temp->subfield($CNsubfield); |
2314 |
$defaultvalue = $temp->subfield($CNsubfield); |
2314 |
} |
2315 |
} |
2315 |
} |
2316 |
} |
2316 |
if ( $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.itemcallnumber' |
2317 |
if ( $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.itemcallnumber' |
Lines 2318-2324
sub PrepareItemrecordDisplay {
Link Here
|
2318 |
&& $defaultvalues->{'callnumber'} ) { |
2319 |
&& $defaultvalues->{'callnumber'} ) { |
2319 |
my $temp = $itemrecord->field($subfield) if ($itemrecord); |
2320 |
my $temp = $itemrecord->field($subfield) if ($itemrecord); |
2320 |
unless ($temp) { |
2321 |
unless ($temp) { |
2321 |
$value = $defaultvalues->{'callnumber'} if $defaultvalues; |
2322 |
$defaultvalue = $defaultvalues->{'callnumber'} if $defaultvalues; |
2322 |
} |
2323 |
} |
2323 |
} |
2324 |
} |
2324 |
if ( ( $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.holdingbranch' || $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.homebranch' ) |
2325 |
if ( ( $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.holdingbranch' || $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.homebranch' ) |
Lines 2326-2332
sub PrepareItemrecordDisplay {
Link Here
|
2326 |
&& $defaultvalues->{'branchcode'} ) { |
2327 |
&& $defaultvalues->{'branchcode'} ) { |
2327 |
my $temp = $itemrecord->field($subfield) if ($itemrecord); |
2328 |
my $temp = $itemrecord->field($subfield) if ($itemrecord); |
2328 |
unless ($temp) { |
2329 |
unless ($temp) { |
2329 |
$value = $defaultvalues->{branchcode} if $defaultvalues; |
2330 |
$defaultvalue = $defaultvalues->{branchcode} if $defaultvalues; |
2330 |
} |
2331 |
} |
2331 |
} |
2332 |
} |
2332 |
if ( $tagslib->{$tag}->{$subfield}->{authorised_value} ) { |
2333 |
if ( $tagslib->{$tag}->{$subfield}->{authorised_value} ) { |
Lines 2381-2394
sub PrepareItemrecordDisplay {
Link Here
|
2381 |
$subfield_data{marc_value} = CGI::scrolling_list( |
2382 |
$subfield_data{marc_value} = CGI::scrolling_list( |
2382 |
-name => 'field_value', |
2383 |
-name => 'field_value', |
2383 |
-values => \@authorised_values, |
2384 |
-values => \@authorised_values, |
2384 |
-default => "$value", |
2385 |
-default => "$defaultvalue", |
2385 |
-labels => \%authorised_lib, |
2386 |
-labels => \%authorised_lib, |
2386 |
-size => 1, |
2387 |
-size => 1, |
2387 |
-tabindex => '', |
2388 |
-tabindex => '', |
2388 |
-multiple => 0, |
2389 |
-multiple => 0, |
2389 |
); |
2390 |
); |
2390 |
} else { |
2391 |
} else { |
2391 |
$subfield_data{marc_value} = "<input type=\"text\" name=\"field_value\" value=\"$value\" size=\"50\" maxlength=\"255\" />"; |
2392 |
$subfield_data{marc_value} = "<input type=\"text\" name=\"field_value\" value=\"$defaultvalue\" size=\"50\" maxlength=\"255\" />"; |
2392 |
} |
2393 |
} |
2393 |
push( @loop_data, \%subfield_data ); |
2394 |
push( @loop_data, \%subfield_data ); |
2394 |
} |
2395 |
} |
2395 |
- |
|
|