X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FOE.pm;h=63fcf1f06f4ece291516d127f08021d6f4cf3b3f;hb=8fdebd9cf2e3aa8fc9643f34cec96f172812abfb;hp=226da811950290bee5285cd2caac3bf2ab3ad4ce;hpb=da804bf2a76bec9da604c00208f789a9a312686b;p=kivitendo-erp.git diff --git a/SL/OE.pm b/SL/OE.pm index 226da8119..63fcf1f06 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -667,7 +667,7 @@ sub retrieve { my ($self, $myconfig, $form) = @_; # connect to database - my $dbh = $form->dbconnect_noauto($myconfig); + my $dbh = $form->get_standard_dbh; my ($query, $query_add, @values, @ids, $sth); @@ -1285,39 +1285,6 @@ sub project_description { return $value; } -########################## -# Get data for the submitted order id -# from database -# -sub get_order_data_by_ordnumber { - $main::lxdebug->enter_sub(); - - my $self = shift; - my %params = @_; - - Common::check_params(\%params, qw(ordnumber)); - - my $form = $main::form; - my %myconfig = %main::myconfig; - my $dbh = $form->get_standard_dbh(); - - my @values = ($params{ordnumber}); - - # We query the database for the fields we need using the submitted "ordnumber" - my $query = <leave_sub(); - - return $result; -} - 1; __END__