t/lib/KohaTest/ImportBatch/AddItemsToImportBiblio.pm

   1 package KohaTest::ImportBatch::getImportBatch;
   2 use base qw( KohaTest::ImportBatch );
   3
   4 use strict;
   5 use warnings;
   6
   7 use Test::More;
   8
   9 use C4::ImportBatch;
  10 use C4::Matcher;
  11 use C4::Biblio;
  12
  13
  14 sub something : Test( 2 ) {
  15     my $self = shift;
  16
  17     my $batch_id = $self->add_import_batch();
  18     ok( $batch_id, 'we have a batch_id' );
  19
  20     my $import_record_id = 0;
  21
  22     my $marc_record = MARC::Record->new();
  23
  24     my @import_item_ids = C4::ImportBatch::AddItemsToImportBiblio( $batch_id, $import_record_id, $marc_record );
  25     is( scalar( @import_item_ids ), 0, 'none inserted' );
  26
  27 }
  28
  29 1;