Metido en un gran problema

[vili86]

Nadie tiene alguna sugerencia encontre esto en la red pero no me guio bien espero q me pueda ayudar

Encontre este codigo en la red pero la verdad tengo un poco de temor antes de ejecutarlo en mi base de datos espero me ppuedan guiar en esto
Tengo un campo nombre dende los datos estan ASI DAZA MARTINEZ JUAN Y QUIERO LLEVAR A mi nuevos dos campos PATERNO Y MATERNO ASI
nombre= JUAN
paterno= DAZA
MATERNO=MARTINEZ


select Nombre(NombreApelido) as Nombre, Apellido(NombreApelido) as Apellido
from tabla
into table newtabla

Function Nombre()
Parameters Cadena
Nombre= Substr(Cadena, AT(',',Cadena), Len(Cadena))
Return Nombre

Function Apellido()
Parameters Cadena
Apellido= Substr(Cadena, 1, AT(',',Cadena))
Return Apellido


ESPERO QUE ME PUEDAN GUIAR SI ESTE CODIGO ES CORRECTO Y ME AYUDEN A MODIFCAR ??
Muchas Gracias de antemano

Gracias gnzsoloyo envia esto antes de que leyera tu post intetare hacer lo q dices