PROCEDURE GetDeptTree