Fix for bug 1296, making surnames uppercase a systems preference
authorrangi <rangi>
Mon, 2 Jul 2007 02:30:15 +0000 (02:30 +0000)
committerrangi <rangi>
Mon, 2 Jul 2007 02:30:15 +0000 (02:30 +0000)
admin/systempreferences.pl
koha-tmpl/intranet-tmpl/prog/en/members/memberentryA.tmpl
koha-tmpl/intranet-tmpl/prog/en/members/memberentryC.tmpl
koha-tmpl/intranet-tmpl/prog/en/members/memberentryP.tmpl
koha-tmpl/intranet-tmpl/prog/fr/members/memberentryA.tmpl
members/memberentry.pl
updater/updatedatabase

index acac5c9..b651a17 100755 (executable)
@@ -127,7 +127,8 @@ my %tabsysprefs;
     $tabsysprefs{BorrowersTitles}="Members";    
     $tabsysprefs{patronimages}="Members";
     $tabsysprefs{MinPasswordLength}="Members";
-    
+    $tabsysprefs{uppercasesurnames}="Members";
+
 # OPAC
     $tabsysprefs{AmazonAssocTag}="OPAC";
     $tabsysprefs{AmazonContent}="OPAC";
index 8055abc..e5300c7 100755 (executable)
                <label>
                <!-- /TMPL_IF-->
                Surname</label>
+               <! --TMPL_IF NAME="uppercasesurnames" -->
                <input style="text-transform:uppercase;" type="text" name="surname" size="20"  value="<!-- TMPL_VAR NAME="surname" -->" >
+               <!-- TMPL_ELSE -->
+               <input style="text-transform:capitalize;" type="text" name="surname" size="20"  value="<!-- TMPL_VAR NAME="surname" -->" >
+               <!-- /TMPL_IF -->
                </p>
                <p>
                <!-- TMPL_IF NAME="mandatoryfirstname" -->
index 5abd9a7..43cc3fc 100755 (executable)
                <label>
                <!-- /TMPL_IF-->
                Surname</label>
+               <! --TMPL_IF NAME="uppercasesurnames" -->                                
                <input style="text-transform:uppercase;" type="text" name="surname" size="20"  value="<!-- TMPL_VAR NAME="surname" -->" >
+        <!-- TMPL_ELSE -->                       
+               <input style="text-transform:capitalize;" type="text" name="surname" size="20"  value="<!-- TMPL_VAR NAME="surname" -->" >   
+        <!-- /TMPL_IF --> 
                </p>
                <p>
                <!-- TMPL_IF NAME="mandatoryfirstname" -->
index dc44cef..728f713 100755 (executable)
         <label>
         <!-- /TMPL_IF-->
         Surname</label>
-        <input style="text-transform:uppercase;" type="text" name="surname" size="20"  value="<!-- TMPL_VAR NAME="surname" -->" >
+               <! --TMPL_IF NAME="uppercasesurnames" -->                                
+               <input style="text-transform:uppercase;" type="text" name="surname" size="20"  value="<!-- TMPL_VAR NAME="surname" -->" >
+        <!-- TMPL_ELSE -->                       
+               <input style="text-transform:capitalize;" type="text" name="surname" size="20"  value="<!-- TMPL_VAR NAME="surname" -->" >   
+        <!-- /TMPL_IF --> 
         </p>
         <p>
         <!-- TMPL_IF NAME="mandatoryfirstname" -->
index 29043d9..6848b99 100644 (file)
                <label>
                <!-- /TMPL_IF-->
                Nom de famille</label>
-               <input style="text-transform:uppercase;" type="text" name="surname" size="20"  value="<!-- TMPL_VAR NAME="surname" -->" >
+               <! --TMPL_IF NAME="uppercasesurnames" -->                                
+        <input style="text-transform:uppercase;" type="text" name="surname" size="20"  value="<!-- TMPL_VAR NAME="surname" -->" >
+        <!-- TMPL_ELSE -->                       
+               <input style="text-transform:capitalize;" type="text" name="surname" size="20"  value="<!-- TMPL_VAR NAME="surname" -->" >   
+        <!-- /TMPL_IF --> 
+
+
+
                </p>
                <p>
                <!-- TMPL_IF NAME="mandatoryfirstname" -->
index 8788e41..aad5a04 100755 (executable)
@@ -83,6 +83,8 @@ my $check_categorytype=$input->param('check_categorytype');
 # NOTE: Alert for ethnicity and ethnotes fields, they are unvalided in all borrowers form
 my $borrower_data;
 
+$template->param("uppercasesurnames" => C4::Context->preference('uppercasesurnames'));
+
 #function  to automatic setup the mandatory  fields (visual with css)
 my $check_BorrowerMandatoryField=C4::Context->preference("BorrowerMandatoryField");
 my @field_check=split(/\|/,$check_BorrowerMandatoryField);
index 18fd16f..441fba8 100755 (executable)
@@ -519,6 +519,14 @@ my %tabledata = (
             explanation         => "Enter a specific hash for NoZebra indexes. Enter : 'indexname' => '100a,245a,500*','index2' => '...'",
             type                => 'Free',
         },
+        {
+            uniquefieldrequired => 'variable',
+            variable            => 'uppercasesurnames',
+            value               => '0',
+            forceupdate         => {'explanation' => 1, 'type' => 1},
+            explanation         => "Force Surnames to be uppercase",
+            type                => 'YesNo',
+        },
     ],
     userflags => [
         {
@@ -2048,6 +2056,9 @@ $sth->finish;
 exit;
 
 # $Log$
+# Revision 1.171  2007/07/02 02:30:16  rangi
+# Fix for bug 1296, making surnames uppercase a systems preference
+#
 # Revision 1.170  2007/06/26 13:25:37  tipaul
 # removing some useless tables from updatedatabase
 #