| line |
true |
false |
branch |
|
21
|
20 |
0 |
if $self->address
|
|
22
|
16 |
4 |
if $self->UEI
|
|
23
|
0 |
20 |
if $self->DUNS
|
|
24
|
0 |
20 |
if $self->CAGE
|
|
25
|
20 |
0 |
if $self->SAM_number
|
|
26
|
0 |
20 |
if $self->NPI
|
|
27
|
0 |
20 |
if $self->creation_date
|
|
28
|
20 |
0 |
if $self->active_date
|
|
29
|
4 |
16 |
if ($self->termination_date->year == 2200) { }
|
|
32
|
16 |
0 |
if $self->termination_date
|
|
34
|
16 |
4 |
if $self->crossref
|
|
35
|
0 |
20 |
if $self->record_status
|
|
36
|
20 |
0 |
if $self->xprogram
|
|
37
|
20 |
0 |
if $self->xagency
|
|
38
|
20 |
0 |
if $self->xtype
|
|
39
|
4 |
16 |
if $self->CT_code
|
|
40
|
4 |
16 |
if $self->comments
|
|
41
|
16 |
4 |
if defined $self->dnb_open_data
|
|
79
|
60 |
0 |
if (@_)
|
|
81
|
11 |
49 |
if $d =~ /indefinite/i
|
|
125
|
16 |
4 |
if $ncols eq 31
|
|
126
|
4 |
0 |
if $ncols eq 28
|
|
133
|
0 |
4 |
unless scalar @_ == 28
|
|
171
|
0 |
16 |
unless scalar @_ == 31
|