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

(-)a/cataloguing/value_builder/unimarc_field_4XX.pl (-6 / +11 lines)
Lines 116-131 sub plugin { Link Here
116
            $subfield_value_a .= " " . $marcrecord->subfield( '700', "d" )
116
            $subfield_value_a .= " " . $marcrecord->subfield( '700', "d" )
117
              if $marcrecord->subfield( '700', 'd' );
117
              if $marcrecord->subfield( '700', 'd' );
118
            $subfield_value_a .=
118
            $subfield_value_a .=
119
              " (" . $marcrecord->subfield( '700', 'c' ) . " - "
119
              " (" . $marcrecord->subfield( '700', 'c' )
120
              if $marcrecord->subfield( '700',     'c' );
120
              if $marcrecord->subfield( '700',     'c' );
121
            $subfield_value_a .=  " ; "
122
              if $marcrecord->subfield( '700',     'c' )
123
                and $marcrecord->subfield( '700',     'f' );
121
            $subfield_value_a .= " ("
124
            $subfield_value_a .= " ("
122
              if ( $marcrecord->subfield( '700', 'f' )
125
              if ( $marcrecord->subfield( '700', 'f' )
123
                and not( $marcrecord->subfield( '700', 'c' ) ) );
126
                and not( $marcrecord->subfield( '700', 'c' ) ) );
124
            $subfield_value_a .= $marcrecord->subfield( '700', 'f' )
127
            $subfield_value_a .= $marcrecord->subfield( '700', 'f' )
125
              if ( $marcrecord->subfield( '700', 'f' ) );
128
              if ( $marcrecord->subfield( '700', 'f' ) );
126
            $subfield_value_a .= ")"
129
            $subfield_value_a .= ")"
127
              if ( $marcrecord->subfield( '701', 'f' )
130
              if ( $marcrecord->subfield( '700', 'f' )
128
                or $marcrecord->subfield( '701', 'c' ) );
131
                or $marcrecord->subfield( '700', 'c' ) );
129
        }
132
        }
130
        elsif ( $marcrecord->field('702') ) {
133
        elsif ( $marcrecord->field('702') ) {
131
            $subfield_value_a = $marcrecord->subfield( '702', 'a' );
134
            $subfield_value_a = $marcrecord->subfield( '702', 'a' );
Lines 134-141 sub plugin { Link Here
134
            $subfield_value_a .= " " . $marcrecord->subfield( '702', 'd' )
137
            $subfield_value_a .= " " . $marcrecord->subfield( '702', 'd' )
135
              if $marcrecord->subfield( '702', 'd' );
138
              if $marcrecord->subfield( '702', 'd' );
136
            $subfield_value_a .=
139
            $subfield_value_a .=
137
              " (" . $marcrecord->subfield( '702', 'c' ) . "; "
140
              " (" . $marcrecord->subfield( '702', 'c' )
138
              if $marcrecord->subfield( '702',     'c' );
141
              if $marcrecord->subfield( '702',     'c' );
142
            $subfield_value_a .=  " ; "
143
              if $marcrecord->subfield( '702',     'c' )
144
                and $marcrecord->subfield( '702',     'f' );
139
            $subfield_value_a .= " ("
145
            $subfield_value_a .= " ("
140
              if $marcrecord->subfield( '702', 'f' )
146
              if $marcrecord->subfield( '702', 'f' )
141
              and not $marcrecord->subfield( '702', 'c' );
147
              and not $marcrecord->subfield( '702', 'c' );
Lines 193-199 sub plugin { Link Here
193
              " (" . $marcrecord->subfield( '712', 'f' ) . " - "
199
              " (" . $marcrecord->subfield( '712', 'f' ) . " - "
194
              if $marcrecord->subfield( '712',     'f' );
200
              if $marcrecord->subfield( '712',     'f' );
195
            $subfield_value_a .= " ("
201
            $subfield_value_a .= " ("
196
              if $marcrecord->field( '712', "e" )
202
              if $marcrecord->subfield( '712', "e" )
197
              and not $marcrecord->subfield( '712', 'f' );
203
              and not $marcrecord->subfield( '712', 'f' );
198
            $subfield_value_a .= $marcrecord->subfield( '712', 'e' )
204
            $subfield_value_a .= $marcrecord->subfield( '712', 'e' )
199
              if $marcrecord->subfield( '712', 'e' );
205
              if $marcrecord->subfield( '712', 'e' );
200
- 

Return to bug 10331