HELP... POR FAVOR ES ¡URGENTE!!!

HOLA AMIGOS...

Tengo un problema y pase toda la noche para tratar de
corregir y no he podido, Que estoy haciendo mal???

Cree un Formulario maestro detalle llamado "Ventas"

se seleciona el cliente dela tabla Clintes.dbf y me
muestra las ventas en un Grid1.

1). En el entorno de datos lo tengo algo asi:
*********************************************************
Cusor1 Cusor2 Cusor3
Clientes.dbf ventas.dbf inventario.dbf

*codclie.. codigo codigo
nombre *codclie articulo
direccion codarticulo descripcion
etc... etc... etc...
*********************************************************

2). En el formulario genero el Grid1 con la

colocandole la relacion de clientes.codclie +
ventas.codclie.
tanbien he probado colocando un nuevo indice en la taba
ventas completo llamado asi
UNICOD=codigo+codclie
lo relaciono en entorno de datos asi el codigo del
cliente con UNICOD

3). luego creo el boton agregar un nuevo registro con el
INSERT INTO asi:

SELECT ventas
SET ORDER TO Codigo
LCULTIMOREG=Ventas.Codigo+1 *
INSERT INTO ventas(Codigo,codclie,fecha);
VALUES(LCULTIMOREG,clientes.codigo,DATE())
Thisform.grid1.column1.text1.Stfocus()

4). Guardo con:
TABLEUPDATE(.t.,.t."ventas")

Cuando ejecuto el formulario seleciono el cliente y le
doy nuevo pasa lo siguiente:

-El grid1 se crea un nuevo registro normal.
- Le doy guardar y se peirden los datos del grid1.
-cierro el formulario y lo vuelvo abrir entonces aparece
el registro creado.
-cuando le doy nuevamete agregar un nuevo registro borra
el registro actual pero del grid1, y me coloca el nuevo
registro, cuando le doy guardar se borra nuevamente el
registro del Grid1 nuevamente lo ejecuto y aparecen los
dos registros.

tengo modo de almacenamiento en Buffer (5).. paara las
tablas y el formulario nivel 2 (optimista)

Por favor espero que me entiendan y si alguien tiene una
idea se la agradezco mucho.

Gracias por toda su colaboracion

Andys Bohorquez
Cartagena-Colombia
.