Attachment #37577 for bug #9314

View | Details | Raw Unified | Return to bug 9314
Collapse All | Expand All

Lines 1398-1406 Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/members/memberentrygen.tt (-3 lines)
1398	</script>	1398	</script>
1399	[% END %]	1399	[% END %]
1400	<input type="hidden" name="setting_messaging_prefs" value="1" />	1400	<input type="hidden" name="setting_messaging_prefs" value="1" />
1401	[% IF type_only %]
1402	<p>If no preferences are selected, the default preferences for the category chosen will be applied on save, otherwise your selection here is saved</p>
1403	[% END %]
1404	[% INCLUDE 'messaging-preference-form.inc' %]	1401	[% INCLUDE 'messaging-preference-form.inc' %]
1405	[% IF ( SMSSendDriver ) %]	1402	[% IF ( SMSSendDriver ) %]
1406	<p><label for="SMSnumber">SMS number:</label>	1403	<p><label for="SMSnumber">SMS number:</label>




( $borrower_data = GetMember( 'borrowernumber' => $borrowernumber ) ) if ( $op eq 'modify' or $op eq 'save' or $op eq 'duplicate' );
my $categorycode  = $input->param('categorycode') || $borrower_data->{'categorycode'};
my $category_type = $input->param('category_type') || '';
if ($category_type){
    $template->{VARS}->{'type_only'} = 1;
}
my $new_c_type = $category_type; #if we have input param, then we've already chosen the cat_type.
unless ($category_type or !($categorycode)){
    my $borrowercategory = GetBorrowercategory($categorycode);
    $category_type    = $borrowercategory->{'category_type'};
    my $category_name = $borrowercategory->{'description'}; 
    $template->param("categoryname"=>$category_name);
}
$category_type="A" unless $category_type; # FIXME we should display a error message instead of a 500 error !

# if a add or modify is requested => check validity of data.
- 

Return to bug 9314

Lines 150-165 $template->param( "checked" => 1 ) if ( defined($nodouble) && $nodouble eq 1 ); Link Here

(-)a/members/memberentry.pl (-6 / +1 lines)
150	( $borrower_data = GetMember( 'borrowernumber' => $borrowernumber ) ) if ( $op eq 'modify' or $op eq 'save' or $op eq 'duplicate' );	150	( $borrower_data = GetMember( 'borrowernumber' => $borrowernumber ) ) if ( $op eq 'modify' or $op eq 'save' or $op eq 'duplicate' );
151	my $categorycode = $input->param('categorycode') \|\| $borrower_data->{'categorycode'};	151	my $categorycode = $input->param('categorycode') \|\| $borrower_data->{'categorycode'};
152	my $category_type = $input->param('category_type') \|\| '';	152	my $category_type = $input->param('category_type') \|\| '';
153	if ($category_type){
154	$template->{VARS}->{'type_only'} = 1;
155	}
156	my $new_c_type = $category_type; #if we have input param, then we've already chosen the cat_type.
157	unless ($category_type or !($categorycode)){	153	unless ($category_type or !($categorycode)){
158	my $borrowercategory = GetBorrowercategory($categorycode);	154	my $borrowercategory = GetBorrowercategory($categorycode);
159	$category_type = $borrowercategory->{'category_type'};	155	$category_type = $borrowercategory->{'category_type'};
160	my $category_name = $borrowercategory->{'description'};	156	my $category_name = $borrowercategory->{'description'};
161	$template->param("categoryname"=>$category_name);	157	$template->param("categoryname"=>$category_name);
162	}	158	}
163	$category_type="A" unless $category_type; # FIXME we should display a error message instead of a 500 error !	159	$category_type="A" unless $category_type; # FIXME we should display a error message instead of a 500 error !
164		160
165	# if a add or modify is requested => check validity of data.	161	# if a add or modify is requested => check validity of data.
166	-