From a3ed52337ac660a98e24746eaa1ce5279728f1b6 Mon Sep 17 00:00:00 2001 From: tipaul Date: Tue, 8 Apr 2003 11:12:22 +0000 Subject: [PATCH] templating Mr, Mrs, Ms... --- .../default/en/members/memberentry.tmpl | 375 +++++++++--------- .../default/fr/members/memberentry.tmpl | 13 +- memberentry.pl | 44 +- 3 files changed, 198 insertions(+), 234 deletions(-) diff --git a/koha-tmpl/intranet-tmpl/default/en/members/memberentry.tmpl b/koha-tmpl/intranet-tmpl/default/en/members/memberentry.tmpl index 4b800284b9..28085ad86c 100644 --- a/koha-tmpl/intranet-tmpl/default/en/members/memberentry.tmpl +++ b/koha-tmpl/intranet-tmpl/default/en/members/memberentry.tmpl @@ -5,191 +5,196 @@
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Member# , Card Number*
/images/background-mem.gif">MEMBER PERSONAL DETAILS/images/background-mem.gif">* - checked>F - checked> M -     Date of Birth () - -
TitleInitialsGiven Names*Surname*Prefered Name
- -
EthnicityEthnicity Notes  Membership Category*
- -  
/images/background-mem.gif">MEMBER ADDRESS
Postal Address*Town*Area
- -
Street Address if differentTown
/images/background-mem.gif">MEMBER CONTACT DETAILS
Phone (Home)FaxEmailText Messaging
Phone (Day)
/images/background-mem.gif">ALTERNATE CONTACT DETAILS
Name*PhoneRelationship*
- -
/images/background-mem.gif">LIBRARY USE
Notes
Notes
FLAGS
>Yes - >No -
//images/2rightarrow.png" ALT="Add New Member" border=0 >
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
Member# , Card Number*
/images/background-mem.gif">MEMBER PERSONAL DETAILS/images/background-mem.gif">* + checked>F + checked> M +     Date of Birth () + +
TitleInitialsGiven Names*Surname*Prefered Name
+ +
EthnicityEthnicity Notes  Membership Category*
+ + + +  
/images/background-mem.gif">MEMBER ADDRESS
Postal Address*Town*Area
+ +
Street Address if differentTown
/images/background-mem.gif">MEMBER CONTACT DETAILS
Phone (Home)FaxEmailText Messaging
Phone (Day)
/images/background-mem.gif">ALTERNATE CONTACT DETAILS
Name*PhoneRelationship*
+ +
/images/background-mem.gif">LIBRARY USE
Notes
Notes
FLAGS
>Yes + >No +
//images/2rightarrow.png" ALT="Add New Member" border=0 >
diff --git a/koha-tmpl/intranet-tmpl/default/fr/members/memberentry.tmpl b/koha-tmpl/intranet-tmpl/default/fr/members/memberentry.tmpl index 545146de5e..f9749d3756 100644 --- a/koha-tmpl/intranet-tmpl/default/fr/members/memberentry.tmpl +++ b/koha-tmpl/intranet-tmpl/default/fr/members/memberentry.tmpl @@ -39,13 +39,12 @@ - + value=" ">Aucun + + + + diff --git a/memberentry.pl b/memberentry.pl index b915b9b047..e4964c735e 100755 --- a/memberentry.pl +++ b/memberentry.pl @@ -80,21 +80,6 @@ if ($delete){ $template->param(female => 1); } - my @titles = ('Miss', 'Mrs', 'Ms', 'Mr', 'Dr', 'Sir'); - # FIXME - Assumes English. This ought to be made part of i18n. - my @titledata; - while (@titles) { - my %row; - my $title = shift @titles; - $row{'title'} = $title; - if ($data->{'title'} eq $title) { - $row{'selected'}=' selected'; - } else { - $row{'selected'}=''; - } - push(@titledata, \%row); - } - my ($categories,$labels)=ethnicitycategories(); my $ethnicitycategoriescount=$#{$categories}; my $ethcatpopup; @@ -112,30 +97,6 @@ if ($delete){ -default=>$data->{'categorycode'}, -labels=>$labels); - my @areas = ('L','F','S','H','K','O','X','Z','V'); - my %arealabels = ('L' => 'Levin', - 'F' => 'Foxton', - 'S' => 'Shannon', - 'H' => 'Horowhenua', - 'K' => 'Kapiti', - 'O' => 'Out of District', - 'X' => 'Temporary Visitor', - 'Z' => 'Interloan Libraries', - 'V' => 'Village'); - - my @areadata; - while (@areas) { - my %row; - my $shortcut = shift @areas; - $row{'shortcut'} = $shortcut; - if ($data->{'area'} eq $shortcut) { - $row{'selected'}=' selected'; - } else { - $row{'selected'}=''; - } - $row{'area'}=$arealabels{$shortcut}; - push(@areadata, \%row); - } my @relationships = ('workplace', 'relative','friend', 'neighbour'); @@ -217,15 +178,14 @@ if ($delete){ borrowernotes => $data->{'borrowernotes'}, flagloop => \@flagdata, relshiploop => \@relshipdata, - titleloop => \@titledata, - arealoop => \@areadata, + "title_".$data->{'title'} => " SELECTED ", dateenrolled => $data->{'dateenrolled'}, expiry => $data->{'expiry'}, cardnumber => $cardnumber, dateofbirth => $data->{'dateofbirth'}, dateformat => display_date_format(), CGIbranch => $CGIbranch); - +warn "title ==>".$data->{'title'}."<=="; output_html_with_http_headers $input, $cookie, $template->output; -- 2.39.2