Lines 74-80
if ( C4::Context->preference('NorwegianPatronDBEnable') && C4::Context->preferen
Link Here
|
74 |
} |
74 |
} |
75 |
} |
75 |
} |
76 |
|
76 |
|
77 |
my $patron = Koha::Patrons->find( $member ); |
|
|
78 |
my $countissues = $patron->pending_checkouts->count; |
77 |
my $countissues = $patron->pending_checkouts->count; |
79 |
my $charges = $patron->account->non_issues_charges; |
78 |
my $charges = $patron->account->non_issues_charges; |
80 |
my $userenv = C4::Context->userenv; |
79 |
my $userenv = C4::Context->userenv; |
Lines 104-110
if (C4::Context->preference("IndependentBranches")) {
Link Here
|
104 |
my $op = $input->param('op') || 'delete_confirm'; |
103 |
my $op = $input->param('op') || 'delete_confirm'; |
105 |
my $dbh = C4::Context->dbh; |
104 |
my $dbh = C4::Context->dbh; |
106 |
my $is_guarantor = $dbh->selectrow_array("SELECT COUNT(*) FROM borrowers WHERE guarantorid=?", undef, $member); |
105 |
my $is_guarantor = $dbh->selectrow_array("SELECT COUNT(*) FROM borrowers WHERE guarantorid=?", undef, $member); |
107 |
if ( $op eq 'delete_confirm' or $countissues > 0 or $flags->{'CHARGES'} or $is_guarantor or $deletelocal == 0) { |
106 |
if ( $op eq 'delete_confirm' or $countissues > 0 or $charges or $is_guarantor or $deletelocal == 0) { |
108 |
|
107 |
|
109 |
$template->param( |
108 |
$template->param( |
110 |
patron => $patron, |
109 |
patron => $patron, |
111 |
- |
|
|