Ayuda con Grid y cursor
Publicado por Analia (103 intervenciones) el 23/01/2006 06:37:13
Hola !!, quiero ingresar datos en una tabla usando un grid y un cursor.
y he intentado con el siguiente codigo en el procedimiento KeyPress en thisformset.form3.grid1.column1.text1.value
LPARAMETERS nKeyCode, nShiftAltCtrl
IF nkeycode = 13
SELECT cursordetalle
APPEND blank
SELECT articulos
SET ORDER TO tag xcodigoa
SEEK thisformset.form3.grid1.column1.text1.value
IF FOUND()
replace cursordetalle.descripcion WITH articulos.descripcion
replace cursordetalle.c WITH detalle.c
ENDIF
ENDIF
la propiedad ReadOnLy esta en falso. y allowaddnew en verdadero es decir t.
El cursor esta creado en el procedimiento BeforeOpenTable en el entorno de datos.
Cuando ejecuto mi formulario y hago clic en la primera celda, esta no me permite ingrarsar ningún dato ¿ porque ?
alguien sería tan amable de explicarme.
y he intentado con el siguiente codigo en el procedimiento KeyPress en thisformset.form3.grid1.column1.text1.value
LPARAMETERS nKeyCode, nShiftAltCtrl
IF nkeycode = 13
SELECT cursordetalle
APPEND blank
SELECT articulos
SET ORDER TO tag xcodigoa
SEEK thisformset.form3.grid1.column1.text1.value
IF FOUND()
replace cursordetalle.descripcion WITH articulos.descripcion
replace cursordetalle.c WITH detalle.c
ENDIF
ENDIF
la propiedad ReadOnLy esta en falso. y allowaddnew en verdadero es decir t.
El cursor esta creado en el procedimiento BeforeOpenTable en el entorno de datos.
Cuando ejecuto mi formulario y hago clic en la primera celda, esta no me permite ingrarsar ningún dato ¿ porque ?
alguien sería tan amable de explicarme.
Valora esta pregunta


0