desktop_task_schedule/code/db/pkg/telsale_archievement_pkg.pck

60 lines
1.6 KiB
Plaintext

CREATE OR REPLACE PACKAGE telsale_archievement_pkg IS
-- Author : WANGWEI-202
-- Created : 2023/3/10 15:13:34
-- Purpose : 桌面霸屏项目基础数据生成包
PROCEDURE department_archievement
(
a_department_code IN VARCHAR2,
a_attaching_rate OUT VARCHAR2,
a_renewal_rate OUT VARCHAR2
);
END telsale_archievement_pkg;
/
CREATE OR REPLACE PACKAGE BODY telsale_archievement_pkg IS
-- 保费渗透率
PROCEDURE department_archievement
(
a_department_code IN VARCHAR2,
a_attaching_rate OUT VARCHAR2,
a_renewal_rate OUT VARCHAR2
) IS
l_this_month VARCHAR2(4);
l_department_name VARCHAR2(100);
BEGIN
l_this_month := to_char(SYSDATE,
'mm') || '月';
SELECT decode(SUM(cf.车险个人客户保费),
0,
0,
round((SUM(cf.车非融合保费) / SUM(cf.车险个人客户保费) * 100),
2))
INTO a_attaching_rate
FROM 车非每日保费 cf
WHERE cf.月份 = l_this_month
AND 部门代码 = a_department_code;
SELECT bm.department_name
INTO l_department_name
FROM idst0.bm_t bm
WHERE bm.department_code = a_department_code;
SELECT decode(SUM(到期数),
0,
0,
round(SUM(已续保累计) / SUM(到期数) * 100,
2))
INTO a_renewal_rate
FROM 坐席续保统计
WHERE 部门 = l_department_name;
END;
BEGIN
NULL;
END telsale_archievement_pkg;
/