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

(-)a/C4/Acquisition.pm (-2 lines)
Lines 2940-2947 sub populate_order_with_prices { Link Here
2940
    }
2940
    }
2941
2941
2942
    if ($receiving) {
2942
    if ($receiving) {
2943
        # The following is completely wrong. Will be fixed later.
2944
        # See the unit tests to know what is wrong.
2945
        if ( $bookseller->{listincgst} ) {
2943
        if ( $bookseller->{listincgst} ) {
2946
            $order->{unitpricegsti} = Koha::Number::Price->new( $order->{unitprice} )->round;
2944
            $order->{unitpricegsti} = Koha::Number::Price->new( $order->{unitprice} )->round;
2947
            $order->{unitpricegste} = Koha::Number::Price->new(
2945
            $order->{unitpricegste} = Koha::Number::Price->new(
(-)a/t/Prices.t (-6 / +3 lines)
Lines 118-126 for my $currency_format ( qw( US FR ) ) { Link Here
118
                receiving    => 1,
118
                receiving    => 1,
119
            }
119
            }
120
        );
120
        );
121
        # Note that this configuration is *not* correct!
121
122
        # unitpricegsti should be 75.28
122
        # Note that this configuration is correct \o/
123
        # totalgst should be 150.56
124
        compare(
123
        compare(
125
            {
124
            {
126
                got      => $order_0_0->{unitpricegsti},
125
                got      => $order_0_0->{unitpricegsti},
Lines 341-346 for my $currency_format ( qw( US FR ) ) { Link Here
341
340
342
        # Note that this configuration is *not* correct!
341
        # Note that this configuration is *not* correct!
343
        # rrp gsti should be 82 (what we inserted!)
342
        # rrp gsti should be 82 (what we inserted!)
343
        # => Actually we need to fix the inserted value (here we have 82.01 in DB)
344
        # gstvalue should be 7.03 instead of 7.02
344
        # gstvalue should be 7.03 instead of 7.02
345
345
346
        compare(
346
        compare(
Lines 408-415 for my $currency_format ( qw( US FR ) ) { Link Here
408
            }
408
            }
409
        );
409
        );
410
        # Note that this configuration is *not* correct!
410
        # Note that this configuration is *not* correct!
411
        # unitpricegsti should be 71.69
412
        # totalgsti should be 143.38
413
        # gstvalue should be 7.03
411
        # gstvalue should be 7.03
414
        compare(
412
        compare(
415
            {
413
            {
416
- 

Return to bug 12976