Spalte 'cp_function' in 'cp_position' umbenennen zwecks Kompatibilität mit CRM
authorMoritz Bunkus <m.bunkus@linet-services.de>
Mon, 14 Jan 2013 13:35:51 +0000 (14:35 +0100)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Mon, 14 Jan 2013 13:46:15 +0000 (14:46 +0100)
SL/CT.pm
SL/DB/MetaSetup/Contact.pm
bin/mozilla/ct.pl
sql/Pg-upgrade2/contacts_add_cp_function.sql [deleted file]
sql/Pg-upgrade2/contacts_add_cp_position.pl [new file with mode: 0644]
templates/webpages/ct/_contact.html
templates/webpages/ct/search_contact.html

index a196095..a32486b 100644 (file)
--- a/SL/CT.pm
+++ b/SL/CT.pm
@@ -551,7 +551,7 @@ sub _save_contact {
 
   my @columns = qw(cp_title cp_givenname cp_name cp_email cp_phone1 cp_phone2 cp_abteilung cp_fax
                    cp_mobile1 cp_mobile2 cp_satphone cp_satfax cp_project cp_privatphone cp_privatemail cp_birthday cp_gender
-                   cp_street cp_zipcode cp_city cp_function);
+                   cp_street cp_zipcode cp_city cp_position);
   my @values  = map(
     {
       if ( $_ eq 'cp_gender' ) {
@@ -1123,7 +1123,7 @@ sub search_contacts {
     'vcnumber'  => 'vcnumber, cp_name, cp_givenname',
     );
 
-  my %sortcols  = map { $_ => 1 } qw(cp_name cp_givenname cp_phone1 cp_phone2 cp_mobile1 cp_email cp_street cp_zipcode cp_city cp_function vcname vcnumber);
+  my %sortcols  = map { $_ => 1 } qw(cp_name cp_givenname cp_phone1 cp_phone2 cp_mobile1 cp_email cp_street cp_zipcode cp_city cp_position vcname vcnumber);
 
   my $order_by  = $sortcols{$::form->{sort}} ? $::form->{sort} : 'cp_name';
   $::form->{sort} = $order_by;
index 20dae29..8dd8b5b 100644 (file)
@@ -34,7 +34,7 @@ __PACKAGE__->meta->setup(
     cp_zipcode     => { type => 'text' },
     cp_city        => { type => 'text' },
     cp_birthday    => { type => 'date' },
-    cp_function    => { type => 'text' },
+    cp_position    => { type => 'character', length => 75 },
   ],
 
   primary_key_columns => [ 'cp_id' ],
index 7c1b224..ff7eede 100644 (file)
@@ -303,7 +303,7 @@ sub list_contacts {
 
   my @columns      = qw(
     cp_id vcname vcnumber cp_name cp_givenname cp_street cp_zipcode cp_city cp_phone1 cp_phone2
-    cp_mobile1 cp_mobile2 cp_email cp_abteilung cp_function cp_birthday cp_gender
+    cp_mobile1 cp_mobile2 cp_email cp_abteilung cp_position cp_birthday cp_gender
   );
 
   my @includeable_custom_variables = grep { $_->{includeable} } @{ $cvar_configs };
@@ -336,7 +336,7 @@ sub list_contacts {
     'cp_mobile2'   => { 'text' => $::locale->text('Mobile2'), },
     'cp_email'     => { 'text' => $::locale->text('E-mail'), },
     'cp_abteilung' => { 'text' => $::locale->text('Department'), },
-    'cp_function'  => { 'text' => $::locale->text('Function/position'), },
+    'cp_position'  => { 'text' => $::locale->text('Function/position'), },
     'cp_birthday'  => { 'text' => $::locale->text('Birthday'), },
     'cp_gender'    => { 'text' => $::locale->text('Gender'), },
     %column_defs_cvars,
diff --git a/sql/Pg-upgrade2/contacts_add_cp_function.sql b/sql/Pg-upgrade2/contacts_add_cp_function.sql
deleted file mode 100644 (file)
index 571d61e..0000000
+++ /dev/null
@@ -1,5 +0,0 @@
--- @tag: contacts_add_cp_function
--- @description: Feld 'Funktion/Position' zu Kontakten
--- @depends: release_3_0_0
--- @charset: utf-8
-ALTER TABLE contacts ADD COLUMN cp_function text;
diff --git a/sql/Pg-upgrade2/contacts_add_cp_position.pl b/sql/Pg-upgrade2/contacts_add_cp_position.pl
new file mode 100644 (file)
index 0000000..bd54707
--- /dev/null
@@ -0,0 +1,18 @@
+# @tag: contacts_add_cp_position
+# @description: Feld 'Funktion/Position' zu Kontakten
+# @depends: release_3_0_0
+# @charset: utf-8
+
+package contacts_add_cp_position;
+use strict;
+
+die 'This script cannot be run from the command line.' if !$::form;
+
+my $query = 'ALTER TABLE contacts ADD COLUMN cp_position VARCHAR(75)';
+
+if (!$dbh->do($query)) {
+  $dbh->rollback;
+  $dbh->begin_work;
+}
+
+1;
index f6c9b8a..d1db2e2 100644 (file)
@@ -37,7 +37,7 @@
 
      <tr>
       <th align="left" nowrap>[% 'Function/position' | $T8 %]</th>
-      <td>[% L.input_tag('cp_function', cp_function, size=40) %]</td>
+      <td>[% L.input_tag('cp_position', cp_position, size=40, maxlength=75) %]</td>
      </tr>
 
      <tr>
index af95c2d..fe26d47 100644 (file)
         <label for="l_cp_abteilung">[% 'Department' | $T8 %]</label>
        </td>
 
-       <td>[% L.checkbox_tag('l.cp_function', value='Y', label=LxERP.t8('Function/position'), class='checkbox') %]</td>
+       <td>[% L.checkbox_tag('l.cp_position', value='Y', label=LxERP.t8('Function/position'), class='checkbox') %]</td>
       </tr>
 
       <tr>