use C4::Bookseller qw( GetBookSellerFromId );
-use Test::More tests => 38;
+use Test::More tests => 37;
BEGIN {
use_ok('C4::Acquisition');
isa_ok( $orders, 'ARRAY' );
my @lateorders = GetLateOrders(0);
-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 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 );
my @expectedfields = qw( basketno
biblioitemnumber
biblionumber
- booksellerinvoicenumber
+ invoiceid
budgetdate
cancelledby
closedate
entrydate
firstname
freight
- gst
+ gstrate
listprice
notes
ordernumber
quantity
quantityreceived
rrp
- serialid
sort1
sort2
- subscription
+ subscriptionid
supplierreference
surname
timestamp