#!/usr/bin/perl
use strict;
use warnings;
use Test::More;
use_ok('C4::Serials');
my $supplierlist=eval{GetSuppliersWithLateIssues()};
ok(length($@)==0,"No SQL problem in GetSuppliersWithLateIssues");
done_testing();
Powered by TurnKey Linux.