projekt kivitendo

  my $select_clause = join ', ',    map { ($table_prefix{$_} || "p.") . $_ } @select_tokens;

  my $join_clause   = join ' ',     @joins{ grep $joins_needed{$_}, @join_order };

  my $where_clause  = join ' AND ', map { "($_)" } @where_tokens;

  my $query = qq|SELECT DISTINCT $select_clause FROM parts p $join_clause WHERE $where_clause $group_clause $order_clause $limit_clause|;

  $form->{parts} = selectall_hashref_query($form, $dbh, $query, @bind_vars);