CREATE OR REPLACE FUNCTION fnc_valida_campo_email(text) returns BOOLEAN AS 
'select $1 ~ ''^[^@\s]+@[^@\s]+(\.[^@\s]+)+$'' AS result
' LANGUAGE sql;