CREATE OR REPLACE PACKAGE telsale_policy_check_pkg IS

    -- Author  : 王炜
    -- Created : 2021/6/21 10:18:01
    -- Purpose : 电销保单数据验证

    FUNCTION policy_check(a_policy_no VARCHAR2) RETURN BOOLEAN;

    FUNCTION staff_check(a_stuff_code VARCHAR2) RETURN BOOLEAN;

END telsale_policy_check_pkg;
/
CREATE OR REPLACE PACKAGE BODY telsale_policy_check_pkg IS

    FUNCTION staff_check(a_stuff_code VARCHAR2) RETURN BOOLEAN IS
        l_count INTEGER;
    BEGIN
        SELECT COUNT(*)
          INTO l_count
          FROM idst0.rydm_t@xmcx1.cpicxm ry
         WHERE ry.staff_code = a_stuff_code;
    
        IF l_count = 0
        THEN
            RETURN FALSE;
        END IF;
    
        RETURN TRUE;
    END;

    FUNCTION policy_check(a_policy_no VARCHAR2) RETURN BOOLEAN IS
        l_count INTEGER;
    BEGIN
        SELECT COUNT(*)
          INTO l_count
          FROM idst0.auto_agreement_t@xmcx1.cpicxm a
         WHERE a.policy_no = a_policy_no;
    
        IF l_count = 0
        THEN
            RETURN FALSE;
        END IF;
    
        RETURN TRUE;
    END;
BEGIN
    NULL;
END telsale_policy_check_pkg;
/