Branch Coverage

blib/lib/Business/Edifact/Message.pm
Criterion Covered Total %
branch 88 112 78.5


line true false branch
102 1340 0 if ($handler)
130 2 2 if ($f == 9) { }
0 2 elsif ($f == 7) { }
2 0 elsif ($f == 43) { }
0 0 elsif ($f == 46) { }
164 0 0 if (exists $$self{'currency'})
218 2 14 if (length $date == 6)
221 12 4 if ($$self{'segment_group'} == 0) { }
0 4 elsif ($$self{'segment_group'} == 27) { }
2 2 elsif ($$self{'segment_group'} == 11) { }
223 8 4 if ($qualifier == 137) { }
0 4 elsif ($qualifier == 36) { }
3 1 elsif ($qualifier == 131) { }
248 2 2 if ($$data_arr[0][0] == 1) { }
2 0 elsif ($$data_arr[0][0] == 3) { }
270 5 145 if ($ref_qualifier eq 'VA') { }
2 143 elsif ($ref_qualifier eq 'API') { }
1 142 elsif ($ref_qualifier eq 'FC') { }
44 98 elsif ($ref_qualifier eq 'IA') { }
0 98 elsif ($ref_qualifier eq 'TL') { }
285 3 147 if ($$self{'segment_group'} == 0) { }
8 139 elsif ($$self{'segment_group'} == 11) { }
124 15 elsif ($$self{'segment_group'} == 27) { }
13 2 elsif ($$self{'segment_group'} == 25) { }
303 9 4 if ($ref_qualifier eq 'LI') { }
305 0 9 if ($$data_arr[0][2])
329 0 6 if ($$self{'segment_group'} == 1) { }
4 2 elsif ($$self{'segment_group'} == 11) { }
358 11 80 if ($$self{'type'} eq 'INVOIC') { }
373 1 90 if ($$data_arr[3][0])
389 7 44 if ($$self{'segment_group'} == 25)
392 6 1 if ($$data_arr[0][0] eq '5')
402 6 0 if (exists $id_type{$t})
420 540 3 if ($$data_arr[0][0] eq 'L')
421 21 519 if ($$data_arr[2][4])
441 19 80 if ($self->type eq 'INVOIC') { }
443 13 6 if ($code == 47)
444 13 0 if ($$self{'segment_group'} == 25) { }
453 80 0 if (not $$self{'item_locqty_flag'}) { }
487 35 31 if ($$self{'segment_group'} == 27 or $$self{'segment_group'} == 25) { }
488 10 25 if ($$data_arr[0][0] == 203) { }
4 21 elsif ($$data_arr[0][0] == 128) { }
7 14 elsif ($$data_arr[0][0] == 52) { }
0 14 elsif ($$data_arr[0][0] == 146) { }
8 6 elsif ($$self{'item_alc_flag'}) { }
518 30 1 if (not $$self{'item_alc_flag'}) { }
552 18 7 if ($$self{'segment_group'} == 27 or $$self{'segment_group'} == 25) { }
553 11 7 if (not $$self{'item_alc_flag'}) { }
575 16 1 if ($$self{'segment_group'} == 27 or $$self{'segment_group'} == 25) { }
602 0 8 if ($$self{'type'} ne 'INVOIC')
603 0 0 if ($$self{'item_alc_flag'} == 1)
618 0 5 if ($$self{'segment_group'} == 27 and $$data_arr[0][0] == 7)
663 6 0 if ($$data_arr[0][0] == 2)
680 14 0 if ($$data_arr[3])
683 12 2 if (@{$$self{'lines'};}) { }
698 4 0 if ($$self{'item_alc_flag'})