<% my $am = eval { return decode_json $settings->{'app_measures'} } || $settings->{'app_measures'} || {}; %> <% my $gbm = $gb::pos->{$settings->{'pos'}}->{'app_measures'}; %> <% my $gb_measures; %> <% if ($gb::pos->{$settings->{'pos'}}->{'app_measures'} || $am ) { %> <% if ($gbm) { my %gb_measures = %{$gbm}; $gb_measures = \%gb_measures; } foreach my $ameas ( keys %{$am} ) { unless ($gb_measures->{$ameas}) { $gb_measures->{$ameas} = {}; } } %> <% foreach my $meas ( sort keys %{$am}) { %> <% $am->{$meas} = {} unless eval { keys %{$am->{$meas}} }; %> <% my $m = $am->{$meas} || $gb::pos->{$settings->{'pos'}}->{'app_measures'}->{$meas}; %> <% next if $m->{'type'} eq 'none'; %> <%= &subs::format_name($meas) %>
<% if ($m->{'type'} eq 'select') { %> <% foreach my $me ( @{$m->{'options'}} ) { %> {$meas}) { %>selected <% } %> value="<%= $me %>"><%= &subs::format_name($me) %> <% } %> <% } elsif ($m->{'type'} eq 'range') { %> <%= $am->{$meas}->{'value'} %> <% } else { %> <% } %>
<% my $o = {}; my $ia = $appts->{$a}->{'settings'}->{'ia'}; foreach my $chip ( keys %{$ia} ) { foreach my $i ( keys %{$ia->{$chip}} ) { if ($ia->{$chip}->{$i}->{'measure'} eq $meas) { if ($ia->{$chip}->{$i}->{'threshold'}) { %>
<% } } } } %>

<% if ($ia->{$chip}->{$i}->{'name'}) { %><%= &subs::format_name($ia->{$chip}->{$i}->{'name'}) %> <% } %>

<%= $ia->{$chip}->{$i}->{'component'} %>

<% } %> <% } %>