diff options
Diffstat (limited to 'tests/window.ur')
-rw-r--r-- | tests/window.ur | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/window.ur b/tests/window.ur index fd93679c..dc338a43 100644 --- a/tests/window.ur +++ b/tests/window.ur @@ -3,9 +3,11 @@ table empsalary : { Depname : string, Salary : int } fun main () : transaction page = - x <- queryX (SELECT empsalary.Depname, empsalary.Empno, empsalary.Salary, RANK() AS R + x <- queryX (SELECT empsalary.Depname, empsalary.Empno, empsalary.Salary, + RANK() OVER (PARTITION BY empsalary.Depname ORDER BY empsalary.Salary DESC) AS R, + AVG(empsalary.Salary) OVER (PARTITION BY empsalary.Depname) AS A FROM empsalary) - (fn r => <xml>{[r.Empsalary.Depname]}, {[r.Empsalary.Empno]}, {[r.Empsalary.Salary]}, {[r.R]}<br/></xml>); + (fn r => <xml>{[r.Empsalary.Depname]}, {[r.Empsalary.Empno]}, {[r.Empsalary.Salary]}, {[r.R]}, {[r.A]}<br/></xml>); return <xml><body> {x} </body></xml> |