Branch Coverage

blib/lib/EB/Booking/IV.pm
Criterion Covered Total %
branch 0 134 0.0


line true false branch
37 0 0 unless $self->adm_open
43 0 0 if (defined $bsk_ref and $bsk_ref =~ /^\d+$/)
48 0 0 unless ($dagboek_type == 1 or $dagboek_type == 2)
60 0 0 if (defined $totaal)
62 0 0 unless defined $t
68 0 0 unless ($begin, $end) = $self->begindate
71 0 0 if ($date = parse_date($args->[0], substr($begin, 0, 4))) { }
75 0 0 if ($args->[0] || '') =~ /^[[:digit:]]+-/
81 0 0 unless @$args >= 3
84 0 0 unless $self->in_bky($date, $begin, $end)
86 0 0 if ($does_btw and $main::dbh->adm('btwbegin') and $date lt $main::dbh->adm('btwbegin'))
95 0 0 if ($main::cfg->val(('general', 'ivdesc'), undef)) { }
98 0 0 $iv ? :
103 0 0 unless (defined $rr)
107 0 0 $iv ? :
112 0 0 unless (defined $rr)
113 0 0 $iv ? :
122 0 0 $iv ? :
127 0 0 unless (defined $rr)
130 0 0 $iv ? :
135 0 0 unless (defined $rr)
136 0 0 $iv ? :
154 0 0 unless @$args >= 2
158 0 0 unless $desc =~ /\S/
159 0 0 unless $gdesc =~ /\S/
161 0 0 if ($opts->{'verbose'})
163 0 0 if $t =~ /\s/
166 0 0 unless ($desc =~ /\S/)
171 0 0 unless ($acct =~ /^\d+$/)
172 0 0 if ($acct =~ /^(\d*)([cd])/i)
182 0 0 unless ($rr)
185 0 0 if $main::dbh->in_transaction
189 0 0 if ($balres)
195 0 0 if ($btw_id and not $does_btw)
201 0 0 if ($nr == 1)
203 0 0 unless defined $bsk_nr
205 0 0 if ($bsk_ref and $main::dbh->do('SELECT count(*) FROM Boekstukken, Boekstukregels WHERE bsk_id = bsr_bsk_id AND upper(bsk_ref) = ? AND upper(bsr_rel_code) = ? AND bsk_bky = ?', uc $bsk_ref, uc $debcode, $bky)->[0])
225 0 0 $does_btw ? :
227 0 0 unless (defined $namt)
232 0 0 $iv ? :
234 0 0 if ($does_btw)
236 0 0 unless (defined $btw_id)
249 0 0 if (defined $kstomz) { }
0 0 elsif ($btw_id) { }
251 0 0 $kstomz ? :
0 0 if ($kstomz ? !$iv : $iv)
253 0 0 $kstomz ? :
0 0 $iv ? :
260 0 0 if ($btw_id and $rel_btw == 0 || $rel_btw == 2)
269 0 0 unless (defined $res and defined($tg = $res->[0]))
273 0 0 if (defined $res->[1] and $res->[1] gt $date)
275 0 0 if ($btw_adapt and not $btw_explicit)
276 0 0 $incl ? :
283 0 0 if ($rr and $rr->[0])
292 0 0 unless ($ok)
297 0 0 if (defined $res->[2] and $res->[2] lt $date)
299 0 0 if ($btw_adapt and not $btw_explicit)
300 0 0 $incl ? :
307 0 0 if ($rr and $rr->[0])
316 0 0 unless ($ok)
332 0 0 $does_btw ? :
0 0 defined $kstomz ? :
358 0 0 if $iv
360 0 0 if ($opts->{'journal'})
361 0 0 if $fail
368 0 0 if ($fail) { }
381 0 0 $opts->{'verbose'} || 1 ? :