Kbase P107866: how to print multiple form headers using 4GL?
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  16/10/2008 |
|
Status: Unverified
GOAL:
how to print multiple form headers?
GOAL:
Printing multiple headers via 4GL
GOAL:
How to print a different form header based on page number?
FACT(s) (Environment):
Progress 9.x
OpenEdge 10.x
FIX:
OUTPUT TO report.txt PAGED PAGE-SIZE 10.
FORM HEADER "Customer Report" "Page" AT 60 PAGE-NUMBER FORMAT ">>>9"
WITH FRAME hdr1.
FORM HEADER "Customer Report (continued)"
"Page" AT 60 PAGE-NUMBER FORMAT ">>>9"
WITH FRAME hdr2.
FORM HEADER "Customer Report (continued - page2)"
"Page" AT 60 PAGE-NUMBER FORMAT ">>>9"
WITH FRAME hdr3.
FOR EACH customer:
IF PAGE-NUMBER = 1 THEN DO:
VIEW FRAME hdr1.
DISPLAY SKIP(1) NAME WITH NO-LABELS.
HIDE FRAME hdr1.
END.
IF PAGE-NUMBER = 2 THEN DO:
VIEW FRAME hdr3.
DISPLAY SKIP(1) NAME WITH NO-LABELS.
HIDE FRAME hdr3.
END.
IF PAGE-NUMBER > 2 THEN DO:
VIEW FRAME hdr2.
DISPLAY SKIP(1) NAME WITH NO-LABELS.
HIDE FRAME hdr2.
END.
PAGE.
END.