package FW::Database;

require Exporter;
use vars qw(@ISA @EXPORT %conf);
@ISA = qw(Exporter);
@EXPORT = qw(
	&DB_insertdata 
);

sub DB_insertdata
{
    my $stmt = $_[0];
    my $dbh  = $_[1];
    my $error = "";
    my $sth = $dbh->prepare($stmt) || FW::Utils::handle_dberror("$DBI::errstr", $dbh);
    my $rv = $sth->execute() || FW::Utils::handle_dberror("$DBI::errstr", $dbh);
}