From bdb99b0def840cdd81b19bfbe68e1b383ae1c8cc Mon Sep 17 00:00:00 2001
From: =?utf8?q?Sven=20Sch=C3=B6ling?= <s.schoeling@linet-services.de>
Date: Tue, 3 Jan 2006 16:59:39 +0000
Subject: [PATCH] Habe das Lieferdatum auf Postenebene wieder eingefuehrt,
 anscheinend hatte das jemand wegoptimiert. Es wird jetzt wieder im Auftrag
 erfassen und Rechnung erfassen Formular angezeigt. Es wird ausserdem bei
 Umwandlung zwischen Rechnung<->Auftrag uebernommen. Sammelrechnungen
 uebernehmen das Lieferdatum aus den Teilauftraegen, wobei Postenlieferdatum
 Prioritaet hat.

DB Schema muss nicht angepasst werden, die Spalten sin schon vorhanden.
---
 bin/mozilla/io.pl | 10 ++++++++++
 bin/mozilla/oe.pl |  6 ++++++
 locale/de/all     |  1 +
 locale/de/oe      |  1 +
 4 files changed, 18 insertions(+)

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index 22acf9710..381225392 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -202,6 +202,7 @@ sub display_row {
   $serialnumber  = $locale->text('Serial No.');
   $projectnumber = $locale->text('Project');
   $partsgroup    = $locale->text('Group');
+  $reqdate       = $locale->text('Reqdate');
 
   $delvar = 'deliverydate';
 
@@ -396,10 +397,19 @@ sub display_row {
           <b>$projectnumber</b>&nbsp;<input name="projectnumber_$i" size=10 value="$form->{"projectnumber_$i"}">
 		  <input type=hidden name="oldprojectnumber_$i" value="$form->{"oldprojectnumber_$i"}">
 		  <input type=hidden name="project_id_$i" value="$form->{"project_id_$i"}">
+|;
+    if ($form->{type} eq 'invoice' or $form->{type} =~ /order/) {
+      my $reqdate_term = ($form->{type} eq 'invoice')?'deliverydate':'reqdate'; # invoice uses a different term for the same thing.
+      print qq|
+        <b>${$reqdate_term}</b>&nbsp;<input name="${reqdate_term}_$i" size=11 value="$form->{"${reqdate_term}_$i"}">
+|;
+
+    print qq|
 	  </td>
 	</tr>
 
 |;
+    }
 
 ############## ENDE Neueintrag ##################
 
diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl
index 0760f4afa..6e33356ee 100644
--- a/bin/mozilla/oe.pl
+++ b/bin/mozilla/oe.pl
@@ -238,6 +238,9 @@ sub prepare_order {
       $dec           = length $dec;
       $decimalplaces = ($dec > 2) ? $dec : 2;
 
+      # copy reqdate from deliverydate for invoice -> order conversion
+      $form->{"reqdate_$i"} = $form->{"deliverydate_$i"} unless $form->{"reqdate_$i"};
+
       $form->{"sellprice_$i"} =
         $form->format_amount(\%myconfig, $form->{"sellprice_$i"},
                              $decimalplaces);
@@ -1913,6 +1916,9 @@ sub invoice {
     $dec           = length $dec;
     $decimalplaces = ($dec > 2) ? $dec : 2;
 
+    # copy delivery date from reqdate for order -> invoice conversion
+    $form->{"deliverydate_$i"} = $form->{"reqdate_$i"} unless $form->{"deliverydate_$i"};
+
     $form->{"sellprice_$i"} =
       $form->format_amount(\%myconfig, $form->{"sellprice_$i"},
                            $decimalplaces);
diff --git a/locale/de/all b/locale/de/all
index cdd823c46..3b4ce62d8 100644
--- a/locale/de/all
+++ b/locale/de/all
@@ -624,6 +624,7 @@ Vorschau.',
   'Removing marked entries from queue ...' => 'Markierte Einträge werden von der Warteschlange entfernt ...',
   'Report for'                  => 'Bericht für',
   'Reports'                     => 'Berichte',
+  'Reqdate'                     => 'Lieferdatum',
   'Request for Quotation'       => 'Anfrage',
   'Request for Quotations'      => 'Anfragen',
   'Required by'                 => 'Lieferdatum',
diff --git a/locale/de/oe b/locale/de/oe
index e1d034a1e..ad6151b7b 100644
--- a/locale/de/oe
+++ b/locale/de/oe
@@ -153,6 +153,7 @@ $self{texts} = {
   'Recd'                        => 'erhalten',
   'Receive Merchandise'         => 'Waren einlagern',
   'Remaining'                   => 'Rest',
+  'Reqdate'                     => 'Lieferdatum',
   'Request for Quotation'       => 'Anfrage',
   'Request for Quotations'      => 'Anfragen',
   'Required by'                 => 'Lieferdatum',
-- 
2.20.1