MES取所有部门的函数实例

USE [ChangHong]
GO
/****** Object: UserDefinedFunction [dbo].[FN_GetDeptCode] Script Date: 04/26/2016 14:32:24 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
/*************
creator: Wuchun
create date: 2012.12.17
Module: Public
Remark: 返回所有子级部门
**************/
ALTER FUNCTION [dbo].[FN_GetDeptCode](
@r_DeptCode varchar(50)
)
returns @Department table(DeptCode varchar(50),ParentDeptCode varchar(50),level int)
as
begin

WITH Department(deptcode,deptname,parentdeptCode,level)
AS
(
SELECT deptcode,deptname,parentdeptCode,1 AS level FROM Sys_Department
where parentdeptCode= @r_DeptCode
UNION ALL
SELECT l.deptcode,l.deptname,l.parentdeptCode,level+1 FROM Sys_Department l
INNER JOIN Department p ON l.parentdeptCode=p.deptcode
)
insert into @Department(DeptCode ,ParentDeptCode, level)
SELECT deptcode, parentdeptCode,level
FROM Department
UNION
SELECT deptcode,parentdeptCode, 0 AS loclevel
FROM SYS_Department
WHERE (deptcode=@r_DeptCode or @r_DeptCode = '')
return
end