PL/SQL函数如何显示加薪后的薪资和超过10000的薪资

CREATE OR REPLACE FUNCTION calculate_salary_increase(p_salary NUMBER, p_increase_rate NUMBER)
RETURN NUMBER
IS
  v_new_salary NUMBER;
BEGIN
  v_new_salary := p_salary + (p_salary * p_increase_rate);
  
  IF v_new_salary > 10000 THEN
    RETURN v_new_salary;
  ELSE
    RETURN NULL;
  END IF;
END;
/

DECLARE
  v_salary NUMBER := 8000;
  v_increase_rate NUMBER := 0.1;
  v_new_salary NUMBER;
BEGIN
  v_new_salary := calculate_salary_increase(v_salary, v_increase_rate);
  
  IF v_new_salary IS NOT NULL THEN
    DBMS_OUTPUT.PUT_LINE('加薪后的薪资为：' || v_new_salary);
  ELSE
    DBMS_OUTPUT.PUT_LINE('薪资未超过10000，无需加薪');
  END IF;
END;
/