FoxPro/Visual FoxPro - buscar un registro de una tabla e introducirlo en otra en foxpro

CREATE CURSOR curSueldo ("nombre" c(50),"sueldo" n(12,2))

lcNombre = ALLTRIM(thisform.text1.text)

SELECT nombre,sueldo FROM empleados WHERE nombre=m.lcNombre INTO ARRAY laSueldo

lnTally = _tally

IF m.lnTally = 1

	INSERT INTO curSueldo FROM ARRAY laSueldo

ENDIF

CREATE CURSOR curSueldo ("nombre" c(50),"sueldo" n(12,2))

lcNombre = ALLTRIM(thisform.text1.text)

SELECT nombre,sueldo FROM empleados WHERE nombre=m.lcNombre INTO CURSOR curPase

lnTally = _tally

IF m.lnTally = 1

	SELECT curSueldo

	APPEND FROM DBF("curPase")

ENDIF

CREATE CURSOR curSueldo ("nombre" c(50),"sueldo" n(12,2))

* Poner la tabla "empleados" en un grid y seleccionar manualmente.

* Con un commandbutton con el siguiente código:

INSERT INTO curSueldo (nombre,sueldo) VALUES (empleado.nombre,empleado.sueldo)