| line |
true |
false |
branch |
|
31
|
0 |
24 |
unless ref $field_ids eq 'ARRAY'
|
|
35
|
0 |
24 |
unless my $maps = $dbrh->select(-'table', 'enum_map', -'fields', 'field_id enum_id sortval', -'where', {'field_id', ['d in', @$field_ids]})
|
|
45
|
14 |
10 |
if (@enumids)
|
|
46
|
0 |
14 |
unless $values = $dbrh->select(-'table', 'enum', -'fields', 'enum_id handle name override_id', -'where', {'enum_id', ['d in', @enumids]})
|
|
57
|
83 |
24 |
defined $$value{'override_id'} ? :
|
|
90
|
1 |
0 |
if (defined $id) { }
|
|
103
|
1 |
19 |
unless defined $value and length $value
|
|
105
|
0 |
19 |
if (ref $value eq 'DBR::_ENUM')
|
|
114
|
1 |
20 |
unless defined $id
|
|
164
|
0 |
0 |
unless my $hmap = $FIELDMAP{$self->field_id}[1]
|
|
167
|
0 |
0 |
unless $$hmap{$_}[0]
|
|
174
|
0 |
0 |
if $id eq $_
|
|
185
|
0 |
0 |
if ref $val eq 'DBR::_ENUM'
|