you could simply rewrite that script to update the account table.
Code:
my $NewStatus = $status;
my $AcctID = $client->AccountID();
my $SQLQuery = '';
event_whatever {
$NewStatus = $NewStatus + 1;
$SQLQuery = 'update account set status = '.$NewStatus.' where id = '.$AcctID.';';
$dbh->do($SQLQuery);
}