Humberto,
no se de que manera lo estarás haciendo, te explico como lo hago yo:
Yo utilizo la Tecla F5(nKeyCode -4),
El siguiente código debe ir en el Keypress del objeto Textbox, del cual vas a llamar el formulario
evento keypress
LPARAMETERS nKeyCode, nShiftAltCtrl
IF nKeyCode = 13 OR nKeyCode = 9
ThisForm.Tecla = .T.
ENDIF
IF nKeyCode=-4 &&& SE HA PRESIONADO LA TECLA F5
IF !EMPTY(_SCREEN.MiClase.cValorDevuelto)
ThisForm.Tecla = .t.
This.value = _SCREEN.MiClase.cValorDevuelto
ThisForm.Tecla = .T.
KEYBOARD '{Tab}'
ELSE
ThisForm.Tecla = .F.
ENDIF
ENDIF
En el formulario de consulta ( quiere decir el form que devuelve el valor) tengo un commandbutton donde coloco lo siguiente :
_screen.miclase.mipropiedad = "ABC001"
DONDE :
- miclase es una clase que la adiciono al screen y tiene una propiedad llamada mipropiedad la cual me sirve para guardar el código que me devuelve el form.
-"ABC001" es el código devuelto por el form.
Espero se entienda y que te sirva, si tienes alguna duda puedes contactarme en jesusrojas00@hotmail.com
Saludos
JESUS ROJAS
Jesús Rojas Cárdenas
Analista Programador
Lima-Perú