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 |