Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Print footnote on the last page only
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Divers
Thread ID:
00754364
Message ID:
00754367
Vues:
19
>Hi..... Suppose I design an Invoice which every invoice has footnote to be printed on
>the last page of the invoice. However I could not put on to summary banner, as it is
>printed only once. I want it is printed per invoice.
>How can I do it? Is there any variable to force to go to next page?

This is untested, but it should work.

Create a variable called lFootnote which is in scope for the whole report -- in other words, create it in the calling program, and don't declare it LOCAL (even though that may not matter for a report).

Create the following procedure.
PROCEDURE SetFoot
   LPARAMETERS tlSetFoot
   lFootnote = tlSetFoot
   RETURN
ENDPROC
Create a Data Grouping on the invoice number.

Double-click on the Group Footer. Put "SetFoot(.T.)" in the On Exit textbox.

Double-click on the Group Header. Put "SetFoot(.F.)" in the On Entry textbox.

Put the footnote in the Page Footer. Set the Print When dialog to "tlSetFoot = .T."

When I try to code after midnight, it usually doesn't work right, so take the above with a grain of salt. :-)
My blog
My consulting page
My home page

Member of the Trim Your Auto-Quote Campaign!
What's another word for thesaurus?
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform