Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Getting the total pages.
Message
From
01/12/1999 07:41:36
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Title:
Getting the total pages.
Miscellaneous
Thread ID:
00297238
Message ID:
00297238
Views:
39
Hello alls
Some days ago I could see a thread about the total page from the report, someones helped to solve this problem, but know I have something like that with the diferent is that when I run this code:

parameter cto, inicio, final
public totalpaginas
select 0
use ttidist alias reporte
select * from ttidist into cursor repxcto ;
where circuito=cto and fecha_opr between inicio and final ;
order by fecha_opr
report form repxcto to prompt noconsole
totalpaginas = _pageno
report form repxcto preview noconsole
use in repxcto
close all
return .t.

this code work good, but when I put the same code into the form it doesn´t work.
Is there anybody know why...?????
P.D. The code that I´m using in the form is:
public inicio, final, totalpaginas
store thisform.cpodesde.value to inicio
store thisform.cpohasta.value to final
local respuesta
respuesta=messagebox("Dou you want see the report in a view or rather send it to print.?", 67,"Message")
do case
case respuesta=6
set filter to betw(fecha_opr, inicio, final)
do form ver_resultados_tti
case respuesta=7
select * from ttidist into cursor repopdis ;
where fecha_opr between inicio and final ;
order by fecha_opr
report form repopdis to prompt noconsole
totalpaginas = _pageno
report form repopdis to print noconsole
sele ttidist
endcase
thisform.refresh

Thanks in advances.
Next
Reply
Map
View

Click here to load this message in the networking platform