Merge von 735,736 aus unstable: Bugfix
authorStephan Köhler <s.koehler@linet-services.de>
Mon, 16 Jan 2006 14:37:03 +0000 (14:37 +0000)
committerStephan Köhler <s.koehler@linet-services.de>
Mon, 16 Jan 2006 14:37:03 +0000 (14:37 +0000)
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
bin/mozilla/oe.pl
locale/de/all
locale/de/ca
locale/de/ic
locale/de/oe

index c704209..dcdaa36 100644 (file)
@@ -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,6 +397,15 @@ 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>
 
index 0760f4a..6e33356 100644 (file)
@@ -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);
index 2efa0ee..20d2bce 100644 (file)
@@ -348,7 +348,6 @@ $self{texts} = {
   'GIFI missing!'               => 'GIFI fehlt!',
   'GIFI saved!'                 => 'GIFI gespeichert!',
   'GL Transaction'              => 'Dialogbuchung',
-  'Gegenkonto'                  => 'Gegenkonto',
   'General Ledger'              => 'Finanzbuchhaltung',
   'Geschäftsvolumen'            => 'Geschäftsvolumen',
   'Given Name'                  => 'Vorname',
@@ -624,6 +623,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',
index 9cb280b..e0482e0 100644 (file)
@@ -17,7 +17,6 @@ $self{texts} = {
   'February'                    => 'Februar',
   'From'                        => 'Von',
   'GIFI'                        => 'GIFI',
-  'Gegenkonto'                  => 'Gegenkonto',
   'Include in Report'           => 'In Bericht aufnehmen',
   'Jan'                         => 'Jan',
   'January'                     => 'Januar',
index bda299f..b5a2b12 100644 (file)
@@ -139,7 +139,6 @@ $self{texts} = {
   'Quoted'                      => 'Angeboten',
   'RFQ'                         => 'Anfrage',
   'ROP'                         => 'Mindestlagerbestand',
-  'Reqdate'                     => 'Lieferdatum',
   'Required by'                 => 'Lieferdatum',
   'Revenue'                     => 'Erlöskonto',
   'Sales Order'                 => 'Auftrag',
index e1d034a..ad6151b 100644 (file)
@@ -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',