create or replace procedure EMPLOYEEMOVE_PROCE
(
QUERYYEAR in varchar2,
QUERYMONTH in varchar2,
CUSTOMERID in varchar2,
CUSTOMERSERVICE in varchar2,
p_GetData out GetDataSet.GETCUR
)
AS
STRSQL varchar2(10000);
STRWHERE varchar2(200);
begin
IF (CUSTOMERID IS NOT NULL) THEN
STRWHERE := ' AND 客户编码='|| CUSTOMERID;
END IF;
IF (CUSTOMERSERVICE IS NOT NULL) THEN
STRWHERE := STRWHERE || ' AND 客服专员='|| CUSTOMERSERVICE;
END IF;
STRSQL :=
'SELECT 客服专员,客户编码,客户名称,所属员工总数,所属员工累计离职数,所属员工在职数,当月新进员工数,当月离职员工数,差数
FROM t6
WHERE 1=1 ';
open p_GetData for (STRSQL || STRWHERE);
end;
--包体
CREATE OR REPLACE PACKAGE GetDataSet IS
TYPE GETCUR IS REF CURSOR;
END GetDataSet;create or replace procedure EMPLOYEEMOVE_PROCE