Condition Coverage

blib/lib/ACH/Builder.pm
Criterion Covered Total %
condition 0 60 0.0


and 2 conditions

line l !l condition
1000 0 0 carp("Field '${field}' not found in format rules!") and return
1002 0 0 carp("Value '${p}' for field $field will be truncated to '" . sprintf($rules->{$field}, $p) . q['!]) and return 0

and 3 conditions

line !l l&&!r l&&r condition
314 0 0 0 ref $records eq 'ARRAY' and @$records

or 2 conditions

line l !l condition
198 0 0 $vars->{'service_class_code'} || 200
205 0 0 $vars->{'entry_class_code'} || 'PPD'
213 0 0 $vars->{'allow_unbalanced_file'} || 0
215 0 0 $vars->{'origin_status_code'} || 1
216 0 0 $vars->{'file_id_modifier'} || 'A'
217 0 0 $vars->{'record_size'} || 94
218 0 0 $vars->{'blocking_factor'} || 10
219 0 0 $vars->{'format_code'} || 1
375 0 0 $record->{'record_type'} ||= 6
376 0 0 $record->{'discretionary_data'} ||= ''
379 0 0 $record->{'addenda'} ||= []
407 0 0 $addendum->{'record_type'} ||= '7'
650 0 0 $data->{$field} ||= ''

or 3 conditions

line l !l&&r !l&&!r condition
210 0 0 0 $vars->{'effective_date'} || strftime('%y%m%d', localtime time + 86400)
211 0 0 0 $vars->{'creation_date'} || strftime('%y%m%d', localtime time)
212 0 0 0 $vars->{'creation_time'} || strftime('%H%M', localtime time)
378 0 0 0 $record->{'entry_trace'} ||= substr($self->{'__ORIGINATING_DFI__'}, 0, 8) . sprintf('%07s', $self->{'__ENTRY_COUNT__'} + 1)
380 0 0 0 $record->{'addenda_indicator'} ||= @{$record->{'addenda'};} ? '1' : '0'
408 0 0 0 $addendum->{'addendum_sequence'} ||= $addendum_sequence
409 0 0 0 $addendum->{'entry_sequence'} ||= substr($record->{'entry_trace'}, -7)
698 0 0 0 $p eq '1' or $p eq '2'
801 0 0 0 $p ||= substr($self->{'__IMMEDIATE_ORIGIN__'}, 0, 8)