| line |
true |
false |
branch |
|
31
|
0 |
0 |
ref $_[0] ? : |
|
35
|
0 |
0 |
unless ref $dbh |
|
73
|
0 |
0 |
unless $$self{'data_sth'} |
|
81
|
0 |
0 |
unless defined $code_desc |
|
91
|
0 |
0 |
ref $_[0] ? : |
|
104
|
0 |
0 |
$options ? : |
|
105
|
0 |
0 |
unless defined $select_prompt |
|
106
|
0 |
0 |
unless defined $blank_prompt |
|
113
|
0 |
0 |
if ($value eq '') { } |
|
|
0 |
0 |
elsif ($blank_prompt ne '') { } |
|
114
|
0 |
0 |
if ($select_prompt eq '') |
|
128
|
0 |
0 |
if $Subset and not $$Subset{$code_code} and $code_code ne $value |
|
131
|
0 |
0 |
if ($code_code eq $value) { } |
|
|
0 |
0 |
elsif ($$row[3] ne 'd') { } |
|
140
|
0 |
0 |
unless ($selected) |
|
151
|
0 |
0 |
ref $_[0] ? : |
|
164
|
0 |
0 |
$options ? : |
|
165
|
0 |
0 |
unless defined $blank_prompt |
|
166
|
0 |
0 |
unless defined $sep |
|
171
|
0 |
0 |
if ($value eq '') { } |
|
173
|
0 |
0 |
if ($blank_prompt ne '') |
|
178
|
0 |
0 |
if ($blank_prompt ne '') |
|
188
|
0 |
0 |
if $Subset and not $$Subset{$code_code} and $code_code ne $value |
|
190
|
0 |
0 |
if ($code_code eq $value) { } |
|
|
0 |
0 |
elsif ($$row[3] ne 'd') { } |
|
192
|
0 |
0 |
if $select |
|
196
|
0 |
0 |
if $select |
|
203
|
0 |
0 |
unless ($selected) |
|
204
|
0 |
0 |
if $select |
|
218
|
0 |
0 |
ref $_[0] ? : |
|
230
|
0 |
0 |
$options ? : |
|
234
|
0 |
0 |
if $size |
|
241
|
0 |
0 |
if $Subset and not $$Subset{$code_code} and not $$Value{$code_code} |
|
243
|
0 |
0 |
if ($$Value{$code_code}) { } |
|
|
0 |
0 |
elsif ($$row[3] ne 'd') { } |
|
263
|
0 |
0 |
ref $_[0] ? : |
|
275
|
0 |
0 |
$options ? : |
|
276
|
0 |
0 |
unless defined $sep |
|
283
|
0 |
0 |
if $Subset and not $$Subset{$code_code} and not $$Value{$code_code} |
|
285
|
0 |
0 |
if ($$Value{$code_code}) { } |
|
|
0 |
0 |
elsif ($$row[3] ne 'd') { } |
|
286
|
0 |
0 |
if $select |
|
291
|
0 |
0 |
if $select |
|
299
|
0 |
0 |
if $select |
|
313
|
0 |
0 |
unless $$self{'set_sth'} |
|
334
|
0 |
0 |
unless $$self{'remove_sth'} |
|
346
|
0 |
0 |
unless $$self{'get_sth'} |
|
373
|
0 |
0 |
if (not @old and !defined($code_order) || $code_order eq '' and $code_code =~ /^\d+$/) |
|
385
|
0 |
0 |
if (@old) { } |
|
|
0 |
0 |
elsif ($code_desc ne '') { } |
|
387
|
0 |
0 |
if ($code_desc ne '') { } |
|
388
|
0 |
0 |
if ($code_desc ne $old_desc or $code_order ne $old_order or $code_flag ne $old_flag) |
|
410
|
0 |
0 |
unless $$self{'insert_sth'} |
|
428
|
0 |
0 |
unless $$self{'update_sth'} |
|
450
|
0 |
0 |
unless (defined $value) |
|
451
|
0 |
0 |
if ($$self{'getparam'}) |
|
454
|
0 |
0 |
unless defined $value |
|
455
|
0 |
0 |
unless defined $value |
|
465
|
0 |
0 |
unless (defined $value) |
|
466
|
0 |
0 |
$$self{'getparams'} ? : |
|
467
|
0 |
0 |
if ($call) |
|
469
|
0 |
0 |
if ref $$value[0] |
|
471
|
0 |
0 |
unless defined $value |
|
472
|
0 |
0 |
unless defined $value |
|
479
|
0 |
0 |
if ref $value eq 'HASH' |
|
481
|
0 |
0 |
if (ref $value eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (defined $value and $value ne '' and not ref $value) { } |