Changeset 4338 for trunk/projects/bos
- Timestamp:
- 03/11/09 10:27:42 (18 months ago)
- Files:
-
- 1 modified
-
trunk/projects/bos/queries.lisp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/projects/bos/queries.lisp
r4337 r4338 2 2 3 3 ;; contracts processed by gitte 4 5 ;; almost like 6 ;; select year, sum(contract-price) from contract where contract-paidp like "gitte" group by year(contract-date) 7 4 8 (loop for year from 2007 upto 2009 5 9 do (format t "~A: ~A~%"
