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

(-)a/t/db_dependent/Koha/EDI.t (-24 / +105 lines)
Lines 59-74 subtest 'process_quote' => sub { Link Here
59
59
60
        $schema->storage->txn_begin;
60
        $schema->storage->txn_begin;
61
61
62
        # Create file transport for local testing
63
        my $file_transport = $builder->build(
64
            {
65
                source => 'FileTransport',
66
                value  => {
67
                    name               => 'Test Local Transport',
68
                    transport          => 'local',
69
                    download_directory => $dirname,
70
                    upload_directory   => $dirname,
71
                }
72
            }
73
        );
74
62
        my $account = $builder->build(
75
        my $account = $builder->build(
63
            {
76
            {
64
                source => 'VendorEdiAccount',
77
                source => 'VendorEdiAccount',
65
                value  => {
78
                value  => {
66
                    description    => 'test vendor',
79
                    description       => 'test vendor',
67
                    transport      => 'FILE',
80
                    file_transport_id => $file_transport->{file_transport_id},
68
                    plugin         => '',
81
                    plugin            => '',
69
                    san            => $test_san,
82
                    san               => $test_san,
70
                    orders_enabled => 1,
83
                    orders_enabled    => 1,
71
                    auto_orders    => 0,
84
                    auto_orders       => 0,
72
                }
85
                }
73
            }
86
            }
74
        );
87
        );
Lines 228-243 subtest 'process_quote' => sub { Link Here
228
        plan tests => 7;
241
        plan tests => 7;
229
242
230
        $schema->storage->txn_begin;
243
        $schema->storage->txn_begin;
244
245
        # Create file transport for local testing
246
        my $file_transport = $builder->build(
247
            {
248
                source => 'FileTransport',
249
                value  => {
250
                    name               => 'Test Auto Order Transport',
251
                    transport          => 'local',
252
                    download_directory => $dirname,
253
                    upload_directory   => $dirname,
254
                }
255
            }
256
        );
257
231
        my $account = $builder->build(
258
        my $account = $builder->build(
232
            {
259
            {
233
                source => 'VendorEdiAccount',
260
                source => 'VendorEdiAccount',
234
                value  => {
261
                value  => {
235
                    description    => 'auto order vendor',
262
                    description       => 'auto order vendor',
236
                    transport      => 'FILE',
263
                    file_transport_id => $file_transport->{file_transport_id},
237
                    plugin         => '',
264
                    plugin            => '',
238
                    san            => $test_san,
265
                    san               => $test_san,
239
                    orders_enabled => 1,
266
                    orders_enabled    => 1,
240
                    auto_orders    => 1,
267
                    auto_orders       => 1,
241
                }
268
                }
242
            }
269
            }
243
        );
270
        );
Lines 315-328 subtest 'process_quote' => sub { Link Here
315
342
316
        $schema->storage->txn_begin;
343
        $schema->storage->txn_begin;
317
344
345
        # Create file transport for local testing
346
        my $file_transport = $builder->build(
347
            {
348
                source => 'FileTransport',
349
                value  => {
350
                    name               => 'Test Multi-item Transport',
351
                    transport          => 'local',
352
                    download_directory => $dirname,
353
                    upload_directory   => $dirname,
354
                }
355
            }
356
        );
357
318
        # Create vendor EDI account
358
        # Create vendor EDI account
319
        my $account = $builder->build(
359
        my $account = $builder->build(
320
            {
360
            {
321
                source => 'VendorEdiAccount',
361
                source => 'VendorEdiAccount',
322
                value  => {
362
                value  => {
323
                    description => 'multi-item vendor',
363
                    description       => 'multi-item vendor',
324
                    transport   => 'FILE',
364
                    file_transport_id => $file_transport->{file_transport_id},
325
                    plugin      => '',
365
                    plugin            => '',
326
                }
366
                }
327
            }
367
            }
328
        );
368
        );
Lines 475-486 subtest 'process_quote' => sub { Link Here
475
515
476
        $schema->storage->txn_begin;
516
        $schema->storage->txn_begin;
477
517
518
        # Create file transport for local testing
519
        my $file_transport = $builder->build(
520
            {
521
                source => 'FileTransport',
522
                value  => {
523
                    name               => 'Test Error Transport',
524
                    transport          => 'local',
525
                    download_directory => $dirname,
526
                    upload_directory   => $dirname,
527
                }
528
            }
529
        );
530
478
        my $account = $builder->build(
531
        my $account = $builder->build(
479
            {
532
            {
480
                source => 'VendorEdiAccount',
533
                source => 'VendorEdiAccount',
481
                value  => {
534
                value  => {
482
                    description => 'error test vendor',
535
                    description       => 'error test vendor',
483
                    transport   => 'FILE',
536
                    file_transport_id => $file_transport->{file_transport_id},
484
                }
537
                }
485
            }
538
            }
486
        );
539
        );
Lines 582-593 subtest 'process_quote' => sub { Link Here
582
635
583
        $schema->storage->txn_begin;
636
        $schema->storage->txn_begin;
584
637
638
        # Create file transport for local testing
639
        my $file_transport = $builder->build(
640
            {
641
                source => 'FileTransport',
642
                value  => {
643
                    name               => 'Test Multiple Message Transport',
644
                    transport          => 'local',
645
                    download_directory => $dirname,
646
                    upload_directory   => $dirname,
647
                }
648
            }
649
        );
650
585
        my $account = $builder->build(
651
        my $account = $builder->build(
586
            {
652
            {
587
                source => 'VendorEdiAccount',
653
                source => 'VendorEdiAccount',
588
                value  => {
654
                value  => {
589
                    description => 'error test vendor',
655
                    description       => 'error test vendor',
590
                    transport   => 'FILE',
656
                    file_transport_id => $file_transport->{file_transport_id},
591
                }
657
                }
592
            }
658
            }
593
        );
659
        );
Lines 646-660 subtest 'process_invoice' => sub { Link Here
646
712
647
    $schema->storage->txn_begin;
713
    $schema->storage->txn_begin;
648
714
715
    # Get dirname for transport
716
    my $dirname = ( $Bin =~ /^(.*\/t\/)/ ? $1 . 'edi_testfiles/' : q{} );
717
718
    # Create file transport for local testing
719
    my $file_transport = $builder->build(
720
        {
721
            source => 'FileTransport',
722
            value  => {
723
                name               => 'Test Invoice Transport',
724
                transport          => 'local',
725
                download_directory => $dirname,
726
                upload_directory   => $dirname,
727
            }
728
        }
729
    );
730
649
    # Add test EDI matching ean of test invoice file and ensure no plugins so we trigger core functions
731
    # Add test EDI matching ean of test invoice file and ensure no plugins so we trigger core functions
650
    my $account = $builder->build(
732
    my $account = $builder->build(
651
        {
733
        {
652
            source => 'VendorEdiAccount',
734
            source => 'VendorEdiAccount',
653
            value  => {
735
            value  => {
654
                description => 'test vendor',
736
                description       => 'test vendor',
655
                transport   => 'FILE',
737
                file_transport_id => $file_transport->{file_transport_id},
656
                plugin      => '',
738
                plugin            => '',
657
                san         => '5013546027173'
739
                san               => '5013546027173'
658
            }
740
            }
659
        }
741
        }
660
    );
742
    );
Lines 694-700 subtest 'process_invoice' => sub { Link Here
694
    my $ordernumber2 = $order2->ordernumber;
776
    my $ordernumber2 = $order2->ordernumber;
695
777
696
    # Add test invoice file to the database for testing
778
    # Add test invoice file to the database for testing
697
    my $dirname  = ( $Bin =~ /^(.*\/t\/)/ ? $1 . 'edi_testfiles/' : q{} );
698
    my $filename = 'INVOICE.CEI';
779
    my $filename = 'INVOICE.CEI';
699
    ok( -e $dirname . $filename, 'File INVOICE.CEI found' );
780
    ok( -e $dirname . $filename, 'File INVOICE.CEI found' );
700
781
(-)a/t/db_dependent/Koha/Edifact/Transport.t (-2 / +1 lines)
Lines 21-27 my $account = $builder->build( Link Here
21
    {
21
    {
22
        source => 'VendorEdiAccount',
22
        source => 'VendorEdiAccount',
23
        value  => {
23
        value  => {
24
            description => 'test vendor', transport => 'FILE',
24
            description => 'test vendor',
25
        }
25
        }
26
    }
26
    }
27
);
27
);
28
- 

Return to bug 38489