Lines 651-663
if(!defined($data{'sex'})){
Link Here
|
651 |
|
651 |
|
652 |
my @typeloop; |
652 |
my @typeloop; |
653 |
my $no_categories = 1; |
653 |
my $no_categories = 1; |
654 |
my $no_add; |
654 |
|
655 |
foreach my $category_type (qw(C A S P I X)) { |
655 |
foreach my $category_type (qw(C A S P I X)) { |
656 |
my $categories_limits = { category_type => $category_type }; |
656 |
my $categories_limits = { category_type => $category_type }; |
657 |
$categories_limits->{canbeguarantee} = 1 if ($guarantor_id); |
657 |
$categories_limits->{canbeguarantee} = 1 if ($guarantor_id); |
658 |
my $patron_categories = Koha::Patron::Categories->search_with_library_limits( $categories_limits, {order_by => ['categorycode']} ); |
658 |
my $patron_categories = Koha::Patron::Categories->search_with_library_limits( $categories_limits, {order_by => ['categorycode']} ); |
659 |
$no_categories = 0 if $patron_categories->count > 0; |
659 |
$no_categories = 0 if $patron_categories->count > 0; |
660 |
|
660 |
} |
|
|
661 |
my $categories; |
661 |
$template->param( |
662 |
$template->param( |
662 |
patron_categories => $categories, |
663 |
patron_categories => $categories, |
663 |
no_categories => $no_categories, |
664 |
no_categories => $no_categories, |
Lines 757-765
$template->param( step => $step ) if $step; # associate with step to know wh
Link Here
|
757 |
|
758 |
|
758 |
$template->param( |
759 |
$template->param( |
759 |
BorrowerMandatoryField => C4::Context->preference("BorrowerMandatoryField"),#field to test with javascript |
760 |
BorrowerMandatoryField => C4::Context->preference("BorrowerMandatoryField"),#field to test with javascript |
760 |
category_type => $category_type,#to know the category type of the borrower |
761 |
destination => $destination,#to know wheree u come from and wheree u must go in redirect |
761 |
"$category_type" => 1,# associate with step to know where u are |
|
|
762 |
destination => $destination,#to know where u come from and where u must go in redirect |
763 |
check_member => $check_member,#to know if the borrower already exist(=>1) or not (=>0) |
762 |
check_member => $check_member,#to know if the borrower already exist(=>1) or not (=>0) |
764 |
"op$op" => 1); |
763 |
"op$op" => 1); |
765 |
|
764 |
|
766 |
- |
|
|