From 6cb3abcbd95fe673d5b0426f5f8c23a0c7683e65 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 26 Jul 2017 13:50:14 -0300 Subject: [PATCH] Bug 18982: Remove data in the correct order To respect FK Signed-off-by: Jonathan Druart --- t/db_dependent/selenium/basic_workflow.t | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) diff --git a/t/db_dependent/selenium/basic_workflow.t b/t/db_dependent/selenium/basic_workflow.t index 48a232c..f439dac 100644 --- a/t/db_dependent/selenium/basic_workflow.t +++ b/t/db_dependent/selenium/basic_workflow.t @@ -222,17 +222,16 @@ sub fill_form { sub cleanup { my $dbh = C4::Context->dbh; - $dbh->do(q|DELETE FROM borrowers WHERE userid = ?|, {}, $sample_data->{patron}{userid}); - $dbh->do(q|DELETE FROM categories WHERE categorycode = ?|, {}, $sample_data->{category}{categorycode}); - for my $i ( 1 .. $number_of_biblios_to_insert ) { - $dbh->do(qq|DELETE FROM biblio WHERE title = "test biblio $i"|); - }; - $dbh->do(q|DELETE FROM issues where borrowernumber=?|, {}, $borrowernumber); $dbh->do(q|DELETE FROM old_issues where borrowernumber=?|, {}, $borrowernumber); for my $i ( 1 .. $number_of_biblios_to_insert ) { $dbh->do(qq|DELETE items, biblio FROM biblio INNER JOIN items ON biblio.biblionumber = items.biblionumber WHERE biblio.title = "test biblio$i"|); }; + $dbh->do(q|DELETE FROM borrowers WHERE userid = ?|, {}, $sample_data->{patron}{userid}); + $dbh->do(q|DELETE FROM categories WHERE categorycode = ?|, {}, $sample_data->{category}{categorycode}); + for my $i ( 1 .. $number_of_biblios_to_insert ) { + $dbh->do(qq|DELETE FROM biblio WHERE title = "test biblio $i"|); + }; $dbh->do(q|DELETE FROM itemtypes WHERE itemtype=?|, undef, $sample_data->{itemtype}{itemtype}); $dbh->do(q|DELETE FROM issuingrules WHERE categorycode=? AND itemtype=? AND branchcode=?|, undef, $sample_data->{issuingrule}{categorycode}, $sample_data->{issuingrule}{itemtype}, $sample_data->{issuingrule}{branchcode}); } -- 2.1.4