| line |
true |
false |
branch |
|
118
|
0 |
2 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
122
|
2 |
0 |
if $ts eq 'PARSE_TEST' |
|
124
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
127
|
0 |
0 |
unless $status->ok |
|
138
|
0 |
9 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
142
|
9 |
0 |
if $ts eq 'PARSE_TEST' |
|
144
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
147
|
0 |
0 |
unless $status->ok |
|
160
|
0 |
4 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
164
|
4 |
0 |
if $ts eq 'PARSE_TEST' |
|
166
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
170
|
0 |
0 |
unless $status->ok |
|
172
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
198
|
0 |
6 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
202
|
6 |
0 |
if $ts eq 'PARSE_TEST' |
|
204
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
208
|
0 |
0 |
unless $status->ok |
|
213
|
0 |
0 |
unless $date |
|
248
|
0 |
12 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
252
|
12 |
0 |
if $ts eq 'PARSE_TEST' |
|
254
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
258
|
0 |
0 |
unless $status->ok |
|
263
|
0 |
0 |
unless $date |
|
265
|
0 |
0 |
unless $date1 |
|
290
|
0 |
12 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
294
|
12 |
0 |
if $ts eq 'PARSE_TEST' |
|
296
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
300
|
0 |
0 |
unless $status->ok |
|
310
|
0 |
0 |
unless $date |
|
313
|
0 |
0 |
unless $date1 |
|
338
|
0 |
12 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
342
|
12 |
0 |
if $ts eq 'PARSE_TEST' |
|
344
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
348
|
0 |
0 |
unless $status->ok |
|
354
|
0 |
0 |
if ($th->{'_NUM'} >= 0 and $th->{'_NUM'} <= 12) { } |
|
363
|
0 |
0 |
unless $date |
|
366
|
0 |
0 |
unless $date1 |
|
385
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
389
|
0 |
0 |
if $ts eq 'PARSE_TEST' |
|
391
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
395
|
0 |
0 |
unless $status->ok |
|
406
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
410
|
0 |
0 |
if $ts eq 'PARSE_TEST' |
|
412
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
416
|
0 |
0 |
unless $status->ok |
|
421
|
0 |
0 |
exists $th->{'DRY_RUN'} ? : |
|
426
|
0 |
0 |
unless $th->{'_REST'} =~ /$regex/u |
|
459
|
0 |
6 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
463
|
6 |
0 |
if $ts eq 'PARSE_TEST' |
|
465
|
0 |
0 |
if $App::Dochazka::CLI::Commands::Interval::debug_mode |
|
469
|
0 |
0 |
unless $status->ok |
|
478
|
0 |
0 |
if ($th->{'FILLUP'}) { } |
|
|
0 |
0 |
elsif ($th->{'DELETE'}) { } |
|
|
0 |
0 |
elsif ($th->{'SUMMARY'}) { } |
|
|
0 |
0 |
elsif ($th->{'REPORT'}) { } |
|
482
|
0 |
0 |
exists $th->{'DRY_RUN'} ? : |
|
519
|
0 |
0 |
if ($status->not_ok) |
|
520
|
0 |
0 |
if ($status->code eq 'DISPATCH_SEARCH_EMPTY' and $status->text =~ /Search over activity with key -\>code equals .+\<- returned nothing/u) |
|
525
|
0 |
0 |
unless $status->ok |
|
534
|
0 |
0 |
if $long_desc |
|
539
|
0 |
0 |
if ($status->not_ok) |
|
542
|
0 |
0 |
unless $status->ok |
|
567
|
0 |
0 |
if ($s = normalize_date($d0)) { } |
|
574
|
0 |
0 |
unless defined $d1 and length $d1 > 0 |
|
576
|
0 |
0 |
if ($s = normalize_date($d1)) { } |
|
582
|
0 |
0 |
if ($s = normalize_time($t0)) { } |
|
588
|
0 |
0 |
if ($s = normalize_time($t1)) { } |
|
594
|
0 |
0 |
unless $flagged |
|
595
|
0 |
0 |
unless defined $flagged |
|
614
|
0 |
0 |
unless $status->ok |
|
624
|
0 |
0 |
if defined $int->{'long_desc'} |
|
642
|
0 |
0 |
if ($status->not_ok and $status->code eq 'DISPATCH_NOTHING_IN_TSRANGE') |
|
645
|
0 |
0 |
unless $status->ok |
|
657
|
0 |
0 |
if ($int->partial) { } |
|
671
|
0 |
0 |
if $partial_intervals_present |
|
699
|
0 |
0 |
unless $status->ok |
|
715
|
0 |
0 |
unless $status->ok |
|
767
|
0 |
0 |
unless $status->ok |
|
770
|
0 |
0 |
if ($status->code eq 'DISPATCH_FILLUP_INTERVALS_CREATED') |
|
775
|
0 |
0 |
if (exists $status->payload->{'clobbered'}) |