From: Jan Büren <jan@kivitendo-premium.de>
Date: Sat, 30 Jan 2016 15:29:28 +0000 (+0100)
Subject: Gelangensbestätigung als Weiche in io.pl UND Helper PrintOptions.pm
X-Git-Tag: release-3.4.1~224
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=32421f9a8030b57a5713b992e55e9cba609493a9;p=kivitendo-erp.git

Gelangensbestätigung als Weiche in io.pl UND Helper PrintOptions.pm
---

diff --git a/SL/Helper/PrintOptions.pm b/SL/Helper/PrintOptions.pm
index 2d842afc0..da6cdf313 100644
--- a/SL/Helper/PrintOptions.pm
+++ b/SL/Helper/PrintOptions.pm
@@ -51,6 +51,7 @@ sub get_print_options {
     ($form->{type} eq 'sales_order') ? (
       opthash("sales_order",         $form->{PD}{sales_order},         $locale->text('Confirmation')),
       opthash("proforma",            $form->{PD}{proforma},            $locale->text('Proforma Invoice')),
+      opthash("ic_supply",           $form->{PD}{ic_supply},            $locale->text('Intra-Community supply')),
     ) : undef,
     ($form->{type} =~ /sales_quotation$/) ?
       opthash('sales_quotation',     $form->{PD}{sales_quotation},     $locale->text('Quotation')) : undef,
diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index 1dc7a64d1..f77a5f76e 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -1245,6 +1245,17 @@ sub print_form {
     $order                = 1;
   }
 
+  if (($form->{type} eq 'sales_order') && ($form->{formname} eq 'ic_supply') ) {
+    $inv                  = "inv";
+    $due                  = "due";
+    $form->{"${inv}date"} = $form->{transdate};
+    $form->{"invdate"}    = $form->{transdate};
+    $form->{invnumber}    = $form->{ordnumber};
+    $form->{label}        = $locale->text('Intra-Community supply');
+    $numberfld            = "sonumber";
+    $order                = 1;
+  }
+
   if ($form->{formname} eq 'request_quotation') {
     $inv                  = "quo";
     $due                  = "req";