X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/01cbb5260d4c4016bc735b469bb6c92bb5925b82..b720e272:/SL/CVar.pm diff --git a/SL/CVar.pm b/SL/CVar.pm index f819d9187..6da9b3680 100644 --- a/SL/CVar.pm +++ b/SL/CVar.pm @@ -98,8 +98,6 @@ sub get_custom_variables { my $dbh = $params{dbh} || $form->get_standard_dbh($myconfig); - my $trans_id = $params{trans_id} ? 'OR (v.trans_id = ?) ' : ''; - my $sub_module = $params{sub_module} ? $params{sub_module} : ''; my $q_var = @@ -130,7 +128,7 @@ sub get_custom_variables { my ($act_var, $valid); if ($params{trans_id}) { - my @values = (conv_i($cvar->{id}), conv_i($params{trans_id}, $sub_module)); + my @values = (conv_i($cvar->{id}), conv_i($params{trans_id}), $sub_module); do_statement($form, $h_var, $q_var, @values); $act_var = $h_var->fetchrow_hashref();