From e5b62daaf0c5ff55f328556f816b446859ace831 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Tue, 14 Jan 2014 14:00:16 +0100 Subject: [PATCH] Bug 11551: Add unit tests for GetHistory prove t/db_dependent/Acquisition.t should return green. Signed-off-by: remy juliette --- t/db_dependent/Acquisition.t | 8 ++++++++ 1 files changed, 8 insertions(+), 0 deletions(-) diff --git a/t/db_dependent/Acquisition.t b/t/db_dependent/Acquisition.t index 185b7ac..7a30414 100755 --- a/t/db_dependent/Acquisition.t +++ b/t/db_dependent/Acquisition.t @@ -807,6 +807,14 @@ is( $neworder->{'quantityreceived'}, 2, 'Splitting up order received items on new order' ); is( $neworder->{'budget_id'}, $budgetid, 'Budget on new order is unchanged' ); +is( $neworder->{ordernumber}, $new_ordernumber, 'Split: test ordernumber' ); +is( $neworder->{parent_ordernumber}, $ordernumber2, 'Split: test parent_ordernumber' ); + +( $orders ) = GetHistory( ordernumber => $ordernumber2 ); +is( scalar( @$orders ), 1, 'GetHistory with a given ordernumber returns 1 order' ); +( $orders ) = GetHistory( ordernumber => $ordernumber2, search_children_too => 1 ); +is( scalar( @$orders ), 2, 'GetHistory with a given ordernumber and search_children_too set returns 2 orders' ); + my $budgetid2 = C4::Budgets::AddBudget( { budget_code => "budget_code_test_modrecv", -- 1.7.2.5