FoxPro/Visual FoxPro - imprimir

buenas amigos tengo este codigo para imprimir pero me imprime todo lo que tengo en la base de datos como hago para que me imprima solo lo que tengo en pantalla en el formulario

imprime=MESSAGEBOX("Desea Imprimir este registro?",4+48,"Imprimir")
IF imprime=6
REPORT FORM "planilla3030.frx" preview
ELSE
ENDIF

Hola....
creo que colocando un FOR al report form es suficiente:

imprime=MESSAGEBOX("Desea Imprimir este registro?",4+48,"Imprimir")
IF imprime=6
REPORT FORM "planilla3030.frx" FOR textbox = tabla.campo preview
ELSE
ENDIF

donde tabla.campo corresponda a un campo de tu tabla que se a unico (un ID por ejemplo) , y textbox porsupuesto es el textbox de tu formulario en el que esta este valor.

...

Los report siempre imprimen todos los registros de la tabla en uso, lo mismo antes de lanzar el report es mas facil crear unb cursor con los datos que quieres imprimir y despues lo cierras con lo que desaparece de memoria y vuelves a la tabla que tenias activa