Rechnungen: In Kopf anzeigen, in welchen SEPA-Exporten der Beleg enthalten ist

diff --git a/SL/DB/Invoice.pm b/SL/DB/Invoice.pm
index 76531e91964f7b4433a09d2466206cae8843460c..54da8fa7ff00f84a9d7990b43c3f59336761c20f 100644 (file)
--- a/SL/DB/Invoice.pm
+++ b/SL/DB/Invoice.pm
@@ -39,6 +39,12 @@ __PACKAGE__->meta->add_relationship(
     column_map      => { id => 'ar_id' },
     manager_args    => { with_objects => [ 'sepa_export' ] }
   },
     column_map      => { id => 'ar_id' },
     manager_args    => { with_objects => [ 'sepa_export' ] }
   },

+  sepa_exports      => {
+    type            => 'many to many',
+    map_class       => 'SL::DB::SepaExportItem',
+    map_from        => 'ar',
+    map_to          => 'sepa_export',
+  },

   custom_shipto     => {
     type            => 'one to one',
     class           => 'SL::DB::Shipto',
   custom_shipto     => {
     type            => 'one to one',
     class           => 'SL::DB::Shipto',

diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl
index 41d7e31571fdc4f69f899787325c082a5ba05adc..7700fc2710b2701084fae5f8297fe15db88285be 100644 (file)
--- a/bin/mozilla/is.pl
+++ b/bin/mozilla/is.pl
@@ -292,6 +292,7 @@ sub form_header {
   my %TMPL_VAR = ();
   my @custom_hiddens;
 
   my %TMPL_VAR = ();
   my @custom_hiddens;
 

+  $TMPL_VAR{invoice_obj} = SL::DB::Invoice->new(id => $form->{id})->load if $form->{id};

   $form->{employee_id} = $form->{old_employee_id} if $form->{old_employee_id};
   $form->{salesman_id} = $form->{old_salesman_id} if $form->{old_salesman_id};
 
   $form->{employee_id} = $form->{old_employee_id} if $form->{old_employee_id};
   $form->{salesman_id} = $form->{old_salesman_id} if $form->{old_salesman_id};
 

diff --git a/locale/de/all b/locale/de/all
index c897d962b9df568cf5eab6f3047017430771768f..59c92b9bde0f0a8f576c6859aa1d1bc57be25764 100755 (executable)
--- a/locale/de/all
+++ b/locale/de/all
@@ -2253,6 +2253,7 @@ $self->{texts} = {
   'SCREENED'                    => 'Angezeigt',
   'SEPA XML download'           => 'SEPA-XML-Download',
   'SEPA creditor ID'            => 'SEPA-Kreditoren-Identifikation',
   'SCREENED'                    => 'Angezeigt',
   'SEPA XML download'           => 'SEPA-XML-Download',
   'SEPA creditor ID'            => 'SEPA-Kreditoren-Identifikation',

+  'SEPA exports'                => 'SEPA-Exporte',

   'SEPA exports:'               => 'SEPA-Exporte:',
   'SEPA message ID'             => 'SEPA-Nachrichten-ID',
   'SEPA message IDs'            => 'SEPA-Nachrichten-IDs',
   'SEPA exports:'               => 'SEPA-Exporte:',
   'SEPA message ID'             => 'SEPA-Nachrichten-ID',
   'SEPA message IDs'            => 'SEPA-Nachrichten-IDs',

diff --git a/templates/webpages/is/form_header.html b/templates/webpages/is/form_header.html
index 7b6712d45e315550ad66fa67a5699128a4970594..dd711fc19f4aa9d83ad25ed967fd6acc4a1a2e4e 100644 (file)
--- a/templates/webpages/is/form_header.html
+++ b/templates/webpages/is/form_header.html
@@ -108,6 +108,17 @@
           </td>
         </tr>
 [%- END %]
           </td>
         </tr>
 [%- END %]

+[%- IF invoice_obj.sepa_exports.as_list.size %]
+        <tr>
+          <th align="right">[% LxERP.t8("SEPA exports") %]</th>
+          <td>
+           [% FOREACH export = invoice_obj.sepa_exports.as_list %]
+            <a href="sepa.pl?action=bank_transfer_edit&vc=customer&id=[% HTML.url(export.id) %]">[% HTML.escape(export.id) %]</a>
+            [% UNLESS loop.last %], [% END %]
+           [% END %]
+          </td>
+        </tr>
+[%- END %]

 [%- IF business %]
         <tr>
           <th align="right">[% 'Customer type' | $T8 %]</th>
 [%- IF business %]
         <tr>
           <th align="right">[% 'Customer type' | $T8 %]</th>