What about just writing a tcl script that calls the tcl proc acs_user::ban? it takes simply as parameter the user_id.
You'll need to select the rel_id from the acs_rels table based on
object_id_one = acs__magic_object_id('registered_users')
object_id_two = user_id you want to ban
rel_type = 'membership_rel'
