X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FCVar.pm;h=0264d8ab09ceadb707dc80006d6f7b081e6fccfd;hb=5e96049428deceda2ef857930bbf67311deccbcb;hp=d023081044038daa54ec36cec6a74a9922be0022;hpb=2737667aa9394428f885187928509e7c5d0ec4d4;p=kivitendo-erp.git diff --git a/SL/CVar.pm b/SL/CVar.pm index d02308104..0264d8ab0 100644 --- a/SL/CVar.pm +++ b/SL/CVar.pm @@ -55,6 +55,10 @@ SQL } $self->_unpack_flags($config); + + my $cvar_config = SL::DB::CustomVariableConfig->new(id => $config->{id})->load; + @{$config->{'partsgroups'}} = map {$_->id} @{$cvar_config->partsgroups}; + } $::form->{CVAR_CONFIGS}->{$params{module}} = $configs; } @@ -132,6 +136,8 @@ sub get_custom_variables { $act_var = $h_var->fetchrow_hashref(); $valid = $self->get_custom_variables_validity(config_id => $cvar->{id}, trans_id => $params{trans_id}); + } else { + $valid = !$cvar->{flag_defaults_to_invalid}; } if ($act_var) { @@ -145,7 +151,7 @@ sub get_custom_variables { : $act_var->{text_value}; $cvar->{valid} = $valid; } else { - $cvar->{valid} = 1; + $cvar->{valid} = $valid // 1; if ($cvar->{type} eq 'date') { if ($cvar->{default_value} eq 'NOW') { @@ -277,13 +283,20 @@ sub render_inputs { my $myconfig = \%main::myconfig; my $form = $main::form; - my %options = ( name_prefix => "$params{name_prefix}", - name_postfix => "$params{name_postfix}", - hide_non_editable => $params{hide_non_editable}, + my %options = ( name_prefix => "$params{name_prefix}", + name_postfix => "$params{name_postfix}", + hide_non_editable => $params{hide_non_editable}, show_disabled_message => $params{show_disabled_message}, ); + # should this cvar be filtered by partsgroups? foreach my $var (@{ $params{variables} }) { + if ($var->{flag_partsgroup_filter}) { + if (!$params{partsgroup_id} || (!grep {$params{partsgroup_id} == $_} @{ $var->{partsgroups} })) { + $var->{partsgroup_filtered} = 1; + } + } + $var->{HTML_CODE} = $form->parse_html_template('amcvar/render_inputs', { var => $var, %options }); $var->{VALID_BOX} = $form->parse_html_template('amcvar/render_checkboxes', { var => $var, %options }); } @@ -402,7 +415,7 @@ sub build_filter_query { $not = 'NOT' if ($params{filter}->{$name} eq 'no'); push @sub_where, qq|COALESCE(cvar.bool_value, false) = TRUE|; - } elsif (any { $config->{type} eq $_ } qw(customer vendor part)) { + } elsif (any { $config->{type} eq $_ } qw(customer vendor)) { next unless $params{filter}->{$name}; my $table = $config->{type}; @@ -562,8 +575,8 @@ sub save_custom_variables_validity { my $sth = prepare_query($form, $dbh, $query); unless ($params{validity}) { - foreach my $config_id (listify $params{config_id}) { - foreach my $trans_id (listify $params{trans_id}) { + foreach my $config_id (listify($params{config_id})) { + foreach my $trans_id (listify($params{trans_id})) { do_statement($form, $sth, $query, conv_i($config_id), conv_i($trans_id)); } } @@ -589,7 +602,7 @@ sub get_custom_variables_validity { my $dbh = $params{dbh} || $form->get_standard_dbh($myconfig); - my $query = qq|SELECT COUNT(*) FROM custom_variables_validity WHERE config_id = ? AND trans_id = ?|; + my $query = qq|SELECT id FROM custom_variables_validity WHERE config_id = ? AND trans_id = ? LIMIT 1|; my ($invalid) = selectfirst_array_query($form, $dbh, $query, conv_i($params{config_id}), conv_i($params{trans_id})); @@ -611,9 +624,9 @@ sub custom_variables_validity_by_trans_id { my $dbh = $params{dbh} || $form->get_standard_dbh($myconfig); - my $query = qq|SELECT config_id, COUNT(*) FROM custom_variables_validity WHERE trans_id = ? GROUP BY config_id|; + my $query = qq|SELECT DISTINCT config_id FROM custom_variables_validity WHERE trans_id = ?|; - my %invalids = selectall_as_map($form, $dbh, $query, 'config_id', 'count', $params{trans_id}); + my %invalids = map { +($_->{config_id} => 1) } selectall_hashref_query($form, $dbh, $query, $params{trans_id}); $main::lxdebug->leave_sub(2);