line | % | coverage | branch |
171 | 0 | T | F | if (my $borrowernumber = $dbh->selectrow_array($query, undef, $filter)) |
176 | 0 | T | F | if (length $filter == 1) { } |
193 | 0 | T | F | if (my $fr = ref $filter) { } |
194 | 0 | T | F | if ($fr eq 'HASH') { } |
195 | 0 | T | F | if (my $search_string = $$filter{''}) |
197 | 0 | T | F | if ($member_filter) { } |
213 | 0 | T | F | if ($member_filter) { } |
222 | 0 | T | F | if (not $found_borrower and 'C4::Context'->preference('ExtendedPatronAttributes') and $search_string) |
224 | 0 | T | F | if (scalar @$matching_records > 0) |
225 | 0 | T | F | if (my $fr = ref $filter) { } |
226 | 0 | T | F | if ($fr eq 'HASH') { } |
246 | 0 | T | F | if ('C4::Context'->preference('IndependantBranches')) |
247 | 0 | T | F | if (my $userenv = 'C4::Context'->userenv) |
249 | 0 | T | F | if ($$userenv{'flags'} % 2 != 1 and $branch and $branch ne 'insecure') |
252 | 0 | T | F | if (my $fr = ref $filter) { } |
253 | 0 | T | F | if ($fr eq 'HASH') { } |
258 | 0 | T | F | unless ref $_ |
270 | 0 | T | F | if ($found_borrower) |
315 | 0 | T | F | if ($borrowernumber) { } |
| 0 | T | F | elsif ($cardnumber) { } |
336 | 0 | T | F | if ($$borrower{'flags'} and $$borrower{'flags'} & 2 ** $bit) |
346 | 0 | T | F | if ($$borrower{'category_type'} eq 'I') { } |
348 | 0 | T | F | if $$borrower{'firstname'} |
424 | 0 | T | F | if ($amount > 0) { } |
| 0 | T | F | elsif ($amount < 0) { } |
429 | 0 | T | F | if ($amount > $noissuescharge and not 'C4::Context'->preference('AllowFineOverride')) |
440 | 0 | T | F | if ($$patroninformation{'gonenoaddress'} and $$patroninformation{'gonenoaddress'} == 1) |
448 | 0 | T | F | if ($$patroninformation{'lost'} and $$patroninformation{'lost'} == 1) |
454 | 0 | T | F | if ($$patroninformation{'debarred'} and check_date(split(/-/, $$patroninformation{'debarred'}, 0))) |
455 | 0 | T | F | if (Date_to_Days(Date::Calc::Today()) < Date_to_Days(split(/-/, $$patroninformation{'debarred'}, 0))) |
464 | 0 | T | F | if ($$patroninformation{'borrowernotes'} and $$patroninformation{'borrowernotes'}) |
472 | 0 | T | F | if ($odues and $odues > 0) |
486 | 0 | T | F | if ($nowaiting > 0) |
518 | 0 | T | F | if (exists $information{'borrowernumber'} and not defined $information{'borrowernumber'}) |
530 | 0 | T | F | if ($more_p) { } |
537 | 0 | T | F | if (defined $information{$_}) { } |
545 | 0 | T | F | if $debug |
551 | 0 | T | F | if (@{$data;}) |
575 | 0 | T | F | if $$data[0] |
576 | 0 | T | F | if $$data[0] |
587 | 0 | T | F | if ($guarantor) |
592 | 0 | T | F | if $$data[0] != $borrowernumber |
630 | 0 | T | F | if $blockeddate |
642 | 0 | T | F | if $latedocs > 0 |
667 | 0 | T | F | if $debug |
706 | 0 | T | F | if (exists $data{'password'}) |
707 | 0 | T | F | if ($data{'password'} eq '****' or $data{'password'} eq '') { } |
714 | 0 | T | F | if ($execute_success) |
719 | 0 | T | F | if (exists $$borrowercategory{'category_type'} and $$borrowercategory{'category_type'} eq 'A') |
723 | 0 | T | F | if 'C4::Context'->preference('BorrowersLog') |
745 | 0 | T | F | if $data{'userid'} eq '' |
747 | 0 | T | F | $data{'password'} ? : |
750 | 0 | T | F | if 'C4::Context'->preference('BorrowersLog') |
756 | 0 | T | F | if ($sth->err) |
760 | 0 | T | F | if ($enrolmentfee and $enrolmentfee > 0) |
778 | 0 | T | F | if ($uid ne '' and my $row = $sth->fetchrow_hashref) { } |
793 | 0 | T | F | $firstname ? : |
794 | 0 | T | F | unless $offset == 0 |
813 | 0 | T | F | if ($uid ne '' and my $row = $sth->fetchrow_hashref) { } |
825 | 0 | T | F | if 'C4::Context'->preference('BorrowersLog') |
850 | 0 | T | F | unless $autonumber_members |
853 | 0 | T | F | if ($checkdigit and $checkdigit eq 'katipo') { } |
867 | 0 | T | F | if (not $cardnumber) { } |
886 | 0 | T | F | if $rem == 10 |
976 | 0 | T | F | unless (@borrowernumbers) |
984 | 0 | T | F | if ($i < $#borrowernumbers) |
1032 | 0 | T | F | if ($$_{'date_due'} and $$_{'date_due'} lt $today) |
1079 | 0 | T | F | if ($limit != 0) |
1120 | 0 | T | F | if ($date and $date ne '') |
1129 | 0 | T | F | if ($$data{'itemnumber'}) |
1202 | 0 | T | F | $dateofbirth ? : |
| 0 | T | F | $collectivity ? : |
1208 | 0 | T | F | if ($collectivity) { } |
| 0 | T | F | elsif ($dateofbirth) { } |
1216 | 0 | T | F | if $data[0] |
1223 | 0 | T | F | if not defined $cardnumber |
1226 | 0 | T | F | if $borrowernumber |
1228 | 0 | T | F | if ($borrowernumber) { } |
1233 | 0 | T | F | if (my $data = $sth->fetchrow_hashref) { } |
1293 | 0 | T | F | if ($$data{'email'}) { } |
| 0 | T | F | elsif ($$data{'emailpro'}) { } |
| 0 | T | F | elsif ($$data{'B_email'}) { } |
1316 | 0 | T | F | if ($categorycode) |
1324 | 0 | T | F | if ($$enrolments{'enrolmentperiod'}) { } |
1374 | 0 | T | F | if ($action) { } |
1407 | 0 | T | F | if ($catcode) |
1483 | 0 | T | F | unless $ethnicity |
1503 | 0 | T | F | if (not defined $date_ref) |
1511 | 0 | T | F | if ($month1 . $day1 > $month2 . $day2) |
1579 | 0 | T | F | if (@{$city_arr;}) |
1613 | 0 | T | F | if $lib |
1614 | 0 | T | F | unless $lib |
1629 | 0 | T | F | unless my($member) = shift @_ |
1637 | 0 | T | F | unless @data |
1658 | 0 | T | F | unless $borrowernumber |
1672 | 0 | T | F | if 'C4::Context'->preference('BorrowersLog') |
1689 | 0 | T | F | unless ($date) |
1690 | 0 | T | F | 'C4::Context'->preference('BorrowerRenewalPeriodBase') eq 'dateexpiry' ? : |
1704 | 0 | T | F | if ($enrolmentfee and $enrolmentfee > 0) |
1708 | 0 | T | F | if 'C4::Context'->preference('BorrowersLog') |
1709 | 0 | T | F | if $sth |
1744 | 0 | T | F | if ($id eq 0) { } |
1767 | 0 | T | F | if ($count == 1) { } |
1785 | 0 | T | F | if $debug |
1791 | 0 | T | F | if $sth->errstr |
1806 | 0 | T | F | $imgfile ? : |
| 0 | T | F | if $debug |
1811 | 0 | T | F | if $sth->errstr |
1825 | 0 | T | F | if $debug |
1831 | 0 | T | F | if $sth->errstr |
1888 | 0 | T | F | 'C4::Context'->preference('IndependantBranches') && 'C4::Context'->userenv && 'C4::Context'->userenv->{'flags'} % 2 != 1 && 'C4::Context'->userenv->{'branch'} ? : |
1908 | 0 | T | F | if ($filterbranch and $filterbranch ne '') |
1912 | 0 | T | F | if ($filterexpiry) |
1917 | 0 | T | F | if ($filterdate) |
1922 | 0 | T | F | if $debug |
1924 | 0 | T | F | if (scalar @query_params > 0) { } |
1949 | 0 | T | F | 'C4::Context'->preference('IndependantBranches') && 'C4::Context'->userenv && 'C4::Context'->userenv->{'flags'} % 2 != 1 && 'C4::Context'->userenv->{'branch'} ? : |
1964 | 0 | T | F | if ($filterbranch and $filterbranch ne '') |
1968 | 0 | T | F | if $debug |
1971 | 0 | T | F | if (scalar @query_params > 0) { } |
1999 | 0 | T | F | 'C4::Context'->preference('IndependantBranches') && 'C4::Context'->userenv && 'C4::Context'->userenv->{'flags'} % 2 != 1 && 'C4::Context'->userenv->{'branch'} ? : |
2014 | 0 | T | F | if ($filterbranch) |
2019 | 0 | T | F | if $debug |
2072 | 0 | T | F | unless defined $borrowernumber |
2073 | 0 | T | F | unless $borrowernumber =~ /^\d+$/ |
2100 | 0 | T | F | unless defined $borrowernumber |
2101 | 0 | T | F | unless $borrowernumber =~ /^\d+$/ |
2124 | 0 | T | F | if (not $borrowernumber && $message_type && $message && $branchcode) |
2131 | 0 | T | F | if 'C4::Context'->preference('BorrowersLog') |
2149 | 0 | T | F | if (not $type) |
2192 | 0 | T | F | if (not $type) |
2229 | 0 | T | F | if 'C4::Context'->preference('BorrowersLog') |