Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
VFP 7 consecutive report page numbers in the preview
Message
De
20/04/2006 16:15:34
 
 
À
20/04/2006 14:26:14
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Versions des environnements
Visual FoxPro:
VFP 7 SP1
OS:
Windows XP SP2
Database:
Visual FoxPro
Divers
Thread ID:
01115079
Message ID:
01115133
Vues:
9
FYI for those who've had the same issue I have just asked for assistance with. I have resolved the issue and yes indeedie it can be done without upgrading, a third party product, or printing to a PDF.

Using the same logic of setting a Private nOffset = 0 and incrementing nOffset = nOffset + _PageNo. When Printing consecutive reports and continuing page numbers from report to report.

EXAMPLE :: As in the following when Printing:

Private nOffset
nOffset = 0

= SYS(1037)
*!* REPORT 1
IF RECCOUNT("c_summary")<1
else
REPORT FORM youreportnamehere.frx NOCONSOLE TO PRINTER
nOffset = nOffset + _pageno
ENDIF
*!* REPORT 2
IF RECCOUNT("c_summary")<1
else
REPORT FORM youreportnamehere.frx NOCONSOLE TO PRINTER
nOffset = nOffset + _pageno
ENDIF
*!* REPORT 3 etc. etc
IF RECCOUNT("c_summary")<1
else
REPORT FORM youreportnamehere.frx NOCONSOLE TO PRINTER
nOffset = nOffset + _pageno
ENDIF


SOLVED WITH :: My solution was as follows:

In a right click event of a command button:

PUBLIC nOffset
nOffset = 0
*!* Report 1
IF RECCOUNT("c_reportdata")<1
else
REPORT FORM youreportnamehere.frx PREVIEW
nOffset = nOffset + _pageno
ENDIF
*!* Report 2
IF RECCOUNT("c_reportdata")<1
else
REPORT FORM youreportnamehere.frx PREVIEW
nOffset = nOffset + _pageno
ENDIF
*!* Report 3 and etc. etc.
IF RECCOUNT("c_reportdata")<1
else
REPORT FORM youreportnamehere.frx PREVIEW
nOffset = nOffset + _pageno
ENDIF

RELEASE nOffset

This effectively put the correct page number upon the preview of each of my reports with no hassle. As long as in the report control that displayed the page number the following line was used.

"Page"+space(1)+alltrim(str(_pageno + nOffset))

I have to give thanks to the suggestions here on the UT but through some trial and error and a little help from Cathy Pountney's book I've solved my own issue. Hopefully, if anyone needs this information what I've provided herin will help tremendously.

Thanks,

Steve
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform