problema con do while usando un reporte en el ciclo

84 views
Skip to first unread message

JuanK

unread,
Jul 12, 2017, 1:31:21 PM7/12/17
to Comunidad de Visual Foxpro en Español
Saludos amigos

tengo un problema y he intentado varias cosas y nada, ha veces puede ser algo insignificante pero yo no lo encuentro y talves ustedes puedan ayudar.
select mitabla
go top
DO WHILE NOT EOF()
                vtramite=tramite
                vcuerpo="informacion de otros campos de una tabla
                REPORT FORM constancia TO PRINTER PREVIEW  //este reporte no tiene DATAENVIROMENT solo carga las variables anteriores
                SKIP
 ENDDO

el problema se presenta en que cada ves que sale del reporte la posicion vuelve al primer registro, solamente lo hace con el 1 y 2, de ahi vuelve al primero.

espero sea suficiente informacion para que puedan ayudarme

ZeRoberto

unread,
Jul 12, 2017, 1:33:20 PM7/12/17
to publicesvfoxpro
Graba la posicion antes de entrar a reportarlo y luego lo restauras y haces skip

Saludos

JuanK

unread,
Jul 12, 2017, 1:53:54 PM7/12/17
to Comunidad de Visual Foxpro en Español
ZeRoberto gracias por contestar, seria mucho pedir el ejemplo, mira que no comprendo como hacerlo

ZeRoberto

unread,
Jul 12, 2017, 1:56:43 PM7/12/17
to publicesvfoxpro
Bueno seria algo asi no?

SELECT mitabla
GO TOP

DO WHILE NOT EOF()
   vtramite=tramite
   vcuerpo="informacion de otros campos de una tabla"
   lnRecno = Recno()

   REPORT FORM constancia TO PRINTER PREVIEW 
   Go (lnRecno)
   SKIP 
ENDDO


JuanK

unread,
Jul 12, 2017, 2:02:27 PM7/12/17
to Comunidad de Visual Foxpro en Español
eres un crack, mil gracias

ZeRoberto

unread,
Jul 12, 2017, 2:02:58 PM7/12/17
to publicesvfoxpro
Funciono?


Víctor Hugo Espínola Domínguez

unread,
Jul 12, 2017, 2:08:56 PM7/12/17
to publice...@googlegroups.com
Creo que debe ser así:

REPORT FORM constancia TO PRINTER PREVIEW NEXT 1

Probablemente con eso ya no tengas necesidad de guardar el nro. de registro.

Saludos,
Víctor.
Lambaré - Paraguay.

JuanK

unread,
Jul 12, 2017, 4:54:21 PM7/12/17
to Comunidad de Visual Foxpro en Español
si funciono a la perfección muchas gracias de nuevo
Reply all
Reply to author
Forward
0 new messages