Kunden Mandanten ID fuer SEPA Lastschrift implementiert.

[mfinanz.git] / SL / SEPA.pm

diff --git a/SL/SEPA.pm b/SL/SEPA.pm
index d31204e3b9237865119e952081ef92031261c96a..21629ba3d61e87d06790b375f51184e7a879d132 100644 (file)
--- a/SL/SEPA.pm
+++ b/SL/SEPA.pm
@@ -177,8 +177,10 @@ sub retrieve_export {
   if ($export->{id}) {
     my ($columns, $joins);
 
   if ($export->{id}) {
     my ($columns, $joins);
 

+    my $mandator_id = $params{vc} eq 'customer' ? ', mandator_id' : '';
+

     if ($params{details}) {
     if ($params{details}) {

-      $columns = qq|, arap.invnumber, arap.invoice, arap.transdate AS reference_date, vc.name AS vc_name, vc.${vc}number AS vc_number, c.accno AS chart_accno, c.description AS chart_description|;
+      $columns = qq|, arap.invnumber, arap.invoice, arap.transdate AS reference_date, vc.name AS vc_name, vc.${vc}number AS vc_number, c.accno AS chart_accno, c.description AS chart_description, ${mandator_id}|;

       $joins   = qq|LEFT JOIN ${arap} arap ON (sei.${arap}_id = arap.id)
                     LEFT JOIN ${vc} vc     ON (arap.${vc}_id  = vc.id)
                     LEFT JOIN chart c      ON (sei.chart_id   = c.id)|;
       $joins   = qq|LEFT JOIN ${arap} arap ON (sei.${arap}_id = arap.id)
                     LEFT JOIN ${vc} vc     ON (arap.${vc}_id  = vc.id)
                     LEFT JOIN chart c      ON (sei.chart_id   = c.id)|;