/*
 * here is a POSTQUEL function with a class as an argument
 * it defines a complex object manager of type emp for each 
 * employee
 */
define function manager_2 ( language = "postquel",
			    returntype = emp )
    arg is (emp)
    as retrieve (e.all) from e in emp
       where e.name  = dept.mgrname and dept.dname = current.dept
\g
