REPORT report-name (argument-list)
DEFINE variable-list { type | LIKE table-column |
RECORD { LIKE table.* | variable-list type [,...]
END RECORD } }[,...]
[OUTPUT :
[REPORT TO { "filename | PIPE "program" | PRINTER } ]
SCREEN
[ LEFT MARGIN integer ] 5
[ RIGHT MARGIN integer ] 132
[ TOP MARGIN integer ] 3
[ BOTTOM MARGIN integer ] 3
[ PAGE LENGTH integer ] 66
]
[ORDER [EXTERNAL] BY sort-list ] ,
FORMAT EVERY ROW .
.
FORMAT ,
4GL REPOR
ON EVERY ROW
statement
. . .
FIRST PAGE HEADER
statement
. . .
ON LAST ROW REPORT ( )
statement
. . .
PAGE HEADER
statement
. . .
PAGE TRAILER
statement
. . .
BEFORE GROUP OF variable
statement
. . .
. . .
AFTER GROUP OF variable
statement
. . .
. . .
END REPORT
4GL :
NEED num-expr LINES
expr , .
PAUSE [""]
CR
PRINT FILE "filename"
SKIP { integer LINE | TO TOP OF PAGE }
PRINT [;]
[ ]
num-expr SPACES
char-exp WORDWRAP [RIGHT MARGIN integer]
LINENO
PAGENO
[GROUP] functio [WHERE ]
[ ] [ ,
]
functio :
{ COUNT(*) | PERCENT(*) | { SUM | MAX | MIN | AVG }(expr) }
-
Last-modified: Tue, 25 Nov 1997 07:26:01 GMT