|
Lines 12-20
use C4::Items qw( AddItem );
Link Here
|
| 12 |
use C4::Members qw( AddMember GetMember ); |
12 |
use C4::Members qw( AddMember GetMember ); |
| 13 |
|
13 |
|
| 14 |
use Koha::Borrower::Discharge; |
14 |
use Koha::Borrower::Discharge; |
|
|
15 |
use Koha::Database; |
| 15 |
|
16 |
|
| 16 |
my $dbh = C4::Context->dbh; |
17 |
my $dbh = C4::Context->dbh; |
| 17 |
$dbh->{AutoCommit} = 0; |
18 |
my $database = Koha::Database->new(); |
|
|
19 |
my $schema = $database->schema(); |
| 20 |
$schema->storage->txn_begin(); |
| 18 |
$dbh->{RaiseError} = 1; |
21 |
$dbh->{RaiseError} = 1; |
| 19 |
|
22 |
|
| 20 |
$dbh->do(q|DELETE FROM discharges|); |
23 |
$dbh->do(q|DELETE FROM discharges|); |
|
Lines 71-76
else {
Link Here
|
| 71 |
# Even if we switch off this flag, the connection will be blocked. |
74 |
# Even if we switch off this flag, the connection will be blocked. |
| 72 |
# The error is: |
75 |
# The error is: |
| 73 |
# DBIx::Class::ResultSet::create(): DBI Exception: DBD::mysql::st execute failed: Lock wait timeout exceeded; try restarting transaction [for Statement "INSERT INTO discharges ( borrower, needed, validated) VALUES ( ?, ?, ? )" with ParamValues: 0='121', 1='2014-01-08T16:38:29', 2=undef] at /home/koha/src/Koha/DataObject/Discharge.pm line 33 |
76 |
# DBIx::Class::ResultSet::create(): DBI Exception: DBD::mysql::st execute failed: Lock wait timeout exceeded; try restarting transaction [for Statement "INSERT INTO discharges ( borrower, needed, validated) VALUES ( ?, ?, ? )" with ParamValues: 0='121', 1='2014-01-08T16:38:29', 2=undef] at /home/koha/src/Koha/DataObject/Discharge.pm line 33 |
| 74 |
#is( Koha::Service::Borrower::Discharge::request({ borrowernumber => $borrowernumber }), 1, 'Discharge request sent' ); |
77 |
isnt( Koha::Borrower::Discharge::request({ borrowernumber => $borrowernumber }), undef, 'Discharge request sent' ); |
| 75 |
|
78 |
|
|
|
79 |
$schema->storage->txn_rollback(); |
| 76 |
done_testing; |
80 |
done_testing; |
| 77 |
- |
|
|