FoxPro/Visual FoxPro - formas URGE

Alguien que me proporcione una forma junto con su base para
agregar datos a una base, dijamos codigo, nombre, direccion, telefono
y que valide que no entren codigos duplicados.

Buenas.
Lo mejor que puedes hacer (si es tan urgente como dices) es utilizar un asistente, y después, colocar el código necesario en los valid que correspondan, por ejemplo, en el valid del código

local aux
local valido
valido=.t.
aux=recno()
locate for codigo=this.value .and. recno()!=aux
if found()
messagebox("Codigo duplicado")
valido=.f.
endif
go aux
return valid

Para grabar debes utilizarel comando append bank ocon sql usando inser into y para conocer si el registro ya existe lo debes buscar antes ejemplo

use tabla in 0
set index to rut
seek(buscarut)
if not found()
appen blank
replace rutpaso with rut
replace fonopaso with paso
else
wait wind'El registro ya existe y no puede ser duplicado' time 2
endif
clos data