use Koha::Database;
use Koha::Acquisition::Booksellers;
use Koha::Acquisition::Orders;
+use Koha::Patrons;
use t::lib::TestBuilder;
my $budgetid = C4::Budgets::AddBudget(
{
- budget_code => "budget_code_test_getordersbybib",
- budget_name => "budget_name_test_getordersbybib",
+ budget_code => "budget_code_test",
+ budget_name => "budget_name_test",
}
);
my $budget = C4::Budgets::GetBudget($budgetid);
unknown => "unknown"
);
-my $borrowernumber = C4::Members::AddMember(
+my $borrowernumber = Koha::Patron->new({
cardnumber => 'TESTCARD',
firstname => 'TESTFN',
surname => 'TESTSN',
dateofbirth => '',
dateexpiry => '9999-12-31',
userid => 'TESTUSERID'
-);
+})->store->borrowernumber;
C4::Acquisition::ModOrderUsers( $ordernumber, $borrowernumber );