-# called by default form, used to confirm deletion of data in DB
-} elsif ($op eq 'delete_confirm') {
- $template->param(delete_confirm => 1);
-
- my $dbh = C4::Context->dbh;
- my $sth=$dbh->prepare("select count(*) as total from borrowers where categorycode=?");
- $sth->execute($categorycode);
- my $total = $sth->fetchrow_hashref;
- $sth->finish;
- $template->param(total => $total->{'total'});
-
- my $sth2=$dbh->prepare("select categorycode,description,enrolmentperiod,enrolmentperioddate,upperagelimit,dateofbirthrequired,enrolmentfee,issuelimit,reservefee,hidelostitems,overduenoticerequired,category_type from categories where categorycode=?");
- $sth2->execute($categorycode);
- my $data=$sth2->fetchrow_hashref;
- $sth2->finish;
- if ($total->{'total'} >0) {
- $template->param(totalgtzero => 1);
- }
-
- $template->param( description => $data->{'description'},
- enrolmentperiod => $data->{'enrolmentperiod'},
- enrolmentperioddate => C4::Dates::format_date($data->{'enrolmentperioddate'}),
- upperagelimit => $data->{'upperagelimit'},
- dateofbirthrequired => $data->{'dateofbirthrequired'},
- enrolmentfee => sprintf("%.2f",$data->{'enrolmentfee'}),
- overduenoticerequired => $data->{'overduenoticerequired'},
- issuelimit => $data->{'issuelimit'},
- reservefee => sprintf("%.2f",$data->{'reservefee'}),
- hidelostitems => $data->{'hidelostitems'},
- category_type => $data->{'category_type'},
- );
- # END $OP eq DELETE_CONFIRM
+ # called by default form, used to confirm deletion of data in DB
+}
+elsif ( $op eq 'delete_confirm' ) {
+ my $schema = Koha::Database->new()->schema();
+ $template->param( delete_confirm => 1 );
+
+ my $count =
+ $schema->resultset('Borrower')
+ ->search( { categorycode => $categorycode } )->count();
+
+ my $category = $schema->resultset('Category')->find($categorycode);
+
+ $category->enrolmentperioddate(
+ C4::Dates::format_date( $category->enrolmentperioddate() ) );
+
+ $template->param( category => $category, patrons_in_category => $count );
+
+ # END $OP eq DELETE_CONFIRM