| line |
!l |
l&&!r |
l&&r |
condition |
|
61
|
0 |
0 |
0 |
!$args->{'Server'} && $args->{'Database'} |
|
83
|
0 |
0 |
0 |
@_ and ref $_[-1] |
|
173
|
0 |
0 |
0 |
$args{'IsIQ'} and not $args{'NoBlankNull'} |
|
248
|
0 |
0 |
0 |
$dbi_opts and ref $dbi_opts |
|
278
|
0 |
0 |
0 |
$args and ref $args |
|
498
|
0 |
0 |
0 |
not $done++ and $opts->{'Header'} |
|
503
|
0 |
0 |
0 |
/\s/ and $_ = qq["$_"] |
|
814
|
0 |
0 |
0 |
$href and $aref |
|
815
|
0 |
0 |
0 |
$href || $aref and not $by_name |
|
818
|
0 |
0 |
0 |
$table and $sql |
|
826
|
0 |
0 |
0 |
$columns and @$columns |
|
1080
|
0 |
0 |
0 |
$opts{'ColumnList'} and $opts{'ColumnList'} |
|
|
0 |
0 |
0 |
$opts{'Filler'} and @{$opts{'Filler'};} |
|
1207
|
0 |
0 |
0 |
$failed and not $partially_failed |
|
1283
|
0 |
0 |
0 |
$opts{'ColumnList'} && @{$opts{'ColumnList'};} |
|
1348
|
0 |
0 |
0 |
not $self->is_iq and $curr_db |
|
1356
|
0 |
0 |
0 |
not $self->is_iq and $curr_db |
|
1358
|
0 |
0 |
0 |
@opts and $opts[0]{'NoFix'} |
|
1367
|
0 |
0 |
0 |
@opts and $opts[0]{'Header'} || $opts[0]{'QuoteFields'} |
|
1396
|
0 |
0 |
0 |
@opts && $opts[0]{'Columns'} |
|
1423
|
0 |
0 |
0 |
$money_cnt == 0 and not $opts[0]{'Filter'} |
|
|
0 |
0 |
0 |
$money_cnt == 0 and not $opts[0]{'Filter'} and not $opts[0]{'Columns'} |
|
1428
|
0 |
0 |
0 |
not $curr_db and $table =~ /^(\w+)\.\w*\.\w+$/ |
|
1457
|
0 |
0 |
0 |
@opts and $opts[0]{'Filter'} |
|
1493
|
0 |
0 |
0 |
$9 eq 'P' && $5 < 12 |
|
|
0 |
0 |
0 |
$9 eq 'A' && $5 == 12 |
|
1505
|
0 |
0 |
0 |
$7 eq 'P' && $5 < 12 |
|
|
0 |
0 |
0 |
$7 eq 'A' && $5 == 12 |
|
1573
|
0 |
0 |
0 |
defined $tmp_db and $tmp_db ne $curr_db |
|
1592
|
0 |
0 |
0 |
defined $tmp_db and $tmp_db ne $curr_db |
|
1613
|
0 |
0 |
0 |
defined $tmp_db and $tmp_db ne $curr_db |
|
1618
|
0 |
0 |
0 |
defined $tmp_db and $tmp_db ne $curr_db |
|
1654
|
0 |
0 |
0 |
$args{'KeyCols'} && @{$args{'KeyCols'};} |
|
1655
|
0 |
0 |
0 |
$args{'UpdCols'} && @{$args{'UpdCols'};} |
|
1685
|
0 |
0 |
0 |
$_ eq 'last_chg_user' && !$stg_has{'last_chg_user'} |
|
|
0 |
0 |
0 |
$_ eq 'last_chg_date' && !$stg_has{'last_chg_date'} |
|
1757
|
0 |
0 |
0 |
$args{'KeyCols'} && @{$args{'KeyCols'};} |
|
1758
|
0 |
0 |
0 |
$args{'UpdCols'} && @{$args{'UpdCols'};} |
|
1788
|
0 |
0 |
0 |
$_ eq 'last_chg_user' && !$stg_has{'last_chg_user'} |
|
|
0 |
0 |
0 |
$_ eq 'last_chg_date' && !$stg_has{'last_chg_date'} |
|
2036
|
0 |
0 |
0 |
$opts->{'ColumnList'} && @{$opts->{'ColumnList'};} |
|
2120
|
0 |
0 |
0 |
not $all_indexes and $row{'unique_index'} ne 'Y' |
|
2243
|
0 |
0 |
0 |
$has_stdin and not $stdin |
|
|
0 |
0 |
0 |
$stdin and not $has_stdin |
|
2335
|
0 |
0 |
0 |
$opts->{'ColumnList'} && @{$opts->{'ColumnList'};} |
|
2412
|
0 |
0 |
0 |
$opts->{'ColumnList'} && @{$opts->{'ColumnList'};} |
|
2601
|
0 |
0 |
0 |
$is_date and %$is_date |
|
2619
|
0 |
0 |
0 |
$opts->{'Header'} and $. <= $opts->{'Header'} |
|
2895
|
0 |
0 |
0 |
$args{'KeyCols'} && @{$args{'KeyCols'};} |
|
2896
|
0 |
0 |
0 |
$args{'UpdCols'} && @{$args{'UpdCols'};} |
| line |
l |
!l |
condition |
|
97
|
0 |
0 |
$args{'ConnectMethod'} || 'connect' |
|
107
|
0 |
0 |
$args{'Server'} || '' |
|
136
|
0 |
0 |
$args{'RetryCount'} || 0 |
|
138
|
0 |
0 |
$args{'RetryMinutes'} || 10 |
|
171
|
0 |
0 |
$args{'DateFormat'} || 'ISO' |
|
176
|
0 |
0 |
$args{'DateFormat'} || 'YYYY-MM-DD HH24:MI:SS' |
|
177
|
0 |
0 |
$args{'DatetimeFormat'} || 'YYYY-MM-DD HH24:MI:SS.FF' |
|
339
|
0 |
0 |
$opts->{'Encoding'} || '' |
|
344
|
0 |
0 |
$ENV{'NLS_LANG'} || '' |
|
346
|
0 |
0 |
$enc_opt ||= 'utf8' |
|
413
|
0 |
0 |
$opts->{'EscapeChar'} || '\\' |
|
448
|
0 |
0 |
$opts ||= {} |
|
471
|
0 |
0 |
$opts->{'RowDelimiter'} || "\n" |
|
495
|
0 |
0 |
$opts->{'RowDelimiter'} || "\n" |
|
711
|
0 |
0 |
$args{'BlkOpts'} || {} |
|
712
|
0 |
0 |
$args{'CommitSize'} || 1000 |
|
863
|
0 |
0 |
$args{'Table'} || die('Must supply Table option') |
|
990
|
0 |
0 |
$dir ||= 'in' |
|
1000
|
0 |
0 |
$opts{'RowDelimiter'} || "\n" |
|
1001
|
0 |
0 |
$opts{'CommitSize'} || 1000 |
|
1014
|
0 |
0 |
$opts{'Action'} || 'A' |
|
1052
|
0 |
0 |
$opts{'MaxErrors'} || 0 |
|
1063
|
0 |
0 |
$opts{'TempDir'} || '.' |
|
1226
|
0 |
0 |
$rows ||= 0 |
|
1239
|
0 |
0 |
$opts{'Table'} || die('Table required for mk_fmt_file') |
|
1258
|
0 |
0 |
$opts{'TempDir'} || '.' |
|
1271
|
0 |
0 |
$opts{'Delimiter'} || '|' |
|
1272
|
0 |
0 |
$opts{'RowDelimiter'} || "\n" |
|
1331
|
0 |
0 |
$opts[0]{'TempDb'} || 'scratchdb' |
|
1384
|
0 |
0 |
$opts[0]{'TempDb'} || 'scratchdb' |
|
1483
|
0 |
0 |
$opts->{'Delimiter'} || $self->{'DELIMITER'} || '|' |
|
1610
|
0 |
0 |
$schema ||= undef |
|
1925
|
0 |
0 |
$who->{'tempdbname'} || 'tempdb' |
|
1938
|
0 |
0 |
$limit || 1000 |
|
2003
|
0 |
0 |
$opts->{'RowDelimiter'} || "\n" |
|
2006
|
0 |
0 |
$opts->{'Action'} || 'A' |
|
2046
|
0 |
0 |
$opts->{'Default'} || [] |
|
2049
|
0 |
0 |
$opts->{'Constants'} || {} |
|
2223
|
0 |
0 |
$opts->{'Action'} || 'A' |
|
2268
|
0 |
0 |
$opts->{'Constants'} || {} |
|
2271
|
0 |
0 |
$opts->{'CharSizes'} || {} |
|
2277
|
0 |
0 |
$opts->{'TempDir'} || '.' |
|
2343
|
0 |
0 |
$action_map{$action_opt} || 'APPEND' |
|
2348
|
0 |
0 |
$opts->{'MaxErrors'} || 0 |
|
2357
|
0 |
0 |
$opts->{'CommitSize'} || 2000 |
|
2400
|
0 |
0 |
$opts->{'FieldRef'} || {} |
|
2522
|
0 |
0 |
$opts->{'RowDelimiter'} || "\n" |
|
2572
|
0 |
0 |
$error_msg ||= '' |
|
2603
|
0 |
0 |
$opts ||= {} |
|
2605
|
0 |
0 |
$opts->{'DateSampleRows'} || 1000 |
|
2608
|
0 |
0 |
$opts->{'Year2Mask'} || 'YY' |
|
2672
|
0 |
0 |
$year2mask ||= 'YY' |
|
3017
|
0 |
0 |
$args{'Delimiter'} || '|' |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
61
|
0 |
0 |
0 |
$args->{'Type'} ||= !$args->{'Server'} && $args->{'Database'} ? 'Oracle' : 'Sybase' |
|
132
|
0 |
0 |
0 |
$args{'User'} || $class->user(\%args) |
|
133
|
0 |
0 |
0 |
$args{'Password'} || $class->passwd(\%args) |
|
178
|
0 |
0 |
0 |
$args{'DatetimeTzFormat'} || $args{'DatetimeFormat'} || $datetime_fmt |
|
312
|
0 |
0 |
0 |
$file ||= "$table.bcp" |
|
314
|
0 |
0 |
0 |
$opts->{'Delimiter'} || $self->{'DELIMITER'} |
|
315
|
0 |
0 |
0 |
$opts->{'RowDelimiter'} || $/ |
|
412
|
0 |
0 |
0 |
$opts->{'Delimiter'} || $self->{'DELIMITER'} |
|
451
|
0 |
0 |
0 |
$opts->{'Header'} or $opts->{'Columns'} |
|
470
|
0 |
0 |
0 |
$opts->{'Delimiter'} || $self->{'DELIMITER'} |
|
490
|
0 |
0 |
0 |
$opts->{'Delimiter'} || $self->{'DELIMITER'} |
|
635
|
0 |
0 |
0 |
$key_cols ||= $self->key_columns($table) |
|
684
|
0 |
0 |
0 |
$fmt ||= 'DBIx::BulkUtil::Oracle'->date_mask($str) |
|
811
|
0 |
0 |
0 |
$href || $aref |
|
815
|
0 |
0 |
0 |
$href || $aref |
|
817
|
0 |
0 |
0 |
$table or $sql |
|
821
|
0 |
0 |
0 |
$columns ||= $self->column_info($table)->{'LIST'} |
|
839
|
0 |
0 |
0 |
$sql ||= sprintf("INSERT INTO $table ($c_sep%s$c_sep) VALUES ($v_sep%s$v_sep)", join(",$c_sep", map((&$c_ind() . $_), @$columns)), join(",$v_sep", map(&$hold(), @$columns))) |
|
866
|
0 |
0 |
0 |
$args{'Columns'} || $col_info->{'LIST'} |
|
868
|
0 |
0 |
0 |
$args{'KeyCols'} || $self->key_columns($table) |
|
869
|
0 |
0 |
0 |
$args{'UpdCols'} || $self->upd_columns($table) |
|
989
|
0 |
0 |
0 |
$file ||= "$table.bcp" |
|
999
|
0 |
0 |
0 |
$opts{'Delimiter'} || $self->{'DELIMITER'} |
|
1003
|
0 |
0 |
0 |
!$database || $table =~ /^\w+\.\w*\.\w+$/ |
|
1060
|
0 |
0 |
0 |
$opts{'KeepTempFiles'} || $opts{'Debug'} |
|
1061
|
0 |
0 |
0 |
$opts{'TempDir'} || $opts{'Debug'} |
|
1080
|
0 |
0 |
0 |
$opts{'ColumnList'} and $opts{'ColumnList'} or $opts{'Filler'} and @{$opts{'Filler'};} |
|
1202
|
0 |
0 |
0 |
defined $rows or $failed |
|
1254
|
0 |
0 |
0 |
$opts{'KeepTempFiles'} || $opts{'Debug'} |
|
1255
|
0 |
0 |
0 |
$opts{'TempDir'} || $opts{'Debug'} |
|
1260
|
0 |
0 |
0 |
$keep_temp || !defined(wantarray) |
|
1329
|
0 |
0 |
0 |
$file ||= "$table.bcp" |
|
1341
|
0 |
0 |
0 |
$view || $table |
|
1367
|
0 |
0 |
0 |
$opts[0]{'Header'} || $opts[0]{'QuoteFields'} |
|
1433
|
0 |
0 |
0 |
!$curr_db || $table =~ /^\w+\.\w*\.\w+$/ |
|
1487
|
0 |
0 |
0 |
$opts->{'RowDelimiter'} || $/ |
|
1534
|
0 |
0 |
0 |
$type_map{$type} || confess("Don't know about type $type for object $name") |
|
1685
|
0 |
0 |
0 |
$is_key_col{$_} || $is_upd_col{$_} |
|
1689
|
0 |
0 |
0 |
$col_map{$_} || $_ |
|
1711
|
0 |
0 |
0 |
$args{'NoBCP'} || $stg_table =~ /^#/ |
|
1788
|
0 |
0 |
0 |
$is_key_col{$_} || $is_upd_col{$_} |
|
1792
|
0 |
0 |
0 |
$col_map{$_} || $_ |
|
1793
|
0 |
0 |
0 |
$col_map{$_} || $_ |
|
1854
|
0 |
0 |
0 |
!$database || $table =~ /^\w+\.\w*\.\w+$/ |
|
2002
|
0 |
0 |
0 |
$opts->{'Delimiter'} || $self->{'DELIMITER'} |
|
2051
|
0 |
0 |
0 |
defined $constant->{$_} || $dflt{$_} |
|
2232
|
0 |
0 |
0 |
@files or $stdin |
|
2274
|
0 |
0 |
0 |
$opts->{'KeepTempFiles'} || $opts->{'Debug'} |
|
2275
|
0 |
0 |
0 |
$opts->{'TempDir'} || $opts->{'Debug'} |
|
2342
|
0 |
0 |
0 |
$opts->{'Delimiter'} || $self->{'DELIMITER'} |
|
2366
|
0 |
0 |
0 |
$date_fmt{$_} ||= $default_date_fmt |
|
2388
|
0 |
0 |
0 |
$opts->{'PreserveBlanks'} or $size == 1 |
|
2487
|
0 |
0 |
0 |
$opts->{'Debug'} or $opts->{'NoExec'} |
|
2571
|
0 |
0 |
0 |
not $close_success or $dp_errors |
|
2573
|
0 |
0 |
0 |
$exit_stat != 0 or $dp_errors |
|
2574
|
0 |
0 |
0 |
$exit_stat == 2 or $dp_errors |
|
2606
|
0 |
0 |
0 |
$opts->{'Delimiter'} || $self->{'DELIMITER'} |
|
2812
|
0 |
0 |
0 |
$type_map{$type} || confess("Don't know about type $type for object $name") |
|
2933
|
0 |
0 |
0 |
$col_map{$_} || $_ |
|
2980
|
0 |
0 |
0 |
$args{'Name'} || "ext_$table$$" |