| line |
true |
false |
branch |
|
36
|
0 |
0 |
unless $self->adm_open |
|
47
|
0 |
0 |
if (defined $totaal) |
|
49
|
0 |
0 |
unless defined $t |
|
54
|
0 |
0 |
if (defined $saldo) |
|
56
|
0 |
0 |
unless defined $t |
|
61
|
0 |
0 |
if (defined $beginsaldo) |
|
63
|
0 |
0 |
unless defined $t |
|
68
|
0 |
0 |
if (defined $bsk_att) |
|
69
|
0 |
0 |
unless $self->check_attachment($bsk_att) |
|
75
|
0 |
0 |
unless ($begin, $end) = $self->begindate |
|
78
|
0 |
0 |
if ($date = parse_date($args->[0], substr($begin, 0, 4))) { } |
|
82
|
0 |
0 |
if ($args->[0] || '') =~ /^[[:digit:]]+-/ |
|
88
|
0 |
0 |
unless @$args |
|
91
|
0 |
0 |
unless $self->in_bky($date, $begin, $end) |
|
96
|
0 |
0 |
unless defined $bsk_nr |
|
102
|
0 |
0 |
if (defined $gacct and $gacct != $main::dbh->lookup($gacct, ('Accounts', 'acc_id', 'acc_id'))) |
|
111
|
0 |
0 |
if ($gacct) |
|
113
|
0 |
0 |
if (defined $beginsaldo) { } |
|
|
0 |
0 |
elsif (defined $vsaldo) { } |
|
114
|
0 |
0 |
if defined $vsaldo and $vsaldo != $beginsaldo |
|
117
|
0 |
0 |
if $verbose |
|
122
|
0 |
0 |
if $verbose |
|
127
|
0 |
0 |
if $verbose |
|
146
|
0 |
0 |
if ($type eq 'std') { } |
|
|
0 |
0 |
elsif ($type eq 'deb' or $type eq 'crd') { } |
|
147
|
0 |
0 |
unless @$args >= 3 |
|
150
|
0 |
0 |
if ($dd) { } |
|
152
|
0 |
0 |
unless $self->in_bky($dd, $begin, $end) |
|
153
|
0 |
0 |
if ($does_btw and $main::dbh->adm('btwbegin') and $dd lt $main::dbh->adm('btwbegin')) |
|
159
|
0 |
0 |
if ($args->[0] || '') =~ /^[[:digit:]]+-/ |
|
164
|
0 |
0 |
unless @$args >= 3 |
|
168
|
0 |
0 |
if ($opts->{'verbose'}) |
|
170
|
0 |
0 |
if $t =~ /\s/ |
|
174
|
0 |
0 |
unless ($acct =~ /^\d+$/) |
|
175
|
0 |
0 |
if ($acct =~ /^(\d+)([cd])/i) { } |
|
188
|
0 |
0 |
unless ($rr) |
|
196
|
0 |
0 |
if ($balres and $dagboek_type != 5) |
|
200
|
0 |
0 |
if ($btw_id and not $does_btw) |
|
209
|
0 |
0 |
$does_btw ? : |
|
211
|
0 |
0 |
unless (defined $amt) |
|
216
|
0 |
0 |
if defined $bid and not $bid |
|
219
|
0 |
0 |
if ($btw_id and not defined $bid and $dagboek_type == 5) |
|
226
|
0 |
0 |
if (defined $bid) |
|
229
|
0 |
0 |
unless (defined $btw_id) |
|
235
|
0 |
0 |
if (not defined $kstomz and $btw_id) |
|
241
|
0 |
0 |
if ($btw_id) |
|
249
|
0 |
0 |
unless (defined $res and defined($tg = $res->[0])) |
|
253
|
0 |
0 |
unless $tg |
|
255
|
0 |
0 |
if (defined $res->[1] and $res->[1] gt $dd) |
|
257
|
0 |
0 |
if ($btw_adapt and not $btw_explicit) |
|
258
|
0 |
0 |
$incl ? : |
|
265
|
0 |
0 |
if ($rr and $rr->[0]) |
|
274
|
0 |
0 |
unless ($ok) |
|
279
|
0 |
0 |
if (defined $res->[2] and $res->[2] lt $dd) |
|
281
|
0 |
0 |
if ($btw_adapt and not $btw_explicit) |
|
282
|
0 |
0 |
$incl ? : |
|
289
|
0 |
0 |
if ($rr and $rr->[0]) |
|
298
|
0 |
0 |
unless ($ok) |
|
312
|
0 |
0 |
if ($btw_id) |
|
319
|
0 |
0 |
$does_btw ? : |
|
332
|
0 |
0 |
if ($btw) |
|
343
|
0 |
0 |
$type eq 'deb' ? : |
|
344
|
0 |
0 |
unless @$args >= 2 |
|
347
|
0 |
0 |
if ($dd) { } |
|
349
|
0 |
0 |
unless $self->in_bky($dd, $begin, $end) |
|
350
|
0 |
0 |
if ($does_btw and $main::dbh->adm('btwbegin') and $dd lt $main::dbh->adm('btwbegin')) |
|
356
|
0 |
0 |
if ($args->[0] || '') =~ /^[[:digit:]]+-/ |
|
361
|
0 |
0 |
unless @$args >= 2 |
|
365
|
0 |
0 |
if $verbose |
|
370
|
0 |
0 |
unless (defined $amt) |
|
377
|
0 |
0 |
if ($rel =~ /:/) { } |
|
380
|
0 |
0 |
unless (defined $id) |
|
392
|
0 |
0 |
$debcrd ? : |
|
394
|
0 |
0 |
unless (defined $rr) |
|
404
|
0 |
0 |
$debcrd ? : |
|
408
|
0 |
0 |
unless (defined $rr) |
|
409
|
0 |
0 |
$type eq 'deb' ? : |
|
422
|
0 |
0 |
if $delta |
|
423
|
0 |
0 |
$delta ? : |
|
433
|
0 |
0 |
$debcrd ? : |
|
|
0 |
0 |
$delta ? : |
|
440
|
0 |
0 |
if ($rr->[0] == $amt) { } |
|
452
|
0 |
0 |
if (@$res == 0) { } |
|
|
0 |
0 |
elsif (@$res == 1 and $res->[0][0] == $amt) { } |
|
|
0 |
0 |
elsif (@$res <= $main::cfg->val(('strategy', 'bkm_multi_max'), 15)) { } |
|
464
|
0 |
0 |
if (my(@k) = partition($amt, \@amts)) { } |
|
466
|
0 |
0 |
if ($main::cfg->val(('strategy', 'bkm_multi'), 0)) { } |
|
491
|
0 |
0 |
if $wmsg |
|
517
|
0 |
0 |
unless (defined $rr) |
|
521
|
0 |
0 |
if ($wmsg) { } |
|
|
0 |
0 |
elsif (@$res) { } |
|
585
|
0 |
0 |
$type eq 'deb' ? : |
|
608
|
0 |
0 |
if ($gacct) { } |
|
|
0 |
0 |
elsif ($tot) { } |
|
609
|
0 |
0 |
if $trace_updates |
|
613
|
0 |
0 |
if $verbose |
|
619
|
0 |
0 |
if (defined $saldo) |
|
620
|
0 |
0 |
unless ($saldo == $new) |
|
626
|
0 |
0 |
if (defined $totaal and $tot != $totaal) |
|
632
|
0 |
0 |
if (defined $isaldo and $isaldo != $new) |
|
648
|
0 |
0 |
if ($opts->{'journal'}) |
|
649
|
0 |
0 |
if $fail |
|
656
|
0 |
0 |
if ($fail) |
|
664
|
0 |
0 |
if $bsk_att |
|
668
|
0 |
0 |
$verbose || 1 ? : |
|
681
|
0 |
0 |
if ($rr and defined $rr->[0]) |
|
692
|
0 |
0 |
if $target == 0 |
|
694
|
0 |
0 |
unless defined $ix |
|
695
|
0 |
0 |
if @$ix == 0 |