Bei Kundendetails auch Standardpreisgruppen anzeigen

[mfinanz.git] / SL / Common.pm

diff --git a/SL/Common.pm b/SL/Common.pm
index 726c4c8e2576a04e32994be364df8357c6f5cf05..159609d30960382fc505aa0c9402dbe1ea5026ac 100644 (file)
--- a/SL/Common.pm
+++ b/SL/Common.pm
@@ -441,6 +441,9 @@ sub get_vc_details {
   $query = qq|SELECT * FROM contacts WHERE (cp_cv_id = ?)|;
   $form->{CONTACTS} = selectall_hashref_query($form, $dbh, $query, $vc_id);
 
+  # Only show default pricegroup for customer, not vendor, which is why this is outside the main query
+  ($form->{pricegroup}) = selectrow_query($form, $dbh, qq|SELECT pricegroup FROM pricegroup WHERE id = ?|, $form->{klass});
+
   $dbh->disconnect();
 
   $main::lxdebug->leave_sub();