From 5c3ccca49f076038fe3d48cbd30c8a618ff876fc Mon Sep 17 00:00:00 2001
From: =?utf8?q?Sven=20Sch=C3=B6ling?= <s.schoeling@linet-services.de>
Date: Fri, 23 Mar 2007 13:24:35 +0000
Subject: [PATCH] Bug 603: Interne Bemerkungen bei Workflow aus Lieferanten
 heraus

---
 SL/IR.pm          | 2 +-
 bin/mozilla/ap.pl | 3 +++
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/SL/IR.pm b/SL/IR.pm
index 2a74e0612..e99a108cf 100644
--- a/SL/IR.pm
+++ b/SL/IR.pm
@@ -995,7 +995,7 @@ sub get_vendor {
   $form->{vendor_id} *= 1;
 
   # get vendor
-  my $query = qq|SELECT v.name AS vendor, v.creditlimit, v.terms,
+  my $query = qq|SELECT v.name AS vendor, v.creditlimit, v.terms, v.notes AS intnotes,
                  v.email, v.cc, v.bcc, v.language_id, v.payment_id,
 		 v.street, v.zipcode, v.city, v.country, v.taxzone_id,
                  $duedate + COALESCE(pt.terms_netto, 0) AS duedate,
diff --git a/bin/mozilla/ap.pl b/bin/mozilla/ap.pl
index c6eda1b9f..439530ada 100644
--- a/bin/mozilla/ap.pl
+++ b/bin/mozilla/ap.pl
@@ -130,6 +130,9 @@ sub create_links {
   # build the popup menus
   $form->{taxincluded} = ($form->{id}) ? $form->{taxincluded} : "checked";
 
+  # notes
+  $form->{notes} = $form->{intnotes} unless $form->{notes};
+
   # currencies
   @curr = split(/:/, $form->{currencies});
   chomp $curr[0];
-- 
2.20.1