From 5f7d9644e0dfa33799b74e5c99e0d3ab9ad60734 Mon Sep 17 00:00:00 2001 From: Shi Yao Wang Date: Wed, 1 Jun 2022 09:17:01 -0400 Subject: [PATCH] Bug 12446: DBIC specific add_columns canbeguarantee New column canbeguarantee --- Koha/Schema/Result/Category.pm | 4 ++++ members/memberentry.pl | 10 ++++------ 2 files changed, 8 insertions(+), 6 deletions(-) diff --git a/Koha/Schema/Result/Category.pm b/Koha/Schema/Result/Category.pm index a83ebd68a2..1058bc2ac6 100644 --- a/Koha/Schema/Result/Category.pm +++ b/Koha/Schema/Result/Category.pm @@ -374,6 +374,10 @@ __PACKAGE__->has_many( # Created by DBIx::Class::Schema::Loader v0.07049 @ 2022-06-23 16:29:27 # DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:SKWF2QpqQtXoujwurKFQhA +__PACKAGE__->add_columns( + '+canbeguarantee' => { is_boolean => 1 } +); + sub koha_object_class { 'Koha::Patron::Category'; } diff --git a/members/memberentry.pl b/members/memberentry.pl index 3243fc3ed6..a8fee5a4fd 100755 --- a/members/memberentry.pl +++ b/members/memberentry.pl @@ -651,13 +651,14 @@ if(!defined($data{'sex'})){ my @typeloop; my $no_categories = 1; -my $no_add; + foreach my $category_type (qw(C A S P I X)) { my $categories_limits = { category_type => $category_type }; $categories_limits->{canbeguarantee} = 1 if ($guarantor_id); my $patron_categories = Koha::Patron::Categories->search_with_library_limits( $categories_limits, {order_by => ['categorycode']} ); $no_categories = 0 if $patron_categories->count > 0; - +} +my $categories; $template->param( patron_categories => $categories, no_categories => $no_categories, @@ -751,16 +752,13 @@ if (C4::Context->preference('EnhancedMessagingPreferences')) { } $template->param( borrower_data => \%data ); -$template->param( "show_guarantor" => $category ? $category->can_be_guarantee : 1); # associate with step to know where you are $template->param( "show_guarantor" => $categorycode ? Koha::Patron::Categories->find($categorycode)->canbeguarantee : 1); # associate with step to know where you are $template->param( "step_$step" => 1) if $step; # associate with step to know where u are $template->param( step => $step ) if $step; # associate with step to know where u are $template->param( BorrowerMandatoryField => C4::Context->preference("BorrowerMandatoryField"),#field to test with javascript - category_type => $category_type,#to know the category type of the borrower - "$category_type" => 1,# associate with step to know where u are - destination => $destination,#to know where u come from and where u must go in redirect + destination => $destination,#to know wheree u come from and wheree u must go in redirect check_member => $check_member,#to know if the borrower already exist(=>1) or not (=>0) "op$op" => 1); -- 2.34.1