Schalter Lastschrift (Verfahren) für Kunden/Lieferanten

[mfinanz.git] / SL / IC.pm

diff --git a/SL/IC.pm b/SL/IC.pm
index 2499decd025f7f9220d35c255f48a2eac9dee245..45fcebb1b75c3f76aa59bc3891cd2170bc79ce42 100644 (file)
--- a/SL/IC.pm
+++ b/SL/IC.pm
@@ -188,10 +188,12 @@ sub get_part {
 
   # get translations
   $form->{language_values} = "";
 
   # get translations
   $form->{language_values} = "";

-  $query = qq|SELECT language_id, translation FROM translation WHERE parts_id = ?|;
+  $query = qq|SELECT language_id, translation, longdescription
+              FROM translation
+              WHERE parts_id = ?|;

   my $trq = prepare_execute_query($form, $dbh, $query, conv_i($form->{id}));
   my $trq = prepare_execute_query($form, $dbh, $query, conv_i($form->{id}));

-  while ($tr = $trq->fetchrow_hashref(NAME_lc)) {
-    $form->{language_values} .= "---+++---".$tr->{language_id}."--++--".$tr->{translation};
+  while (my $tr = $trq->fetchrow_hashref(NAME_lc)) {
+    $form->{language_values} .= "---+++---" . join('--++--', @{$tr}{qw(language_id translation longdescription)});

   }
   $trq->finish;
 
   }
   $trq->finish;
 


@@ -208,7 +210,7 @@ sub get_part {
   $sth->finish;
 
   # is it an orphan
   $sth->finish;
 
   # is it an orphan

-  my @referencing_tables = qw(invoice orderitems invoice inventory rmaitems);
+  my @referencing_tables = qw(invoice orderitems inventory rmaitems);

   my %column_map         = ( );
   my $parts_id           = conv_i($form->{id});
 
   my %column_map         = ( );
   my $parts_id           = conv_i($form->{id});
 


@@ -778,10 +780,10 @@ sub all_parts {
        ) AS ioi ON ioi.parts_id = p.id|,
     apoe       =>
       q|LEFT JOIN (
        ) AS ioi ON ioi.parts_id = p.id|,
     apoe       =>
       q|LEFT JOIN (

-         SELECT id, transdate, 'ir' AS module, ordnumber, quonumber,         invnumber, FALSE AS quotation, NULL AS customer_id,         vendor_id, NULL AS deliverydate FROM ap UNION
-         SELECT id, transdate, 'is' AS module, ordnumber, quonumber,         invnumber, FALSE AS quotation,         customer_id, NULL AS vendor_id,         deliverydate FROM ar UNION
-         SELECT id, transdate, 'oe' AS module, ordnumber, quonumber, NULL AS invnumber,          quotation,         customer_id,         vendor_id, NULL AS deliverydate FROM oe
-       ) AS apoe ON ioi.trans_id = apoe.id|,
+         SELECT id, transdate, 'ir' AS module, ordnumber, quonumber,         invnumber, FALSE AS quotation, NULL AS customer_id,         vendor_id, NULL AS deliverydate, 'invoice'    AS ioi FROM ap UNION
+         SELECT id, transdate, 'is' AS module, ordnumber, quonumber,         invnumber, FALSE AS quotation,         customer_id, NULL AS vendor_id,         deliverydate, 'invoice'    AS ioi FROM ar UNION
+         SELECT id, transdate, 'oe' AS module, ordnumber, quonumber, NULL AS invnumber,          quotation,         customer_id,         vendor_id, NULL AS deliverydate, 'orderitems' AS ioi FROM oe
+       ) AS apoe ON ((ioi.trans_id = apoe.id) AND (ioi.ioi = apoe.ioi))|,

     cv         =>
       q|LEFT JOIN (
            SELECT id, name, 'customer' AS cv FROM customer UNION
     cv         =>
       q|LEFT JOIN (
            SELECT id, name, 'customer' AS cv FROM customer UNION