View | Details | Raw Unified | Return to bug 28022
Collapse All | Expand All

(-)a/cataloguing/addbiblio.pl (-8 / +12 lines)
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
- 

Return to bug 28022