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