| line |
true |
false |
branch |
|
117
|
0 |
2 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
121
|
2 |
0 |
if $ts eq 'PARSE_TEST' |
|
123
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
126
|
0 |
0 |
unless $status->ok |
|
137
|
0 |
9 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
141
|
9 |
0 |
if $ts eq 'PARSE_TEST' |
|
143
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
146
|
0 |
0 |
unless $status->ok |
|
159
|
0 |
4 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
163
|
4 |
0 |
if $ts eq 'PARSE_TEST' |
|
165
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
169
|
0 |
0 |
unless $status->ok |
|
171
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
197
|
0 |
6 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
201
|
6 |
0 |
if $ts eq 'PARSE_TEST' |
|
203
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
207
|
0 |
0 |
unless $status->ok |
|
212
|
0 |
0 |
unless $date |
|
247
|
0 |
12 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
251
|
12 |
0 |
if $ts eq 'PARSE_TEST' |
|
253
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
257
|
0 |
0 |
unless $status->ok |
|
262
|
0 |
0 |
unless $date |
|
264
|
0 |
0 |
unless $date1 |
|
289
|
0 |
12 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
293
|
12 |
0 |
if $ts eq 'PARSE_TEST' |
|
295
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
299
|
0 |
0 |
unless $status->ok |
|
309
|
0 |
0 |
unless $date |
|
312
|
0 |
0 |
unless $date1 |
|
337
|
0 |
12 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
341
|
12 |
0 |
if $ts eq 'PARSE_TEST' |
|
343
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
347
|
0 |
0 |
unless $status->ok |
|
353
|
0 |
0 |
if ($th->{'_NUM'} >= 0 and $th->{'_NUM'} <= 12) { } |
|
362
|
0 |
0 |
unless $date |
|
365
|
0 |
0 |
unless $date1 |
|
384
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
388
|
0 |
0 |
if $ts eq 'PARSE_TEST' |
|
390
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
394
|
0 |
0 |
unless $status->ok |
|
405
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
409
|
0 |
0 |
if $ts eq 'PARSE_TEST' |
|
411
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
415
|
0 |
0 |
unless $status->ok |
|
420
|
0 |
0 |
exists $th->{'DRY_RUN'} ? : |
|
425
|
0 |
0 |
unless $th->{'_REST'} =~ /$regex/u |
|
458
|
0 |
6 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
462
|
6 |
0 |
if $ts eq 'PARSE_TEST' |
|
464
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
468
|
0 |
0 |
unless $status->ok |
|
477
|
0 |
0 |
if ($th->{'FILLUP'}) { } |
|
|
0 |
0 |
elsif ($th->{'DELETE'}) { } |
|
|
0 |
0 |
elsif ($th->{'SUMMARY'}) { } |
|
|
0 |
0 |
elsif ($th->{'REPORT'}) { } |
|
481
|
0 |
0 |
exists $th->{'DRY_RUN'} ? : |
|
518
|
0 |
0 |
if ($status->not_ok) |
|
519
|
0 |
0 |
if ($status->code eq 'DISPATCH_SEARCH_EMPTY' and $status->text =~ /Search over activity with key -\>code equals .+\<- returned nothing/u) |
|
524
|
0 |
0 |
unless $status->ok |
|
533
|
0 |
0 |
if $long_desc |
|
538
|
0 |
0 |
if ($status->not_ok) |
|
541
|
0 |
0 |
unless $status->ok |
|
566
|
0 |
0 |
if ($s = normalize_date($d0)) { } |
|
573
|
0 |
0 |
unless defined $d1 and length $d1 > 0 |
|
575
|
0 |
0 |
if ($s = normalize_date($d1)) { } |
|
581
|
0 |
0 |
if ($s = normalize_time($t0)) { } |
|
587
|
0 |
0 |
if ($s = normalize_time($t1)) { } |
|
593
|
0 |
0 |
unless $flagged |
|
594
|
0 |
0 |
unless defined $flagged |
|
613
|
0 |
0 |
unless $status->ok |
|
623
|
0 |
0 |
if defined $int->{'long_desc'} |
|
641
|
0 |
0 |
if ($status->not_ok and $status->code eq 'DISPATCH_NOTHING_IN_TSRANGE') |
|
644
|
0 |
0 |
unless $status->ok |
|
656
|
0 |
0 |
if ($int->partial) { } |
|
670
|
0 |
0 |
if $partial_intervals_present |
|
698
|
0 |
0 |
unless $status->ok |
|
714
|
0 |
0 |
unless $status->ok |
|
766
|
0 |
0 |
unless $status->ok |
|
769
|
0 |
0 |
if ($status->code eq 'DISPATCH_FILLUP_INTERVALS_CREATED') |
|
774
|
0 |
0 |
if (exists $status->payload->{'clobbered'}) |