Bug 16912: Update patron category enrolment fees
authorJonathan Druart <jonathan.druart@bugs.koha-community.org>
Wed, 24 Aug 2016 08:13:07 +0000 (09:13 +0100)
committerKyle M Hall <kyle@bywatersolutions.com>
Fri, 28 Oct 2016 15:31:47 +0000 (15:31 +0000)
Signed-off-by: Aleisha Amohia <aleishaamohia@hotmail.com>
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
t/db_dependent/Koha/Patrons.t

index 27c9407..229788c 100644 (file)
@@ -258,9 +258,10 @@ subtest 'add_enrolment_fee_if_needed' => sub {
     my $enrolmentfee_J  = 10;
     my $enrolmentfee_YA = 20;
 
-    $builder->build( { source => 'Category', value => { categorycode => 'K',  enrolmentfee => $enrolmentfee_K } } );
-    $builder->build( { source => 'Category', value => { categorycode => 'J',  enrolmentfee => $enrolmentfee_J } } );
-    $builder->build( { source => 'Category', value => { categorycode => 'YA', enrolmentfee => $enrolmentfee_YA } } );
+    my $dbh = C4::Context->dbh;
+    $dbh->do(q|UPDATE categories set enrolmentfee=? where categorycode=?|, undef, $enrolmentfee_K, 'K');
+    $dbh->do(q|UPDATE categories set enrolmentfee=? where categorycode=?|, undef, $enrolmentfee_J, 'J');
+    $dbh->do(q|UPDATE categories set enrolmentfee=? where categorycode=?|, undef, $enrolmentfee_YA, 'YA');
 
     my %borrower_data = (
         firstname    => 'my firstname',