my $insert_handle = $dbh->prepare(qq{INSERT INTO Status (AssetTag,Status,Date,Comment,EnteredBy) VALUES (?,?,?,?,?) });
$insert_handle->execute( $assettag, 'In Service', $date, '', 'acaiafa' );
my $insert_handle = $dbh->prepare(qq{INSERT INTO Assignment(AssetTag,Type,Purpose,Application,`Use`,`Name`,Campus,Department,Building,Room,Date,Comment,TicketID) });
$insert_handle->execute($assettag,'Permanent','Native','Lab - Classroom','Academic','-','Manhattan','Center for Computer Services','7th floor','729','','-','-');
my $insert_handle = $dbh->prepare(qq{UPDATE Assignment SET Type = ?, Purpose= ?, Application = ?, `Use` = ?, `Name` = ?, Department = ?, Campus = ?, Building = ?, Room = ? WHERE AssetTag = ? });
$insert_handle->execute('Permanent','Native','Lab - Classroom','Academic','-','Center For Computer Services','Manhattan','7th floor','729',$assettag);
my $update_handle = $dbh->prepare(qq{UPDATE Asset SET Status_Current = 'In Service' WHERE AssetTag = '$assettag'});
$update_handle->execute();