line |
true |
false |
branch |
261
|
0 |
1 |
unless (defined $$self{'row_ids'}) |
266
|
1 |
0 |
unless (defined $$self{'join_cols'}) |
293
|
0 |
1 |
if ($parameters{'use_package'}) |
297
|
0 |
0 |
if $pkg |
298
|
0 |
0 |
if $@ |
321
|
1 |
0 |
if ($database) { } |
324
|
0 |
1 |
unless ($dbh) |
626
|
0 |
1 |
@{$args{'show'};} ? : |
723
|
0 |
0 |
if ($args{'limit'} == 0 or $args{'outfile'} eq '' or $args{'outfile'} eq '-') |
733
|
0 |
0 |
if ($num_pages == 1) |
737
|
0 |
0 |
if ($num_pages == 0) |
741
|
0 |
0 |
if $args{'verbose'} |
745
|
0 |
0 |
$2 ? : |
746
|
0 |
0 |
defined $args{'link_suffix'} ? : |
749
|
0 |
0 |
$num_pages < 100 ? : |
|
0 |
0 |
$num_pages < 10 ? : |
754
|
0 |
0 |
$args{'title'} ? : |
756
|
0 |
0 |
if ($title_main =~ / & /) |
760
|
0 |
0 |
$args{'multi_page_template'} ? : |
775
|
0 |
0 |
$page > 1 ? : |
781
|
0 |
0 |
$page > 1 ? : |
784
|
0 |
0 |
$page < $num_pages ? : |
789
|
0 |
0 |
$page < $num_pages ? : |
799
|
0 |
0 |
if $args{'verbose'} |
813
|
0 |
0 |
if ($args{'prev_file'} or $args{'next_file'}) |
825
|
0 |
0 |
$args{'prev_next_template'} ? : |
845
|
0 |
0 |
unless open $fh, '>', $args{'outfile'} |
936
|
0 |
0 |
if ($args{'outfile'} eq '-') |
946
|
0 |
0 |
if ($args{'outfile'}) |
950
|
0 |
0 |
$2 ? : |
952
|
0 |
0 |
defined $args{'link_suffix'} ? : |
958
|
0 |
0 |
if ($split_alpha) |
963
|
0 |
0 |
$split_alpha ? : |
970
|
0 |
0 |
$split_alpha || @split_vals < 15 ? : |
973
|
0 |
0 |
$args{'title'} ? : |
976
|
0 |
0 |
$args{'split_ind_template'} ? : |
987
|
0 |
0 |
unless $val |
989
|
0 |
0 |
if $$self{'default_format'}{$args{'table'}}{$split_col} |
997
|
0 |
0 |
if $args{'debug'} |
1007
|
0 |
0 |
if ($i > 0) |
1011
|
0 |
0 |
if $$self{'default_format'}{$args{'table'}}{$split_col} |
1028
|
0 |
0 |
if ($i < @split_vals - 1) |
1032
|
0 |
0 |
if $$self{'default_format'}{$args{'table'}}{$split_col} |
1046
|
0 |
0 |
if ($val and $args{'split_alpha'}) { } |
1060
|
0 |
0 |
if ($args{'split_titlefmt'}) |
1066
|
0 |
0 |
if ($self->do_multi_page_report(%args, 'outfile', $outfile, 'prev_file', $prev_file, 'prev_label', $prev_label, 'next_file', $next_file, 'next_label', $next_label, 'where', \%where, 'title', $mtitle)) |
1075
|
0 |
0 |
if $args{'verbose'} |
1076
|
0 |
0 |
if ($val) { } |
1079
|
0 |
0 |
if ($niceval ne $val) |
1083
|
0 |
0 |
if ($label =~ / & /) |
1114
|
0 |
0 |
if ($two_level_ind) { } |
|
0 |
0 |
elsif ($split_alpha) { } |
1120
|
0 |
0 |
$split_alpha ? : |
1128
|
0 |
0 |
if $a |
1146
|
0 |
0 |
if ($two_level_ind and !defined($prev_a) || $a1 ne $prev_a) |
1148
|
0 |
0 |
if (defined $prev_a) |
1152
|
0 |
0 |
if $a1 |
1156
|
0 |
0 |
$split_alpha ? : |
1158
|
0 |
0 |
$split_alpha ? : |
1160
|
0 |
0 |
$split_alpha ? : |
1170
|
0 |
0 |
unless open $fh, '>', $index_file |
1174
|
0 |
0 |
if $args{'verbose'} |
1207
|
0 |
1 |
if (@where) |
1213
|
0 |
1 |
unless ($tot_sth) |
1219
|
0 |
1 |
unless ($rv) |
1267
|
0 |
0 |
unless ($row_id) |
1279
|
0 |
0 |
if ($update_values{$ufield} eq 'NULL') { } |
|
0 |
0 |
elsif ($self->col_is_int('table', $table, 'column', $ufield)) { } |
1285
|
0 |
0 |
$update_values{$ufield} ? : |
1299
|
0 |
0 |
unless ($rv) |
1341
|
0 |
0 |
if (not defined $val or $val eq 'NULL') { } |
|
0 |
0 |
elsif ($col eq $row_id_name) { } |
1352
|
0 |
0 |
if ($self->col_is_int('table', $table, 'column', $col)) { } |
1354
|
0 |
0 |
$val ? : |
1368
|
0 |
0 |
unless ($rv) |
1401
|
0 |
0 |
unless ($row_id) |
1410
|
0 |
0 |
unless ($rv) |
1452
|
0 |
0 |
unless (-r $datafile) |
1458
|
0 |
0 |
unless open $fh, $datafile |
1476
|
0 |
0 |
if (/^$row_delim$/) { } |
|
0 |
0 |
elsif (/^(\w+):(.*)/) { } |
1478
|
0 |
0 |
unless ($self->add_one_row('table', $table, 'add_values', \%vals)) |
1491
|
0 |
0 |
if ($legal_cols{$fn}) { } |
1531
|
0 |
0 |
@_ ? : |
1533
|
0 |
0 |
if ($is_error) { } |
1572
|
0 |
1 |
!ref($args{'sort_by'}) ? : |
|
0 |
1 |
!defined($args{'sort_by'}) ? : |
1574
|
0 |
1 |
@{$args{'show'};} ? : |
1582
|
0 |
1 |
if $offset < 0 |
1592
|
1 |
0 |
if (@columns) { } |
1594
|
0 |
1 |
if $args{'distinct'} |
1602
|
0 |
1 |
if (@where) |
1607
|
1 |
0 |
if (@sort_by) |
1614
|
0 |
6 |
if ($col =~ /^-(.*)/) { } |
1626
|
1 |
0 |
if ($limit) |
1631
|
1 |
0 |
if ($offset) |
1636
|
1 |
0 |
defined $args{'total'} ? : |
1643
|
0 |
1 |
unless ($sth1) |
1649
|
0 |
1 |
unless ($rv) |
1660
|
0 |
1 |
if ($total == 1 || $limit == 1 and $table2) |
1664
|
0 |
0 |
unless ($sth_jq) |
1670
|
0 |
0 |
unless ($rv) |
1687
|
0 |
0 |
if ($self->col_is_int('table', $table2, 'column', $join_col)) { } |
1696
|
0 |
0 |
unless ($sth2) |
1702
|
0 |
0 |
unless ($rv) |
1729
|
0 |
0 |
if ($args{'views'}) { } |
1738
|
0 |
0 |
unless ($sth) |
1744
|
0 |
0 |
unless ($rv) |
1774
|
0 |
2 |
$self->get_id_colname($table) eq 'rowid' ? : |
|
2 |
0 |
$args{'do_rowid'} ? : |
1779
|
0 |
2 |
unless ($sth) |
1785
|
0 |
2 |
unless ($rv) |
1829
|
0 |
0 |
if (@where) |
1835
|
0 |
0 |
unless ($sth) |
1841
|
0 |
0 |
unless ($rv) |
1885
|
1 |
0 |
$args{'limit'} ? : |
1897
|
0 |
1 |
$args{'title'} ? : |
1899
|
1 |
0 |
$args{'limit'} ? : |
1902
|
0 |
1 |
if ($title =~ / & /) |
1908
|
0 |
1 |
if $args{'report_style'} ne 'bare' and $args{'report_style'} ne 'compact' |
1911
|
0 |
1 |
if ($args{'limit'} and $args{'report_style'} eq 'full') |
1915
|
0 |
1 |
if (defined $sth2) |
1930
|
0 |
0 |
if ($count2) |
1941
|
0 |
1 |
if $$self{'message'} |
1944
|
0 |
1 |
if ($args{'prev_file'} or $args{'next_file'}) |
1954
|
0 |
0 |
$args{'prev_next_template'} ? : |
1973
|
0 |
1 |
if (not defined $args{'outfile'} or $args{'outfile'} eq '' or $args{'outfile'} eq '-') { } |
1982
|
0 |
1 |
unless open $fh, '>', $args{'outfile'} |
2000
|
0 |
4 |
if (not $template =~ /\n/ and -r $template) |
2005
|
0 |
0 |
unless open $fh, $template |
2025
|
4 |
0 |
if (exists $$self{'row_ids'}{$table} and defined $$self{'row_ids'}{$table}) |
2047
|
0 |
1 |
if (exists $$self{'join_cols'}{$key1} and defined $$self{'join_cols'}{$key1}) { } |
|
0 |
2 |
elsif (exists $$self{'join_cols'}{$key2} and defined $$self{'join_cols'}{$key2}) { } |
2080
|
0 |
0 |
unless ($sth) |
2086
|
0 |
0 |
unless ($rv) |
2094
|
0 |
0 |
if ($$row_hash{'name'} eq $column) |
2096
|
0 |
0 |
if ($$row_hash{'type'} =~ /character/) { } |
|
0 |
0 |
elsif ($$row_hash{'type'} =~ /integer/) { } |
|
0 |
0 |
elsif ($$row_hash{'type'} =~ /smallint/) { } |
2155
|
0 |
1 |
!ref($args{'sort_by'}) ? : |
|
0 |
1 |
!defined($args{'sort_by'}) ? : |
2169
|
1 |
0 |
unless (defined $table_border) |
2171
|
0 |
1 |
if ($report_style eq 'bare') { } |
2180
|
1 |
0 |
unless (defined $table_class) |
2182
|
0 |
1 |
if ($report_style eq 'bare') { } |
2191
|
1 |
0 |
unless (defined $truncate_colnames) |
2193
|
0 |
1 |
if ($report_style eq 'full') { } |
|
0 |
1 |
elsif ($report_style eq 'medium') { } |
|
1 |
0 |
elsif ($report_style eq 'compact') { } |
2220
|
1 |
8 |
if ($columns[$i] eq $row_id_name) |
2229
|
1 |
0 |
if (@sort_by and @headers) |
2237
|
0 |
0 |
if (@groups and exists $groups[$i] and defined $groups[$i]) |
2258
|
2 |
7 |
if ($in_header{$col} and not $force_show_cols{$col}) |
2278
|
1 |
0 |
if (%nice_cols and not $thead) |
2283
|
7 |
2 |
if ($show_cols{$col}) |
2292
|
1 |
0 |
defined $args{'num_pages'} && $args{'num_pages'} > 1 ? : |
2302
|
20 |
0 |
if (@headers) |
2307
|
0 |
40 |
unless $hval |
2310
|
40 |
0 |
unless $gval |
2312
|
5 |
35 |
if ($hval and $hval ne $prev_head{$hi}) |
2315
|
2 |
3 |
if ($count != 0 and not $new_section) |
2321
|
5 |
0 |
if $hval |
2325
|
0 |
5 |
if $gval |
2330
|
3 |
17 |
if ($new_section) |
2335
|
3 |
0 |
if ($report_style ne 'bare' and $args{'layout'} eq 'table') |
2382
|
0 |
1 |
if (not $row_template =~ /\n/ and -r $row_template) |
2385
|
0 |
0 |
unless open $fh, $row_template |
2391
|
1 |
0 |
unless ($row_template) |
2394
|
1 |
0 |
if ($args{'layout'} eq 'table') { } |
|
0 |
0 |
elsif ($args{'layout'} eq 'para') { } |
|
0 |
0 |
elsif ($args{'layout'} eq 'list') { } |
|
0 |
0 |
elsif ($args{'layout'} eq 'fieldval') { } |
|
0 |
0 |
elsif ($args{'layout'} eq '' or $args{'layout'} eq 'none') { } |
2399
|
7 |
2 |
if ($args{'show_cols'}{$col}) |
2402
|
0 |
7 |
if $$self{'default_format'}{$args{'table'}}{$col} |
2415
|
0 |
0 |
if ($args{'show_cols'}{$col}) |
2417
|
0 |
0 |
if ($args{'report_style'} ne 'bare') |
2425
|
0 |
0 |
if $$self{'default_format'}{$args{'table'}}{$col} |
2438
|
0 |
0 |
if ($args{'show_cols'}{$col}) |
2441
|
0 |
0 |
if $$self{'default_format'}{$args{'table'}}{$col} |
2454
|
0 |
0 |
if ($args{'show_cols'}{$col}) |
2457
|
0 |
0 |
if $$self{'default_format'}{$args{'table'}}{$col} |
2470
|
0 |
0 |
if ($args{'show_cols'}{$col}) |
2473
|
0 |
0 |
if $$self{'default_format'}{$args{'table'}}{$col} |
2507
|
9 |
0 |
if ($truncate_colnames) { } |
2553
|
3 |
0 |
if ($args{'type'} eq 'table') { } |
|
0 |
0 |
elsif ($args{'type'} eq 'para') { } |
|
0 |
0 |
elsif ($args{'type'} eq 'list') { } |
2555
|
3 |
0 |
$args{'table_border'} ? : |
|
3 |
0 |
$args{'table_class'} ? : |
2584
|
3 |
0 |
if ($args{'type'} eq 'table') { } |
|
0 |
0 |
elsif ($args{'type'} eq 'para') { } |
|
0 |
0 |
elsif ($args{'type'} eq 'list') { } |
2618
|
0 |
0 |
if (not defined $val or $val eq 'NULL') { } |
|
0 |
0 |
elsif (not $val or $val eq q['']) { } |
2620
|
0 |
0 |
if ($args{'not_where'}{$col}) { } |
2631
|
0 |
0 |
if ($args{'not_where'}{$col}) { } |
2642
|
0 |
0 |
if ($args{'not_where'}{$col}) { } |