Branch Coverage

blib/lib/VSGDR/StaticData.pm
Criterion Covered Total %
branch 0 166 0.0


line true false branch
67 0 0 if (scalar @{$res;})
109 0 0 unless defined $dbh
110 0 0 unless defined $schema
111 0 0 unless defined $table
113 0 0 if $schema =~ /\A \[ .+ \] \Z /imsx
114 0 0 if $table =~ /\A \[ .+ \] \Z /imsx
125 0 0 $VSGDR::StaticData::OSNAME eq 'MSWin32' ? :
132 0 0 if ($hasId)
138 0 0 if $hasId
139 0 0 if $hasId
146 0 0 unless scalar @{$ra_columns;}
154 0 0 $_->[1] =~ /uniqueidentifier|char|text|date/i ? :
183 0 0 if (not scalar @{$ra_pkcolumns;}) { }
0 0 elsif (scalar @{$ra_pkcolumns;} != 1) { }
225 0 0 unless grep {$_->[0] eq $col->[0];} @{$ra_pkcolumns;}
285 0 0 $l->[1] =~ /\A(?:date|datetime[2]?|smalldatetime)\z/i ? :
289 0 0 !($l->[1] =~ / (?: char ) /imsx) ? :
298 0 0 if (not $hasId or $l->[0] ne $idCol) { }
0 0 elsif ($hasId) { }
348 0 0 if ($IsColumnNumeric[$i] == 1 and not defined $ra_row->[$i])
351 0 0 if ($IsColumnNumeric[$i] == 0 and not defined $ra_row->[$i])
354 0 0 if ($IsColumnNumeric[$i] == 1 and defined $ra_row->[$i])
357 0 0 if ($IsColumnNumeric[$i] == 0 and defined $ra_row->[$i])
358 0 0 if (do { $ra_columns }->[$i][1] =~ /\A(?:date|datetime[2]?|smalldatetime)\z/i) { }
376 0 0 if (scalar @valuesTable)
385 0 0 if (length $tmp[$i] > $maxWidth[$i])
413 0 0 if ($pk_column)
424 0 0 if (scalar @{$ra_data;} > $LargeDataSetThreshhold)
432 0 0 if (scalar @nonKeyColumns)
467 0 0 if (scalar @{$ra_data;} > $LargeDataSetThreshhold)
630 0 0 unless defined $dbh
631 0 0 unless defined $schema
632 0 0 unless defined $table
633 0 0 unless defined $sql
634 0 0 unless defined $use_MinimalForm
635 0 0 unless defined $use_IgnoreNulls
637 0 0 if $schema =~ /\A \[ .+ \] \Z /imsx
638 0 0 if $table =~ /\A \[ .+ \] \Z /imsx
649 0 0 if ($hasId)
655 0 0 if $hasId
656 0 0 if $hasId
661 0 0 unless scalar @{$ra_columns;}
664 0 0 $_->[1] =~ /uniqueidentifier|char|text|date/i ? :
688 0 0 $l->[1] =~ /\A(?:date|datetime[2]?|smalldatetime)\z/i ? :
709 0 0 if ($use_IgnoreNulls) { }
713 0 0 if (defined $ra_row->[$i])
728 0 0 if ($useColumnValues[$i])
729 0 0 if (not scalar $colList) { }
749 0 0 if ($useColumnValues[$i])
750 0 0 if (not defined $ra_row->[$i]) { }
754 0 0 if (do { $ra_metadata }->[$i][1] =~ /\A(?:date|datetime[2]?|smalldatetime)\z/i) { }
0 0 elsif (do { $ra_metadata }->[$i][1] =~ /(?:uniqueidentifier|char|text|date)/i) { }
774 0 0 if (scalar @valuesTable)
783 0 0 if ($useColumnValues[$i])
784 0 0 if (length $tmp[$i] > $maxWidth[$i])
798 0 0 if ($useColumnValues[$j])
813 0 0 if (not $use_MinimalForm) { }
847 0 0 unless my $dbh = shift()
848 0 0 unless my $sql = shift()
849 0 0 unless my $ra_validColumns = shift()
862 0 0 if (&any(sub { $_->[0] eq $col->[2]; } , @$ra_validColumns))
877 0 0 unless my $dbh = shift()
878 0 0 unless my $combinedName = shift()
879 0 0 unless my $cols = shift()
880 0 0 unless my $sql = shift()
897 0 0 unless my $dbh = shift()
898 0 0 unless my $combinedName = shift()
916 0 0 unless my $combinedName = shift()
922 0 0 if (not $pkCol) { }
943 0 0 unless my $dbh = shift()
944 0 0 unless my $schema = shift()
945 0 0 unless my $table = shift()
975 0 0 unless my $dbh = shift()
976 0 0 unless my $schema = shift()
977 0 0 unless my $table = shift()
1010 0 0 unless my $dbh = shift()
1011 0 0 unless my $qtd_schema = shift()
1012 0 0 unless my $qtd_table = shift()
1024 0 0 if (scalar @{$res;})
1068 0 0 unless my $dbh = shift()
1069 0 0 unless my $schema = shift()
1070 0 0 unless my $table = shift()
1076 0 0 if (scalar @{$res;})