:


DREPORTE report-name (argument-list)

DDEFINEE variable-list { type | LIKE table-column |
   RECORD  { LIKE table.* | variable-list  type [,...] END RECORD }}[,...]

[DOUTPUTE                        :

  [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
]

[DORDERE [EXTERNAL] BY  sort-list ]  ,   


DFORMAT EVRY ROWE     .
                      .
        

DFORMATE       ,  
   4GL      REPORT

  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
          . . .
   . . .
DEND REPORTE

      4GL :

NEED num-expr LINES          expr , 
                            .

PAUSE ["" ]           CR

PRINT FILE "filename"       

SKIP { integer LINE | TO TOP OF PAGE }

PRINT   expr-list   [;]    [    ]


        D REPORT    :E

num-expr SPACES                           
char-exp WORDWRAP [RIGHT MARGIN integer]   

LINENO             
PAGENO            

        D :E

[GROUP]   DfunctionE   [WHERE  ]
[  ]   [  ,  ]

 DfunctionE  :
{ COUNT(*) | PERCENT(*) | { SUM | MAX | MIN | AVG }(expr) }
                                   
          - 

        D  4GL (.  h4fu)E

Last-modified: Thu, 12 Feb 1998 08:47:55 GMT

  :