NAME

Egg::Plugin::DBI::CommitOK - DBI->commit is settled and it does.

SYNOPSIS

package MYPROJECT;
use strict;
use Egg qw/DBI::CommotOK/;

Example of code.

my($e)= @_;
.... ban, ban, ban.

my $sth= $e->dbh->prepare(q{ update table set foo = ? where baa = ? });
$sth->execute('foo_value', 'baa_value');
$sth->finish;
$e->commit_ok(1);
#
# Actual $e->dbh->commit is done by $e->finalize after this.
#

DESCRIPTION

When commit_ok is false, rollback is always done.

When dbh->{AutoCommit} is effective, nothing is done.

When the error occurs by the application, rollback is done via finalize_error.

METHODS

$e->dbh

It is an accessor to $e->model('DBI')->dbh.

$e->commit_ok([Boolean]);

It is a flag whether to do dbh->commit.

$e->rollback_ok([Boolean]);

It is a flag whether to do dbh->rollback.

$e->dbh_commit

$e->dbh->ommit is done at once. However, nothing is done when dbh->{AutoCommit} is effective.

$e->dbh_rollback

$e->dbh->rollback is done at once. However, nothing is done when dbh->{AutoCommit} is effective.

SEE ALSO

Egg::Model::DBI, Egg::Release,

AUTHOR

Masatoshi Mizuno <lushe@cpan.org>

COPYRIGHT

Copyright (C) 2006 by Bee Flag, Corp. <http://egg.bomcity.com/>, All Rights Reserved.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.6 or, at your option, any later version of Perl 5 you may have available.