|
Lines 8-14
use POSIX qw(strftime);
Link Here
|
| 8 |
|
8 |
|
| 9 |
use C4::Bookseller qw( GetBookSellerFromId ); |
9 |
use C4::Bookseller qw( GetBookSellerFromId ); |
| 10 |
|
10 |
|
| 11 |
use Test::More tests => 77; |
11 |
use Test::More tests => 79; |
| 12 |
|
12 |
|
| 13 |
BEGIN { |
13 |
BEGIN { |
| 14 |
use_ok('C4::Acquisition'); |
14 |
use_ok('C4::Acquisition'); |
|
Lines 727-732
$search_orders = SearchOrders({
Link Here
|
| 727 |
}); |
727 |
}); |
| 728 |
is( scalar (@$search_orders), 0, "SearchOrders with pending and ordered params gets only pending ordered orders (bug 11170)" ); |
728 |
is( scalar (@$search_orders), 0, "SearchOrders with pending and ordered params gets only pending ordered orders (bug 11170)" ); |
| 729 |
|
729 |
|
|
|
730 |
$search_orders = SearchOrders({ |
| 731 |
ordernumber => $ordernumbers[4] |
| 732 |
}); |
| 733 |
is( scalar (@$search_orders), 1, "SearchOrders takes into account the ordernumber filter" ); |
| 734 |
|
| 735 |
$search_orders = SearchOrders({ |
| 736 |
biblionumber => $biblionumber4 |
| 737 |
}); |
| 738 |
is( scalar (@$search_orders), 1, "SearchOrders takes into account the biblionumber filter" ); |
| 739 |
|
| 740 |
$search_orders = SearchOrders({ |
| 741 |
biblionumber => $biblionumber4, |
| 742 |
pending => 1 |
| 743 |
}); |
| 744 |
is( scalar (@$search_orders), 0, "SearchOrders takes into account the biblionumber and pending filters" ); |
| 730 |
|
745 |
|
| 731 |
# |
746 |
# |
| 732 |
# Test GetBudgetByOrderNumber |
747 |
# Test GetBudgetByOrderNumber |
|
Lines 798-808
$search_orders = SearchOrders({
Link Here
|
| 798 |
}); |
813 |
}); |
| 799 |
is( scalar (@$search_orders), 3, "SearchOrders with pending and ordered params gets only pending ordered orders. After closing the basket, orders are marked as 'ordered' (bug 11170)" ); |
814 |
is( scalar (@$search_orders), 3, "SearchOrders with pending and ordered params gets only pending ordered orders. After closing the basket, orders are marked as 'ordered' (bug 11170)" ); |
| 800 |
|
815 |
|
| 801 |
$search_orders = SearchOrders({ |
|
|
| 802 |
ordernumber => $ordernumbers[4] |
| 803 |
}); |
| 804 |
is( scalar (@$search_orders), 1, "SearchOrders takes into account the ordernumber filter" ); |
| 805 |
|
| 806 |
# |
816 |
# |
| 807 |
# Test AddClaim |
817 |
# Test AddClaim |
| 808 |
# |
818 |
# |
| 809 |
- |
|
|