|
Lines 352-364
sub create_input {
Link Here
|
| 352 |
build_authorized_values_list( $tag, $subfield, $value, $dbh, |
352 |
build_authorized_values_list( $tag, $subfield, $value, $dbh, |
| 353 |
$authorised_values_sth,$index_tag,$index_subfield ); |
353 |
$authorised_values_sth,$index_tag,$index_subfield ); |
| 354 |
|
354 |
|
| 355 |
# it's a subfield $9 linking to an authority record - see bug 2206 |
355 |
# it's a subfield $9 linking to an authority record - see bug 2206 and 28022 |
| 356 |
} |
356 |
} |
| 357 |
elsif ($subfield eq "9" and |
357 |
elsif ($subfield eq "9" and |
| 358 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
358 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
| 359 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
359 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
| 360 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne '') { |
360 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne '' and |
| 361 |
|
361 |
$tagslib->{$tag}->{'a'}->{hidden} > -4 and |
|
|
362 |
$tagslib->{$tag}->{'a'}->{hidden} < 5) { |
| 362 |
$subfield_data{marc_value} = { |
363 |
$subfield_data{marc_value} = { |
| 363 |
type => 'text', |
364 |
type => 'text', |
| 364 |
id => $subfield_data{id}, |
365 |
id => $subfield_data{id}, |
|
Lines 600-610
sub build_tabs {
Link Here
|
| 600 |
and not ( $subfield eq "9" and |
601 |
and not ( $subfield eq "9" and |
| 601 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
602 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
| 602 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
603 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
| 603 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne "" |
604 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne "" and |
|
|
605 |
$tagslib->{$tag}->{'a'}->{hidden} > -4 and |
| 606 |
$tagslib->{$tag}->{'a'}->{hidden} < 5 |
| 604 |
) |
607 |
) |
| 605 |
; #check for visibility flag |
608 |
; #check for visibility flag |
| 606 |
# if subfield is $9 in a field whose $a is authority-controlled, |
609 |
# if subfield is $9 in a field whose $a is authority-controlled, |
| 607 |
# always include in the form regardless of the hidden setting - bug 2206 |
610 |
# always include in the form regardless of the hidden setting - bug 2206 and 28022 |
| 608 |
next if ( defined( $field->subfield($subfield) ) ); |
611 |
next if ( defined( $field->subfield($subfield) ) ); |
| 609 |
push( |
612 |
push( |
| 610 |
@subfields_data, |
613 |
@subfields_data, |
|
Lines 653-663
sub build_tabs {
Link Here
|
| 653 |
and not ( $subfield->{subfield} eq "9" and |
656 |
and not ( $subfield->{subfield} eq "9" and |
| 654 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
657 |
exists($tagslib->{$tag}->{'a'}->{authtypecode}) and |
| 655 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
658 |
defined($tagslib->{$tag}->{'a'}->{authtypecode}) and |
| 656 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne "" |
659 |
$tagslib->{$tag}->{'a'}->{authtypecode} ne "" and |
|
|
660 |
$tagslib->{$tag}->{'a'}->{hidden} > -4 and |
| 661 |
$tagslib->{$tag}->{'a'}->{hidden} < 5 |
| 657 |
) |
662 |
) |
| 658 |
; #check for visibility flag |
663 |
; #check for visibility flag |
| 659 |
# if subfield is $9 in a field whose $a is authority-controlled, |
664 |
# if subfield is $9 in a field whose $a is authority-controlled, |
| 660 |
# always include in the form regardless of the hidden setting - bug 2206 |
665 |
# always include in the form regardless of the hidden setting - bug 2206 and 28022 |
| 661 |
next |
666 |
next |
| 662 |
if ( $subfield->{tab} ne $tabloop ); |
667 |
if ( $subfield->{tab} ne $tabloop ); |
| 663 |
push( |
668 |
push( |
| 664 |
- |
|
|