Lines 343-355
sub create_input {
Link Here
|
343 |
build_authorized_values_list( $tag, $subfield, $value, $dbh, |
343 |
build_authorized_values_list( $tag, $subfield, $value, $dbh, |
344 |
$authorised_values_sth,$index_tag,$index_subfield ); |
344 |
$authorised_values_sth,$index_tag,$index_subfield ); |
345 |
|
345 |
|
346 |
# it's a subfield $9 linking to an authority record - see bug 2206 |
346 |
# it's a subfield $9 linking to an authority record - see bug 2206 and 28022 |
347 |
} |
347 |
} |
348 |
elsif ($subfield eq "9" and |
348 |
elsif ($subfield eq "9" and |
349 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
349 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
350 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
350 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
351 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne '') { |
351 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne '' and |
352 |
|
352 |
$tagslib->{$tag}->{'a'}->{hidden} > -4 and |
|
|
353 |
$tagslib->{$tag}->{'a'}->{hidden} < 5) { |
353 |
$subfield_data{marc_value} = { |
354 |
$subfield_data{marc_value} = { |
354 |
type => 'text', |
355 |
type => 'text', |
355 |
id => $subfield_data{id}, |
356 |
id => $subfield_data{id}, |
Lines 591-601
sub build_tabs {
Link Here
|
591 |
and not ( $subfield eq "9" and |
592 |
and not ( $subfield eq "9" and |
592 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
593 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
593 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
594 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
594 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne "" |
595 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne "" and |
|
|
596 |
$tagslib->{$tag}->{'a'}->{hidden} > -4 and |
597 |
$tagslib->{$tag}->{'a'}->{hidden} < 5 |
595 |
) |
598 |
) |
596 |
; #check for visibility flag |
599 |
; #check for visibility flag |
597 |
# if subfield is $9 in a field whose $a is authority-controlled, |
600 |
# if subfield is $9 in a field whose $a is authority-controlled, |
598 |
# always include in the form regardless of the hidden setting - bug 2206 |
601 |
# always include in the form regardless of the hidden setting - bug 2206 and 28022 |
599 |
next if ( defined( $field->subfield($subfield) ) ); |
602 |
next if ( defined( $field->subfield($subfield) ) ); |
600 |
push( |
603 |
push( |
601 |
@subfields_data, |
604 |
@subfields_data, |
Lines 644-654
sub build_tabs {
Link Here
|
644 |
and not ( $subfield->{subfield} eq "9" and |
647 |
and not ( $subfield->{subfield} eq "9" and |
645 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
648 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
646 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
649 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
647 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne "" |
650 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne "" and |
|
|
651 |
$tagslib->{$tag}->{'a'}->{hidden} > -4 and |
652 |
$tagslib->{$tag}->{'a'}->{hidden} < 5 |
648 |
) |
653 |
) |
649 |
; #check for visibility flag |
654 |
; #check for visibility flag |
650 |
# if subfield is $9 in a field whose $a is authority-controlled, |
655 |
# if subfield is $9 in a field whose $a is authority-controlled, |
651 |
# always include in the form regardless of the hidden setting - bug 2206 |
656 |
# always include in the form regardless of the hidden setting - bug 2206 and 28022 |
652 |
next |
657 |
next |
653 |
if ( $subfield->{tab} ne $tabloop ); |
658 |
if ( $subfield->{tab} ne $tabloop ); |
654 |
push( |
659 |
push( |
655 |
- |
|
|