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

(-)a/t/db_dependent/Koha/MarcOrder.t (-2 / +34 lines)
Lines 175-181 budget_code: 975$h' Link Here
175
};
175
};
176
176
177
subtest 'add_biblio_from_import_record()' => sub {
177
subtest 'add_biblio_from_import_record()' => sub {
178
    plan tests => 4;
178
    plan tests => 5;
179
179
180
    $schema->storage->txn_begin;
180
    $schema->storage->txn_begin;
181
181
Lines 221-226 subtest 'add_biblio_from_import_record()' => sub { Link Here
221
        'A new biblionumber is added or an existing biblionumber is returned'
221
        'A new biblionumber is added or an existing biblionumber is returned'
222
    );
222
    );
223
223
224
    my $match_biblio    = $builder->build_sample_biblio();
225
    my $match_biblio_id = $match_biblio->biblionumber;
226
    $match_biblio->delete;
227
    my $match_record = MARC::Record->new();
228
    $match_record->add_fields(
229
        [ '001', '1234' ],
230
        [ '020', ' ', ' ', a => '9780596004931' ],
231
        [ '975', ' ', ' ', p => 10, q => 1, h => 1 ],
232
    );
233
234
    my $match_import_record_id = C4::ImportBatch::AddBiblioToBatch( $import_batch_id, 0, $match_record, 'utf8', 0 );
235
    my $match_import_record    = Koha::Import::Records->find($match_import_record_id);
236
    my $import_record_match    = Koha::Import::Record::Match->new(
237
        {
238
            import_record_id   => $match_import_record_id,
239
            candidate_match_id => $match_biblio_id,
240
            chosen             => 1,
241
        }
242
    )->store;
243
    my $match_result = Koha::MarcOrder::add_biblio_from_import_record(
244
        {
245
            import_record   => $match_import_record,
246
            matcher_id      => $sample_import_batch->{matcher_id},
247
            overlay_action  => 'replace',
248
            agent           => 'interface',
249
            import_batch_id => $import_batch_id
250
        }
251
    );
252
    isnt(
253
        $match_result->{record_result}->{biblionumber}, $match_biblio_id,
254
        'A new biblionumber is added when the matched biblionumber does not exist'
255
    );
256
224
    # Check that records are skipped if not selected when called from addorderiso2709.pl
257
    # Check that records are skipped if not selected when called from addorderiso2709.pl
225
    # Pass in an empty array and the record should be skipped
258
    # Pass in an empty array and the record should be skipped
226
    my @import_record_id_selected = ();
259
    my @import_record_id_selected = ();
227
- 

Return to bug 39752