<% use Mojo::JSON qw/decode_json encode_json/; my $invoices = &subs::db_query('select * from appointments where type=? and app = ? order by timestamp', 'invoice', $a)->hashes; @{$invoices} = grep { $_->{'status'} ne 'completed' } @{$invoices}; my $informations = $invoices; foreach my $i ( @{$informations} ) { $i->{'data'} = eval { return decode_json $i->{'data'} } || {}; } %> {$a}->{'setting'}->{'record_vendor'} eq 'on') { %>checked<% } %>>
None <% foreach my $i ( @{$informations} ) { %> <%= $i->{'data'}->{'id'} %> - <%= &subs::price_formatter($i->{'data'}->{'numbers'}->{'total'}) %> <% } %> {$a}->{'setting'}->{'record_manufacturer'} eq 'on') { %>checked<% } %>>
<% if (scalar @{$appts->{$a}->{'model'}} == 0) { %> <% if ($appts->{$a}->{'models'} != undef) { %> <% foreach my $mod ( @{$appts->{$a}->{'models'}}) { %> {'model'} eq $mod->{'uuid'}) { %>selected<% } %>><%= &subs::format_name($mod->{'name'}) %> <% } %> <% } %> {'unit'} || $appts->{$a}->{'setting'}->{'unit'}) || $a eq ($app->{'unit'} || $appts->{$a}->{'setting'}->{'unit'})) { %>selected<% } %>><%= &subs::format_name($a) %> <% foreach my $u ( sort keys %{$gb::measures} ) { %> {'unit'} || $appts->{$a}->{'setting'}->{'unit'})) { %>selected<% } %>><%= &subs::format_name($gb::measures->{$u}->{'name'}) %> <% } %> <% } else { %> <% } %> {$a}->{'setting'}->{'record_input'} eq 'on') { %>checked<% } %>>
<% if (scalar @{$appts->{$a}->{'model'}} == 0) { %> <% if ($appts->{$a}->{'models'} != undef) { %> <% foreach my $mod ( @{$appts->{$a}->{'models'}}) { %> {'model'} eq $mod->{'uuid'}) { %>selected<% } %>><%= &subs::format_name($mod->{'name'}) %> <% } %> <% } %> {'unit'} || $appts->{$a}->{'setting'}->{'unit'}) || $a eq ($app->{'unit'} || $appts->{$a}->{'setting'}->{'unit'})) { %>selected<% } %>><%= &subs::format_name($a) %> <% foreach my $u ( sort keys %{$gb::measures} ) { %> {'unit'} || $appts->{$a}->{'setting'}->{'unit'})) { %>selected<% } %>><%= &subs::format_name($gb::measures->{$u}->{'name'}) %> <% } %> <% } else { %> <%= include 'apps/transaction/models', settings => $appts->{$a}->{'setting'}, models => $appts->{$a}->{'model'}, l => $appts->{$a}->{'list'}->[0], source => 'transaction' %>
<% } %> <% foreach my $state ( @{$gb::inventory_states} ) { %> {'state'} || $appts->{$a}->{'setting'}->{'state'}) eq $state) { %>selected<% } %>><%= &subs::format_name($state) %> <% } %>



{'has_totes'} || $appts->{$a}->{'setting'}->{'has_totes'}) eq 'on') { %>enabled="on" style="background-color:lightgreen;"<% } %>>Totes {'has_tax'} || $appts->{$a}->{'setting'}->{'has_tax'}) eq 'on') { %>enabled="on" style="background-color:lightgreen;"<% } %>>Tax +/-