Bug Nr 190 geloest. Abteilung1 und 2 wurden bei der Lieferadresse nicht beruecksichtigt
authorPhilip Reetz <p.reetz@linet-services.de>
Tue, 11 Oct 2005 08:49:08 +0000 (08:49 +0000)
committerPhilip Reetz <p.reetz@linet-services.de>
Tue, 11 Oct 2005 08:49:08 +0000 (08:49 +0000)
SL/Form.pm
SL/IS.pm
sql/Pg-upgrade-2.1.1-2.1.2.sql
sql/lx-office.sql

index ebc7e82..62a76e7 100644 (file)
@@ -1253,7 +1253,7 @@ sub add_shipto {
 ##LINET
   my $shipto;
   foreach
-    my $item (qw(name street zipcode city country contact phone fax email)) {
+    my $item (qw(name department_1 department_2 street zipcode city country contact phone fax email)) {
     if ($self->{"shipto$item"}) {
       $shipto = 1 if ($self->{$item} ne $self->{"shipto$item"});
     }
@@ -1261,10 +1261,10 @@ sub add_shipto {
   }
 
   if ($shipto) {
-    my $query = qq|INSERT INTO shipto (trans_id, shiptoname, shiptostreet,
+    my $query = qq|INSERT INTO shipto (trans_id, shiptoname, shiptodepartment_1, shiptodepartment_2, shiptostreet,
                    shiptozipcode, shiptocity, shiptocountry, shiptocontact,
                   shiptophone, shiptofax, shiptoemail) VALUES ($id,
-                  '$self->{shiptoname}', '$self->{shiptostreet}',
+                  '$self->{shiptoname}', '$self->{shiptodepartment_1}', '$self->{shiptodepartment_2}', '$self->{shiptostreet}',
                   '$self->{shiptozipcode}', '$self->{shiptocity}',
                   '$self->{shiptocountry}', '$self->{shiptocontact}',
                   '$self->{shiptophone}', '$self->{shiptofax}',
index b74a794..eac4440 100644 (file)
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -1357,7 +1357,7 @@ sub get_customer {
   # get shipto if we did not converted an order or invoice
   if (!$form->{shipto}) {
     map { delete $form->{$_} }
-      qw(shiptoname shiptostreet shiptozipcode shiptocity shiptocountry shiptocontact shiptophone shiptofax shiptoemail);
+      qw(shiptoname shiptodepartment_1 shiptodepartment_2 shiptostreet shiptozipcode shiptocity shiptocountry shiptocontact shiptophone shiptofax shiptoemail);
 
     $query = qq|SELECT s.* FROM shipto s
                 WHERE s.trans_id = $form->{customer_id}|;
index d6b0ebb..476e402 100644 (file)
@@ -128,6 +128,10 @@ alter table vendor add column user_password varchar(12);
 alter table customer add column salesman_id integer;
 alter table vendor add column salesman_id integer;
 
+-- Shipto
+alter table shipto add column shiptodepartment_1 varchar(75);
+alter table shipto add column shiptodepartment_2 varchar(75);
+
 -- Addon for business
 alter table business add column salesman boolean;
 alter table business alter column salesman set default 'false';
index d2c0bca..3be0a85 100644 (file)
@@ -417,6 +417,8 @@ CREATE TABLE "employee" (
 CREATE TABLE "shipto" (
        "trans_id" integer,
        "shiptoname" character varying(75),
+        "shiptodepartment_1" character varying(75),
+        "shiptodepartment_2" character varying(75),
        "shiptostreet" character varying(75),
        "shiptozipcode" character varying(75),
        "shiptocity" character varying(75),