Consultor Eletrônico



Kbase P104683: How to use PAGE-BOTTOM?
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   1/19/2006
Status: Unverified

GOAL:

How to use PAGE-BOTTOM?

GOAL:

PAGE-BOTTOM Statement

FIX:

If you are working in a PAGE-TOP or PAGE-BOTTOM frame, use the VIEW or DISPLAY statement to activate that frame. The VIEW statement does not display a PAGE-TOP or PAGE-BOTTOM frame. It activates the frame so that when a new page begins or ends, Progress displays the frame. If you use the HIDE statement to hide a PAGE-TOP or PAGE-BOTTOM frame, Progress deactivates that frame so that it can no longer be displayed unless it is reactivated with a VIEW or DISPLAY statement.
This example shows the usage of PAGE-BOTTOM in a Frame.
The example is copied from the Progress 4GL Language Tutorial for Character Manual, developed with Progress version 8 Database (Sports.db). It will not run against Sports2000.db Database.
DEFINE FRAME f-body
Name NO-LABEL
Balance AT 40 FORMAT "$zzz,zz9.99 CR" SKIP
Contact
Credit-Limit AT 40 FORMAT "$zzz,zz9.99 CR" SKIP
Address NO-LABEL SKIP
Phone SKIP(2)
WITH SIDE-LABELS STREAM-IO.
OUTPUT TO "tut-temp.txt" PAGE-SIZE 25.
FOR EACH Customer FIELDS (balance Sales-Rep name
Contact Credit-Limit Address City State Postal-Code Phone)
WHERE Balance >= 1400 BREAK BY Sales-Rep:
DEFINE FRAME f-hdr
HEADER
"Date:" TODAY "Customer Report" AT 25
sales-rep AT 55
"Page" AT 65
PAGE-NUMBER FORMAT ">>9" SKIP(1)
WITH PAGE-TOP FRAME f-hdr STREAM-IO.
DEFINE FRAME f-ftr
HEADER
"Customer Report"
"continued next page"
WITH FRAME f-ftr PAGE-BOTTOM CENTERED STREAM-IO.
VIEW FRAME f-hdr.
VIEW FRAME f-ftr.
DISPLAY Name Balance Contact Credit-Limit Address
(City + ", " + St + ", " + Postal-Code) @ Address Phone
WITH FRAME f-body.
IF LAST-OF(Sales-Rep) THEN DO:
HIDE FRAME f-ftr.
PAGE. END. END.
OUTPUT CLOSE.