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

(-)a/Koha/EDI.pm (-4 / +4 lines)
Lines 782-795 sub process_quote { Link Here
782
            my $basketno = $added_baskets[$i];
782
            my $basketno = $added_baskets[$i];
783
783
784
            # Check if this basket has a PO number conflict
784
            # Check if this basket has a PO number conflict
785
            if ( exists $baskets_with_po_conflicts{$b} ) {
785
            if ( exists $baskets_with_po_conflicts{$basketno} ) {
786
                my $conflict_info = $baskets_with_po_conflicts{$b};
786
                my $conflict_info = $baskets_with_po_conflicts{$basketno};
787
                $logger->warn( "Auto-order blocked for basket $b due to duplicate PO number '"
787
                $logger->warn( "Auto-order blocked for basket $basketno due to duplicate PO number '"
788
                        . $conflict_info->{po_number}
788
                        . $conflict_info->{po_number}
789
                        . "' (existing basket: "
789
                        . "' (existing basket: "
790
                        . $conflict_info->{existing_basket}
790
                        . $conflict_info->{existing_basket}
791
                        . ")" );
791
                        . ")" );
792
                $logger->info("Basket $b remains open due to PO number conflict");
792
                $logger->info("Basket $basketno remains open due to PO number conflict");
793
                next;
793
                next;
794
            }
794
            }
795
795
(-)a/t/db_dependent/Koha/EDI.t (-2 / +1 lines)
Lines 38-44 my $builder = t::lib::TestBuilder->new; Link Here
38
my $logger  = t::lib::Mocks::Logger->new();
38
my $logger  = t::lib::Mocks::Logger->new();
39
39
40
subtest 'process_quote' => sub {
40
subtest 'process_quote' => sub {
41
    plan tests => 7;
41
    plan tests => 8;
42
42
43
    $schema->storage->txn_begin;
43
    $schema->storage->txn_begin;
44
44
45
- 

Return to bug 20253