X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/ce73964f91267ab5eecb2832765efbb3752c2a59..844a541e0d8f59644540413f675e8f07cd154cf6:/SL/Common.pm diff --git a/SL/Common.pm b/SL/Common.pm index fb1b4b850..a0d54feb6 100644 --- a/SL/Common.pm +++ b/SL/Common.pm @@ -342,6 +342,11 @@ sub get_vc_details { $query = qq|SELECT * FROM shipto WHERE (trans_id = ?)|; $form->{SHIPTO} = selectall_hashref_query($form, $dbh, $query, $vc_id); + if ($vc eq 'customer') { + $query = qq|SELECT * FROM additional_billing_addresses WHERE (customer_id = ?)|; + $form->{ADDITIONAL_BILLING_ADDRESSES} = selectall_hashref_query($form, $dbh, $query, $vc_id); + } + $query = qq|SELECT * FROM contacts WHERE (cp_cv_id = ?)|; $form->{CONTACTS} = selectall_hashref_query($form, $dbh, $query, $vc_id);