create function remove_latin(p_str text) returns text
deterministic no sql
comment 'Удаление латинницы из строки
 !!! ПРОТОТИП !!! Проверялась на utf8, windows-1251. На др. кодировках может не работать как ожидается.
usage: update sometable set somefield = remove_latin(somefield) where ... and somefield regexp \'[A-z]\';'
begin
  declare v_len int unsigned default char_length(p_str);
  declare v_i int unsigned default 1;
  declare v_str text default '';
  declare v_char varchar(1);
  
  while v_i <= v_len do
    set v_char = substr(p_str, v_i, 1);
    if v_char > 'z' or v_char < 'A' then
	  set v_str = concat(v_str, v_char);
    end if;
    set v_i = v_i + 1;
  end while;
  
  return v_str;
end