line | % | coverage | branch |
145 | 50 | T | F | unless $filter |
146 | 50 | T | F | unless $filter |
147 | 100 | T | F | if ($filter eq 'whitespace') { } |
| 100 | T | F | elsif ($filter eq 'cuecat') { } |
| 100 | T | F | elsif ($filter eq 'T-prefix') { } |
| 100 | T | F | elsif ($filter eq 'libsuite8') { } |
153 | 100 | T | F | if $#results == 2 |
155 | 50 | T | F | if ($barcode =~ /^[Tt](\d)/) |
156 | 100 | T | F | if defined $1 and $1 eq '0' |
164 | 100 | T | F | unless ($barcode =~ /^($branch)-/i) |
165 | 100 | T | F | if ($barcode =~ /^(\d)/i) { } |
193 | 100 | T | F | if ($l) |
194 | 50 | T | F | if ($l == 1) |
282 | 0 | T | F | if (not $itemnumber) |
292 | 0 | T | F | if ('C4::Context'->preference('UseBranchTransferLimits') == 1) |
293 | 0 | T | F | if ('C4::Context'->preference('item-level_itypes') and 'C4::Context'->preference('BranchTransferLimitsType') eq 'itemtype') { } |
| 0 | T | F | elsif (not IsBranchTransferAllowed($tbr, $fbr, $$biblio{'C4::Context'->preference('BranchTransferLimitsType')})) { } |
294 | 0 | T | F | if (not IsBranchTransferAllowed($tbr, $fbr, $$biblio{'itype'})) |
305 | 0 | T | F | if ($hbr and $$branches{$hbr}{'PE'}) |
311 | 0 | T | F | if ($fbr eq $tbr) |
317 | 0 | T | F | if ($$issue{'borrowernumber'}) |
326 | 0 | T | F | if ($resfound and not $ignoreRs) |
334 | 0 | T | F | if ($dotransfer) |
355 | 0 | T | F | 'C4::Context'->preference('item-level_itypes') ? : |
366 | 0 | T | F | if (defined $issuing_rule and defined $$issuing_rule{'maxissueqty'}) |
372 | 0 | T | F | if ($rule_itemtype eq '*') { } |
376 | 0 | T | F | if ('C4::Context'->preference('item-level_itypes')) { } |
398 | 0 | T | F | if ('C4::Context'->preference('item-level_itypes')) { } |
410 | 0 | T | F | if ($rule_branch ne '*') |
411 | 0 | T | F | if ('C4::Context'->preference('CircControl') eq 'PickupLibrary') { } |
| 0 | T | F | elsif ('C4::Context'->preference('CircControl') eq 'PatronLibrary') { } |
427 | 0 | T | F | if ($current_loan_count >= $max_loans_allowed) |
434 | 0 | T | F | if (defined $$branch_borrower_circ_rule{'maxissueqty'}) |
441 | 0 | T | F | if ('C4::Context'->preference('CircControl') eq 'PickupLibrary') { } |
| 0 | T | F | elsif ('C4::Context'->preference('CircControl') eq 'PatronLibrary') { } |
455 | 0 | T | F | if ($current_loan_count >= $max_loans_allowed) |
518 | 0 | T | F | unless $sth->execute($bibitem) |
537 | 0 | T | F | if (my $data2 = $sth2->fetchrow_hashref) { } |
543 | 0 | T | F | $$data{'wthdrawn'} eq '1' ? : |
558 | 0 | T | F | if (my $data2 = $sth2->fetchrow_hashref) |
677 | 0 | T | F | unless ($$item{'barcode'}) |
680 | 0 | T | F | if %issuingimpossible |
685 | 0 | T | F | if ($duedate and ref $duedate ne 'DateTime') |
689 | 0 | T | F | unless ($duedate) |
693 | 0 | T | F | 'C4::Context'->preference('item-level_itypes') ? : |
699 | 0 | T | F | if ($duedate) { } |
702 | 0 | T | F | if ('DateTime'->compare($duedate, $today) == -1) |
712 | 0 | T | F | if ($$borrower{'category_type'} eq 'X' and $$item{'barcode'}) |
718 | 0 | T | F | if ($$borrower{'flags'}{'GNA'}) |
721 | 0 | T | F | if ($$borrower{'flags'}{'LOST'}) |
724 | 0 | T | F | if ($$borrower{'flags'}{'DBARRED'}) |
727 | 0 | T | F | if (not defined $$borrower{'dateexpiry'} or $$borrower{'dateexpiry'} eq '0000-00-00') { } |
731 | 0 | T | F | if ($y and $m and $d) { } |
740 | 0 | T | F | if ('DateTime'->compare($today, $expiry_dt) == 1) |
758 | 0 | T | F | if ('C4::Context'->preference('IssuingInProcess')) { } |
759 | 0 | T | F | if ($amount > $amountlimit and not $inprocess and not $allowfineoverride) { } |
| 0 | T | F | elsif ($amount > $amountlimit and not $inprocess and $allowfineoverride) { } |
| 0 | T | F | elsif ($allfinesneedoverride and $amount > 0 and $amount <= $amountlimit and not $inprocess) { } |
768 | 0 | T | F | if ($amount > $amountlimit and $allowfineoverride) { } |
| 0 | T | F | elsif ($amount > $amountlimit and not $allowfineoverride) { } |
| 0 | T | F | elsif ($amount > 0 and $allfinesneedoverride) { } |
778 | 0 | T | F | if ($blocktype == -1) { } |
| 0 | T | F | elsif ($blocktype == 1) { } |
780 | 0 | T | F | if ('C4::Context'->preference('OverduesBlockCirc') eq 'block') { } |
| 0 | T | F | elsif ('C4::Context'->preference('OverduesBlockCirc') eq 'confirmation') { } |
796 | 0 | T | F | if (defined $max_loans_allowed and $max_loans_allowed == 0) { } |
799 | 0 | T | F | if ($max_loans_allowed) |
809 | 0 | T | F | if ($$item{'notforloan'} and $$item{'notforloan'} > 0) { } |
| 0 | T | F | elsif (not $$item{'notforloan'}) { } |
812 | 0 | T | F | if (not 'C4::Context'->preference('AllowNotForLoanOverride')) { } |
820 | 0 | T | F | if ('C4::Context'->preference('item-level_itypes')) { } |
| 0 | T | F | elsif ($$biblioitem{'notforloan'} == 1) { } |
826 | 0 | T | F | if ($$notforloan{'notforloan'}) |
827 | 0 | T | F | if (not 'C4::Context'->preference('AllowNotForLoanOverride')) { } |
835 | 0 | T | F | if (not 'C4::Context'->preference('AllowNotForLoanOverride')) { } |
842 | 0 | T | F | if ($$item{'wthdrawn'} and $$item{'wthdrawn'} > 0) |
846 | 0 | T | F | if ($$item{'restricted'} and $$item{'restricted'} == 1) |
851 | 0 | T | F | if ('C4::Context'->preference('IndependantBranches')) |
853 | 0 | T | F | if ($userenv and $$userenv{'flags'} % 2 != 1) |
854 | 0 | T | F | if $$item{'C4::Context'->preference('HomeOrHoldingBranch')} ne $$userenv{'branch'} |
856 | 0 | T | F | if $$borrower{'branchcode'} ne $$userenv{'branch'} |
864 | 0 | T | F | if ($$issue{'borrowernumber'} and $$issue{'borrowernumber'} eq $$borrower{'borrowernumber'}) { } |
| 0 | T | F | elsif ($$issue{'borrowernumber'}) { } |
873 | 0 | T | F | if ($CanBookBeRenewed == 0) { } |
893 | 0 | T | F | unless ($ignore_reserves) |
896 | 0 | T | F | if ($restype) |
898 | 0 | T | F | if ($resbor ne $$borrower{'borrowernumber'}) |
901 | 0 | T | F | if ($restype eq 'Waiting') { } |
| 0 | T | F | elsif ($restype eq 'Reserved') { } |
971 | 0 | T | F | if ($datedue and ref $datedue ne 'DateTime') |
975 | 0 | T | F | if (not defined $issuedate) { } |
979 | 0 | T | F | if (ref $issuedate ne 'DateTime') |
984 | 0 | T | F | if ($borrower and $barcode and $barcodecheck ne '0') |
986 | 0 | T | F | unless my $item = GetItem('', $barcode) |
998 | 0 | T | F | if ($$actualissue{'borrowernumber'} eq $$borrower{'borrowernumber'}) { } |
1009 | 0 | T | F | if ($$actualissue{'borrowernumber'}) |
1021 | 0 | T | F | if ($datesent) |
1041 | 0 | T | F | unless ($datedue) |
1042 | 0 | T | F | 'C4::Context'->preference('item-level_itypes') ? : |
1054 | 0 | T | F | if ('C4::Context'->preference('ReturnToShelvingCart')) |
1060 | 0 | T | F | if ($$item{'itemlost'}) |
1077 | 0 | T | F | if ($charge > 0) |
1087 | 0 | T | F | $sipmode ? : |
1101 | 0 | T | F | if ($circulation_alert->is_enabled_for(\%conditions)) |
1111 | 0 | T | F | if 'C4::Context'->preference('IssueLog') |
1137 | 0 | T | F | if defined $loanlength and $$loanlength{'issuelength'} |
1142 | 0 | T | F | if defined $loanlength and $$loanlength{'issuelength'} |
1147 | 0 | T | F | if defined $loanlength and $$loanlength{'issuelength'} |
1152 | 0 | T | F | if defined $loanlength and $$loanlength{'issuelength'} |
1157 | 0 | T | F | if defined $loanlength and $$loanlength{'issuelength'} |
1162 | 0 | T | F | if defined $loanlength and $$loanlength{'issuelength'} |
1167 | 0 | T | F | if defined $loanlength and $$loanlength{'issuelength'} |
1172 | 0 | T | F | if defined $loanlength and $$loanlength{'issuelength'} |
1201 | 0 | T | F | if defined $results and $$results{'hardduedate'} |
1206 | 0 | T | F | if defined $results and $$results{'hardduedate'} |
1211 | 0 | T | F | if defined $results and $$results{'hardduedate'} |
1216 | 0 | T | F | if defined $results and $$results{'hardduedate'} |
1221 | 0 | T | F | if defined $results and $$results{'hardduedate'} |
1226 | 0 | T | F | if defined $results and $$results{'hardduedate'} |
1231 | 0 | T | F | if defined $results and $$results{'hardduedate'} |
1236 | 0 | T | F | if defined $results and $$results{'hardduedate'} |
1264 | 0 | T | F | if defined $irule |
1268 | 0 | T | F | if defined $irule |
1272 | 0 | T | F | if defined $irule |
1276 | 0 | T | F | if defined $irule |
1280 | 0 | T | F | if defined $irule |
1284 | 0 | T | F | if defined $irule |
1288 | 0 | T | F | if defined $irule |
1292 | 0 | T | F | if defined $irule |
1342 | 0 | T | F | if ($result = $sth->fetchrow_hashref) |
1352 | 0 | T | F | if ($result = $sth->fetchrow_hashref) |
1362 | 0 | T | F | if ($result = $sth->fetchrow_hashref) |
1371 | 0 | T | F | if ($result = $sth->fetchrow_hashref) |
1437 | 0 | T | F | unless defined $$result{'holdallowed'} |
1438 | 0 | T | F | unless defined $$result{'returnbranch'} |
1442 | 0 | T | F | unless defined $$result{'holdallowed'} |
1443 | 0 | T | F | unless defined $$result{'returnbranch'} |
1524 | 0 | T | F | if ($branch and not GetBranchDetail($branch)) |
1528 | 0 | T | F | unless $branch |
1538 | 0 | T | F | unless ($itemnumber) |
1543 | 0 | T | F | if ($issue and $$issue{'borrowernumber'}) { } |
1544 | 0 | T | F | unless $borrower = C4::Members::GetMemberDetails($$issue{'borrowernumber'}) |
1553 | 0 | T | F | if ('C4::Context'->preference('RecordLocalUseOnReturn')) |
1559 | 0 | T | F | unless my $item = GetItem($itemnumber) |
1571 | 0 | T | F | if ($hbr) |
1573 | 0 | T | F | if $$branches{$hbr}{'PE'} |
1577 | 0 | T | F | if ($hbr ne $branch and 'C4::Context'->preference('IndependantBranches')) |
1591 | 0 | T | F | if ($$item{'wthdrawn'}) |
1597 | 0 | T | F | if ($doreturn) |
1598 | 0 | T | F | unless $borrower |
1600 | 0 | T | F | if ($dropbox) |
1608 | 0 | T | F | if ($borrowernumber) |
1618 | 0 | T | F | if ($$item{'holdingbranch'} ne $branch) |
1628 | 0 | T | F | if ($datesent) |
1629 | 0 | T | F | if ($tobranch eq $branch) { } |
1644 | 0 | T | F | if ($$item{'itemlost'}) |
1650 | 0 | T | F | if ($borrowernumber) |
1652 | 0 | T | F | unless defined $fix |
1656 | 0 | T | F | if $debardate |
1662 | 0 | T | F | if ($resfound) |
1684 | 0 | T | F | if ($doreturn and $circulation_alert->is_enabled_for(\%conditions)) |
1693 | 0 | T | F | if 'C4::Context'->preference('ReturnLog') |
1700 | 0 | T | F | if ($doreturn || $$messages{'NotIssued'} and not $resfound and $branch ne $hbr and not $$messages{'WrongTransfer'}) |
1701 | 0 | T | F | if ('C4::Context'->preference('AutomaticItemReturn') or 'C4::Context'->preference('UseBranchTransferLimits') and not IsBranchTransferAllowed($branch, $hbr, $$item{'C4::Context'->preference('BranchTransferLimitsType')})) { } |
1705 | 0 | T | F | if $debug |
1706 | 0 | T | F | if $debug |
1744 | 0 | T | F | if ($dropbox_branch) { } |
| 0 | T | F | elsif ($returndate) { } |
1765 | 0 | T | F | if ($privacy == 2) |
1768 | 0 | T | F | 'C4::Context'->preference('AnonymousPatron') ? : |
1796 | 0 | T | F | unless $datedue |
1812 | 0 | T | F | unless $finedays |
1815 | 0 | T | F | if (($deltadays - $grace)->is_positive) |
1819 | 0 | T | F | if ($$borrower{'debarred'} and $borrower_debar_dt) { } |
1821 | 0 | T | F | if ('DateTime'->compare($borrower_debar_dt, $new_debar_dt) == -1) |
1850 | 0 | T | F | unless ($borrowernumber = shift @_) |
1854 | 0 | T | F | unless ($item = shift @_) |
1869 | 0 | T | F | unless $data |
1873 | 0 | T | F | if ($exemptfine) { } |
| 0 | T | F | elsif ($dropbox and $$data{'lastincrement'}) { } |
1875 | 0 | T | F | if ('C4::Context'->preference('FinesLog')) |
1881 | 0 | T | F | if ('C4::Context'->preference('FinesLog')) |
1885 | 0 | T | F | if ($outstanding >= 0 and $amt >= 0) |
1911 | 0 | T | F | unless my $itemnumber = shift @_ |
1912 | 0 | T | F | @_ ? : |
1913 | 0 | T | F | @_ ? : |
1919 | 0 | T | F | unless $data |
1920 | 0 | T | F | if $$data{'accounttype'} eq 'W' |
1927 | 0 | T | F | if ($$data{'amountoutstanding'} == $amount) { } |
1940 | 0 | T | F | if $amountleft < 0 |
1941 | 0 | T | F | if ($amountleft > 0) |
1949 | 0 | T | F | if ($$accdata{'amountoutstanding'} < $amountleft) { } |
1970 | 0 | T | F | if $amountleft > 0 |
1976 | 0 | T | F | if ($borrowernumber) |
2008 | 0 | T | F | if ($circcontrol eq 'PickupLibrary' and ('C4::Context'->userenv and 'C4::Context'->userenv->{'branch'})) { } |
| 0 | T | F | elsif ($circcontrol eq 'PatronLibrary') { } |
2017 | 0 | T | F | if (not defined $branch and $branchfield eq 'holdingbranch') |
2043 | 0 | T | F | unless $itemnumber |
2051 | 0 | T | F | unless $data |
2057 | 0 | T | F | 'DateTime'->compare($$data{'date_due'}, $dt) == -1 ? : |
2106 | 0 | T | F | if ($history) |
2115 | 0 | T | F | if ($history) { } |
2125 | 0 | T | F | 'DateTime'->compare($date_due, $today) == -1 ? : |
2144 | 0 | T | F | unless $biblionumber |
2183 | 0 | T | F | unless exists $$params{'days_in_advance'} |
2249 | 0 | T | F | 'C4::Context'->preference('item-level_itypes') ? : |
2278 | 0 | T | F | if (my $data1 = $sthcount->fetchrow_hashref) |
2280 | 0 | T | F | if ($$data1{'renewalsallowed'} and $$data1{'renewalsallowed'} > $$data1{'renewals'} or $override_limit) { } |
2288 | 0 | T | F | if ($resfound) |
2322 | 0 | T | F | unless my $borrowernumber = shift @_ |
2323 | 0 | T | F | unless my $itemnumber = shift @_ |
2327 | 0 | T | F | unless my $item = GetItem($itemnumber) |
2328 | 0 | T | F | unless my $biblio = GetBiblioFromItemNumber($itemnumber) |
2340 | 0 | T | F | if (defined $datedue and ref $datedue ne 'DateTime') |
2347 | 0 | T | F | unless ($datedue) |
2349 | 0 | T | F | unless my $borrower = C4::Members::GetMember('borrowernumber', $borrowernumber) |
2350 | 0 | T | F | 'C4::Context'->preference('item-level_itypes') ? : |
2352 | 0 | T | F | 'C4::Context'->preference('RenewalPeriodBase') eq 'date_due' ? : |
2375 | 0 | T | F | if ($charge > 0) |
2379 | 0 | T | F | if 'C4::Context'->userenv |
2417 | 0 | T | F | if $$data{'renewals'} |
2426 | 0 | T | F | if ($renewsleft < 0) |
2458 | 0 | T | F | 'C4::Context'->preference('item-level_itypes') ? : |
2466 | 0 | T | F | if (my $item_data = $sth->fetchrow_hashref) |
2480 | 0 | T | F | if (@{$discount_rules;}) |
2496 | 0 | T | F | if (@{$rules_ref;} == 1) |
2498 | 0 | T | F | defined $discount ? : |
2501 | 0 | T | F | if $$_{'branchcode'} eq $branch |
2502 | 0 | T | F | if (@d) |
2504 | 0 | T | F | defined $discount ? : |
2507 | 0 | T | F | if $$_{'branchcode'} eq '*' |
2508 | 0 | T | F | if (@d) |
2510 | 0 | T | F | defined $discount ? : |
2513 | 0 | T | F | if $$_{'branchcode'} eq $branch |
2514 | 0 | T | F | if (@d) |
2516 | 0 | T | F | defined $discount ? : |
2519 | 0 | T | F | if $$_{'branchcode'} eq '*' |
2520 | 0 | T | F | if (@d) |
2522 | 0 | T | F | defined $discount ? : |
2539 | 0 | T | F | if 'C4::Context'->userenv |
2588 | 0 | T | F | unless $frombranch and $tobranch |
2653 | 0 | T | F | 'C4::Context'->preference('AnonymousPatron') ? : |
2655 | 0 | T | F | if (defined $borrowernumber) { } |
2716 | 0 | T | F | unless my $letter = C4::Letters::GetPreparedLetter('module', 'circulation', 'letter_code', $type, 'branchcode', $branch, 'tables', {'biblio', $$item{'biblionumber'}, 'biblioitems', $$item{'biblionumber'}, 'borrowers', $borrower, 'branches', $branch}) |
2733 | 0 | T | F | if (not $message) { } |
2808 | 0 | T | F | if ('C4::Context'->preference('globalDueDate') and 'C4::Context'->preference('globalDueDate') =~ 'C4::Dates'->regexp('syspref')) { } |
2819 | 0 | T | F | if ('C4::Context'->preference('useDaysMode') eq 'Days') { } |
2824 | 0 | T | F | if ($$loanlength{'lengthunit'} eq 'hours') { } |
2835 | 0 | T | F | if ($$loanlength{'lengthunit'} eq 'hours') { } |
2841 | 0 | T | F | if (ref $startdate ne 'DateTime') |
2846 | 0 | T | F | if ($$loanlength{'lengthunit'} eq 'days') |
2856 | 0 | T | F | if ($hardduedate) |
2865 | 0 | T | F | if ($hardduedatecompare == 0 or $hardduedatecompare == $cmp) |
2873 | 0 | T | F | if ('C4::Context'->preference('ReturnBeforeExpiry')) |
2875 | 0 | T | F | if ('DateTime'->compare($datedue, $expiry_dt) == 1) |
2998 | 0 | T | F | if ($toBranch eq $fromBranch) |
3008 | 0 | T | F | if ($$limit{'limitId'}) { } |
3075 | 0 | T | F | if (my $borrowernumber = $$issues{'borrowernumber'}) |
3077 | 0 | T | F | if $charge_fee |
3081 | 0 | T | F | if $mark_returned |
3121 | 0 | T | F | if ($$operation{'action'} eq 'return') { } |
| 0 | T | F | elsif ($$operation{'action'} eq 'issue') { } |
3127 | 0 | T | F | if $$operation{'operationid'} |
3137 | 0 | T | F | if ($itemnumber) { } |
3139 | 0 | T | F | if ($issue) { } |
3165 | 0 | T | F | if ($$borrower{'borrowernumber'}) { } |
3167 | 0 | T | F | unless ($itemnumber) |
3172 | 0 | T | F | if ($issue and $$issue{'borrowernumber'} ne $$borrower{'borrowernumber'}) |
3207 | 0 | T | F | unless my $item = GetItem($itemnumber) |