Habe das Lieferdatum auf Postenebene wieder eingefuehrt, anscheinend hatte das jemand...

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.

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index 22acf97..3812253 100644 (file)
--- 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 0760f4a..6e33356 100644 (file)
--- 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 cdd823c..3b4ce62 100644 (file)
--- 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 e1d034a..ad6151b 100644 (file)
--- 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',