Attachment #20198 for bug #10699

View | Details | Raw Unified | Return to bug 10699
Collapse All | Expand All

Lines 3267-3275 Deletes all the branch transfer limits for one branch Link Here

(-)a/C4/Circulation.pm (-1 / +2 lines)
3267		3267
3268	sub DeleteBranchTransferLimits {	3268	sub DeleteBranchTransferLimits {
3269	my $branch = shift;	3269	my $branch = shift;
		3270	return unless $branch;
3270	my $dbh = C4::Context->dbh;	3271	my $dbh = C4::Context->dbh;
3271	my $sth = $dbh->prepare("DELETE FROM branch_transfer_limits WHERE fromBranch = ?");	3272	my $sth = $dbh->prepare("DELETE FROM branch_transfer_limits WHERE fromBranch = ?");
3272	$sth->execute($branch);	3273	return $sth->execute($branch);
3273	}	3274	}
3274		3275
3275	sub ReturnLostItem{	3276	sub ReturnLostItem{




use Koha::DateUtils;
use DateTime::Duration;

use Test::More tests => 14;

BEGIN {
    use_ok('C4::Circulation');

    1,
    "A Branch TransferLimit has been deleted"
);
is(C4::Circulation::DeleteBranchTransferLimits(),undef,"Without parameters DeleteBranchTransferLimit returns undef");
is(C4::Circulation::DeleteBranchTransferLimits('B'),'0E0',"With a wrong id DeleteBranchTransferLimit returns 0E0");

#Test DeleteTransfer
is( C4::Circulation::DeleteTransfer($item_id1),
- 

Return to bug 10699

Lines 9-15 use C4::Circulation; Link Here

(-)a/t/db_dependent/Circulation_transfers.t (-4 / +3 lines)
9	use Koha::DateUtils;	9	use Koha::DateUtils;
10	use DateTime::Duration;	10	use DateTime::Duration;
11		11
12	use Test::More tests => 12;	12	use Test::More tests => 14;
13		13
14	BEGIN {	14	BEGIN {
15	use_ok('C4::Circulation');	15	use_ok('C4::Circulation');
Lines 184-191 is( Link Here
184	1,	184	1,
185	"A Branch TransferLimit has been deleted"	185	"A Branch TransferLimit has been deleted"
186	);	186	);
187	#FIXME :The following test should pass but doesn't because currently the routine DeleteBranchTransferLimit returns nothin	187	is(C4::Circulation::DeleteBranchTransferLimits(),undef,"Without parameters DeleteBranchTransferLimit returns undef");
188	#is(C4::Circulation::DeleteBranchTransferLimits(),undef,"Without parameters DeleteBranchTransferLimit returns undef");	188	is(C4::Circulation::DeleteBranchTransferLimits('B'),'0E0',"With a wrong id DeleteBranchTransferLimit returns 0E0");
189		189
190	#Test DeleteTransfer	190	#Test DeleteTransfer
191	is( C4::Circulation::DeleteTransfer($item_id1),	191	is( C4::Circulation::DeleteTransfer($item_id1),
192	-