CREATE OR REPLACE PACKAGE telsale_archievement_pkg IS

    -- Author  : WANGWEI-202
    -- Created : 2023/3/10 15:13:34
    -- Purpose : 桌面霸屏项目基础数据生成包

    PROCEDURE department_attaching_rate
    (
        department_code IN VARCHAR2,
        attaching_rate  OUT VARCHAR2
    );

END telsale_archievement_pkg;
/
CREATE OR REPLACE PACKAGE BODY telsale_archievement_pkg IS

    -- 保费渗透率
    PROCEDURE department_attaching_rate
    (
        department_code IN VARCHAR2,
        attaching_rate  OUT VARCHAR2
    ) IS
        l_this_month VARCHAR2(4);
    BEGIN
        l_this_month := to_char(SYSDATE,
                                'mm') || '月';
    
        SELECT round((SUM(cf.车非融合保费) / SUM(cf.车险个人客户保费) * 100),
                     2) || '%'
          INTO attaching_rate
          FROM 车非每日保费 cf
         WHERE cf.月份 = l_this_month
           AND 部门代码 = department_code;
    END;

BEGIN
    NULL;
END telsale_archievement_pkg;
/