-
#!/usr/bin/perl
#
# This Koha test module is a stub!
# Add more tests here!!!
use strict;
use warnings;
use Test::More tests => 1;
use C4::Acquisition;
my $itemnumber = 1;
my $budget = GetBudgetInfoFromItemnumber( $itemnumber );
ok($budget->{'budget_period_id'}==1, "Test the GetBudgetInfoFromItemnumber routine");