From: Stephan Köhler Date: Thu, 27 Jul 2006 09:06:13 +0000 (+0000) Subject: Bugfix 133, Quoting fuer Kunden und Lieferanten rein, Dequoting wird nicht benoetigt, X-Git-Tag: release-2.4.0^2~254 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=f9f5330a26eb3f447677ab2524c823cb9f96723b;p=kivitendo-erp.git Bugfix 133, Quoting fuer Kunden und Lieferanten rein, Dequoting wird nicht benoetigt, Anfuehrungsstriche brachten Verkaufs- und Einkaufsmasken durcheinander --- diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl index c896836be..66e5da7ae 100644 --- a/bin/mozilla/ir.pl +++ b/bin/mozilla/ir.pl @@ -76,6 +76,11 @@ sub invoice_links { $form->create_links("AP", \%myconfig, "vendor"); + #quote all_vendor Bug 133 + foreach $ref (@{ $form->{all_vendor} }) { + $ref->{name} = $form->quote($ref->{name}); + } + if ($form->{all_vendor}) { unless ($form->{vendor_id}) { $form->{vendor_id} = $form->{all_vendor}->[0]->{id}; @@ -200,6 +205,9 @@ sub form_header { s/option>\Q$form->{$item}\E/option selected>$form->{$item}/; } + #quote selectvendor Bug 133 + $form->{"selectvendor"} = $form->quote($form->{"selectvendor"}); + $form->{exchangerate} = $form->format_amount(\%myconfig, $form->{exchangerate}); diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl index b5479473c..eb9dd849f 100644 --- a/bin/mozilla/is.pl +++ b/bin/mozilla/is.pl @@ -105,6 +105,11 @@ sub invoice_links { $cp_id = $form->{cp_id}; IS->get_customer(\%myconfig, \%$form); + #quote all_customer Bug 133 + foreach $ref (@{ $form->{all_customer} }) { + $ref->{name} = $form->quote($ref->{name}); + } + IS->retrieve_invoice(\%myconfig, \%$form); $form->{cp_id} = $cp_id; @@ -239,6 +244,9 @@ sub form_header { s/option>\Q$form->{$item}\E/option selected>$form->{$item}/; } + #quote customer Bug 133 + $form->{selectcustomer} = $form->quote($form->{selectcustomer}); + #build contacts if ($form->{all_contacts}) { diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl index baa041f36..6f12c94d3 100644 --- a/bin/mozilla/oe.pl +++ b/bin/mozilla/oe.pl @@ -30,6 +30,7 @@ # Order entry module # Quotation module #====================================================================== +use Data::Dumper; use SL::OE; use SL::IR; @@ -167,9 +168,21 @@ sub order_links { # get customer / vendor if ($form->{type} =~ /(purchase_order|request_quotation|receive_order)/) { IR->get_vendor(\%myconfig, \%$form); + + #quote all_vendor Bug 133 + foreach $ref (@{ $form->{all_vendor} }) { + $ref->{name} = $form->quote($ref->{name}); + } + } if ($form->{type} =~ /(sales|ship)_(order|quotation)/) { IS->get_customer(\%myconfig, \%$form); + + #quote all_vendor Bug 133 + foreach $ref (@{ $form->{all_customer} }) { + $ref->{name} = $form->quote($ref->{name}); + } + } $form->{cp_id} = $cp_id; @@ -330,6 +343,9 @@ sub form_header { s/option>\Q$form->{$item}\E/option selected>$form->{$item}/; } + #quote select[customer|vendor] Bug 133 + $form->{"select$form->{vc}"} = $form->quote($form->{"select$form->{vc}"}); + #build contacts if ($form->{all_contacts}) {