Chequear correo

[kain69]

Buenas tardes, necesito chequear que un correo no contenga SOLO numeros delante de la @, alguien me puede ayudar?? si el correo es del tipo
debe dar un error, pero si es no.

[omegaotaku]

Utiliza esta función:
call function 'CHECK_AND_CONVERT_NUMERICS'
exporting
dmzei = '.'
dtype = 'DEC'
efeld = 333333
imp_decimals = '0'
importing
error = l_error.

Salu2

[kain69]

Muchas gracias por la ayuda.