line |
true |
false |
branch |
69
|
0 |
0 |
unless my $dbh = 'DBI'->connect("dbi:Oracle:$SID", $username, $password, {'PrintError', 1, 'LongReadLen', 16384, 'RaiseError', 0, 'AutoCommit', 0}) |
124
|
0 |
0 |
if (defined $sth) |
158
|
0 |
0 |
if (length @results == 0) { } |
201
|
0 |
0 |
if ($$sth{'NULLABLE'}[$i] != 1) { } |
255
|
0 |
0 |
unless (defined $dest_metadata{$name}{'TYPE'}) |
261
|
0 |
0 |
if (not defined $src_metadata{$name}{'TYPE'}) { } |
262
|
0 |
0 |
if ($dest_metadata{$name}{'TYPE'} =~ /DATE/) { } |
|
0 |
0 |
elsif ($dest_metadata{$name}{'TYPE'} =~ /CHAR/) { } |
|
0 |
0 |
elsif ($dest_metadata{$name}{'TYPE'} =~ /BIN/ or $dest_metadata{$name}{'TYPE'} =~ /INT/ or $dest_metadata{$name}{'TYPE'} =~ /FLOAT/ or $dest_metadata{$name}{'TYPE'} =~ /NUMERIC/ or $dest_metadata{$name}{'TYPE'} =~ /DECIMAL/ or $dest_metadata{$name}{'TYPE'} =~ /REAL/ or $dest_metadata{$name}{'TYPE'} =~ /DOUBLE/) { } |
283
|
0 |
0 |
if ($dest_metadata{$name}{'TYPE'} =~ /DATE/) { } |
|
0 |
0 |
elsif ($dest_metadata{$name}{'TYPE'} =~ /CHAR/) { } |
|
0 |
0 |
elsif ($dest_metadata{$name}{'TYPE'} =~ /BIN/ or $dest_metadata{$name}{'TYPE'} =~ /INT/ or $dest_metadata{$name}{'TYPE'} =~ /FLOAT/ or $dest_metadata{$name}{'TYPE'} =~ /NUMERIC/ or $dest_metadata{$name}{'TYPE'} =~ /DECIMAL/ or $dest_metadata{$name}{'TYPE'} =~ /REAL/ or $dest_metadata{$name}{'TYPE'} =~ /DOUBLE/) { } |