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

(-)a/misc/maintenance/search_for_data_inconsistencies.pl (-2 / +4 lines)
Lines 243-249 use C4::Biblio qw( GetMarcFromKohaField ); Link Here
243
                my $kohafield = $v->{kohafield};
243
                my $kohafield = $v->{kohafield};
244
                my ( $table, $column ) = split '\.', $kohafield;
244
                my ( $table, $column ) = split '\.', $kohafield;
245
                while ( my $i = $items->next ) {
245
                while ( my $i = $items->next ) {
246
                    my $value = $table eq 'items' ? $i->$column : $i->biblioitem->$column;
246
                    my $value =
247
                        $table eq 'items'  ? $i->$column
248
                      : $table eq 'biblio' ? $i->biblio->$column
249
                      :                      $i->biblioitem->$column;
247
                    $output .= " {" . $i->itemnumber . " => " . $value . "}";
250
                    $output .= " {" . $i->itemnumber . " => " . $value . "}";
248
                }
251
                }
249
                new_item(
252
                new_item(
250
- 

Return to bug 31239