>hola amigos tengo un problema creo un reporte y lo voy a imprimir y lo que hace es imprimirme todos los datos de la tabla , como hago para que solo me imprima el dato que acabo de crear o el que tengo en pantalla en ese momento.

Recomiendo que el informe no tenga tablas en su DataEnvironment. Luego, simplemente seleccionas los datos deseados - incluso puedes usar el mismo informe para imprimir datos en diferente orden, según opciones del usuario.

Por ejemplo, en una pantalla tienes opciones que puede seleccionar el usuario, para un listado de clientes:

* En botón para imprimir

* Opciones para ordenar
local lcOrderBy, lcWhere
if ThisForm.OpgOrderBy = 1 && por código
  lcOrderBy = "order by Codigo"
else  && por nombres
  lcOrderBy = "order by Apellido, Nombre"
endif

* Activos vs. inactivos
do case
case ThisForm.OpgActivos = 1 && Activos
  lcWhere = "where Activos"
case ThisForm.OpgActivos = 2 && Inactivos
  lcWhere = "where not Activos"
otherwise && Todos
  lcWhere = ""
endcase

* Seleccionar datos
select * from Cliente;
  &lcOrderby;
  &lcWhere;
  into cursor TempReport

* Mostrar informe
do case
case ThisForm.OpgDestino = 1 && preview
  report form Cliente preview
...