Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

memberentryC.tmpl:add test to modify link name

Browse source 
memberentry.pl:add test to return default value for select_city
This commit is contained in:
btoumi 2006-06-14 15:59:37 +00:00
parent 139ba12db3
commit f96ee8e2c6
2 changed files with 16 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
koha-tmpl/intranet-tmpl/prog/en/members/memberentryC.tmpl
View file

@ -180,10 +180,14 @@
<input style="text-transform:uppercase;" type="text" name="othernames" size="20" value="<!-- TMPL_VAR NAME="othernames" -->" >
</p>
<!-- TMPL_UNLESS name="guarantorid"-->
<!-- TMPL_UNLESS NAME="add"-->
<p><a href="javascript:Dopopguarantor('guarantor_search.pl');">Modify guarantor</a></p>
<!-- /TMPL_UNLESS -->
<!-- TMPL_IF NAME="add" -->
<!-- TMPL_UNLESS NAME="guarantorid"-->
<p><a href="javascript:Dopopguarantor('guarantor_search.pl');">Find guarantor</a></p>
<!-- /TMPL_UNLESS -->
<!-- /TMPL_UNLESS -->
<!-- /TMPL_IF -->
</fieldset>
<fieldset id="memberentry_identity">
<legend>Borrower type</legend>

17
members/memberentry.pl
View file

@ -85,6 +85,7 @@ foreach (@field_check) {
$template->param( "mandatory$_" => 1);
}
$template->param("add"=>1) if ($op eq 'add');
$template->param( "checked" => 1) if ($nodouble eq 1);
my $borrower_data=borrdata('',$borrowernumber);
@ -94,7 +95,6 @@ if ($step eq 0){
$data{$column}=$borrower_data->{$column};
}
}
if ($op eq 'add' or $op eq 'modify') {
my @names=$input->param;
foreach my $key (@names){
@ -134,10 +134,8 @@ if ($category_type eq 'C' and $guarantorid ne '' ){
$data{'fax'}=$guarantordata->{'fax'};
$data{'email'}=$guarantordata->{'email'};
$data{'emailpro'}=$guarantordata->{'emailpro'};
$default_city=getidcity($data{'city'});
}
}
}
# CHECKS step by step
# STEP 1
@ -158,6 +156,7 @@ if ($category_type eq 'C' and $guarantorid ne '' ){
$nok = 1;
}
}
}
# STEP 2
if ($step eq 2) {
@ -285,10 +284,12 @@ if ($delete){
-default=>$default_category,
-labels=>$labels);
#test in city
if ($op eq 'modify' and $select_city eq '' ){
my $selectcity=&getidcity($data{'city'});
$default_city=$selectcity;
}
$select_city=getidcity($data{'city'}) if ($guarantorid ne '');
($default_city=$select_city) if ($step eq 0);
if ($select_city eq '' ){
my $selectcity=&getidcity($data{'city'});
$default_city=$selectcity;
}
my($cityid,$name_city)=getcities();
$template->param( city_cgipopup => 1) if ($cityid );
my $citypopup = CGI::popup_menu(-name=>'select_city',