blib/lib/DBIx/Class/Schema/Loader/DBI/DB2.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 0 | 22 | 0.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
130 | 0 | 0 | 0 | $self->db_schema and $self->db_schema->[0] ne "%" |
0 | 0 | 0 | $self->db_schema and $self->db_schema->[0] ne "%" and not &any(sub { $_ eq $remote_schema; } , @{$self->db_schema;}) | |
212 | 0 | 0 | 0 | $size[0] == 5 and $size[1] == 0 |
line | l | !l | condition |
---|---|---|---|
148 | 0 | 0 | $rels{$fk}{'attrs'} ||= {"on_delete", $rules{$delete_rule}, "on_update", $rules{$update_rule}, "is_deferrable", 1} |
244 | 0 | 0 | eval { do { lc ${$info->{'default_value'};} } } || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
61 | 0 | 0 | 0 | $self->{'_cache'}{'db2_uniq'} ||= $self->dbh->prepare("SELECT kcu.colname, kcu.constname, kcu.colseq\nFROM syscat.tabconst as tc\nJOIN syscat.keycoluse as kcu\n ON tc.constname = kcu.constname\n AND tc.tabschema = kcu.tabschema\n AND tc.tabname = kcu.tabname\nWHERE tc.tabschema = ? and tc.tabname = ? and tc.type = 'U'\n") |
92 | 0 | 0 | 0 | $self->{'_cache'}{'db2_fk'} ||= $self->dbh->prepare("SELECT tc.constname, sr.reftabschema, sr.reftabname,\n kcu.colname, rkcu.colname, kcu.colseq,\n sr.deleterule, sr.updaterule\nFROM syscat.tabconst tc\nJOIN syscat.keycoluse kcu\n ON tc.constname = kcu.constname\n AND tc.tabschema = kcu.tabschema\n AND tc.tabname = kcu.tabname\nJOIN syscat.references sr\n ON tc.constname = sr.constname\n AND tc.tabschema = sr.tabschema\n AND tc.tabname = sr.tabname\nJOIN syscat.keycoluse rkcu\n ON sr.refkeyname = rkcu.constname\n AND sr.reftabschema = rkcu.tabschema\n AND sr.reftabname = rkcu.tabname\n AND kcu.colseq = rkcu.colseq\nWHERE tc.tabschema = ?\n AND tc.tabname = ?\n AND tc.type = 'F';\n") |
217 | 0 | 0 | 0 | $1 || $2 |