Bug 10290: Followup for Virtualshelves.t

[koha_fer] / t / db_dependent / Acquisition.t

diff --git a/t/db_dependent/Acquisition.t b/t/db_dependent/Acquisition.t
index 1d4f36a..c015425 100755 (executable)
--- a/t/db_dependent/Acquisition.t
+++ b/t/db_dependent/Acquisition.t
@@ -6,6 +6,7 @@
 use strict;
 use warnings;
 use Data::Dumper;
+use POSIX qw(strftime);
 
 use C4::Bookseller qw( GetBookSellerFromId );
 
@@ -30,13 +31,23 @@ my $supplierid = 1;
 my $grouped    = 0;
 my $orders = GetPendingOrders( $supplierid, $grouped );
 isa_ok( $orders, 'ARRAY' );
+
+my @lateorders = GetLateOrders(0);
+SKIP: {
+   skip 'No Late Orders, cannot test AddClaim', 1 unless @lateorders;
+   my $order = $lateorders[0];
+   AddClaim( $order->{ordernumber} );
+   my $neworder = GetOrder( $order->{ordernumber} );
+   is( $neworder->{claimed_date}, strftime( "%Y-%m-%d", localtime(time) ), "AddClaim : Check claimed_date" );
+}
+
 SKIP: {
     skip 'No relevant orders in database, cannot test baskets', 33 unless( scalar @$orders );
     # diag( Data::Dumper->Dump( [ $orders ], [ 'orders' ] ) );
     my @expectedfields = qw( basketno
                              biblioitemnumber
                              biblionumber
-                             booksellerinvoicenumber
+                             invoiceid
                              budgetdate
                              cancelledby
                              closedate
@@ -48,7 +59,7 @@ SKIP: {
                              entrydate
                              firstname
                              freight
-                             gst
+                             gstrate
                              listprice
                              notes
                              ordernumber
@@ -56,10 +67,9 @@ SKIP: {
                              quantity
                              quantityreceived
                              rrp
-                             serialid
                              sort1
                              sort2
-                             subscription
+                             subscriptionid
                              supplierreference
                              surname
                              timestamp