IN参数初始化中使用的UPPER函数未按预期工作

Question

CREATE OR REPLACE PROCEDURE appraisal
  (p_grade IN VARCHAR2 := UPPER(' '))
IS
 v_appraisal VARCHAR2(20) := '';
BEGIN
 v_appraisal := CASE p_grade
     WHEN 'A' THEN 'Excellent'
     WHEN 'B' THEN 'Very good'
     WHEN 'C' THEN 'Bad'
     ELSE 'No such grade!'
     END;
 DBMS_OUTPUT.PUT_LINE('Grade:-'||p_grade ||' Appraisal:-'|| v_appraisal);
END;
/

EXECUTE appraisal('a');

输出：

Grade:-a Appraisal:-No such grade!"

我想知道为什么这不起作用-我做错了什么？

Answer 1

UPPER()函数确实返回传递给它的所有内容的大写版本，但是在默认子句中，您传递的是文字' ' ，它是一个空格。 空格没有大小写，因此小写和大写之间没有区别-这个概念没有任何意义。 您没有将过程的参数值传递给该函数。

如果调用方不提供默认值，则defaut子句可提供默认值。 因此，如果您确实execute appraisal; 然后在该过程中调用p_grade变量（如果有一个空格）将具有一个值，这无济于事，也不是您想要的。 您真的根本不需要默认值。

就像@DavidFaber所说的那样，您需要在评估它时获得与参数值相等的大写字母，因此您可以执行以下操作：

CREATE OR REPLACE PROCEDURE appraisal
  (p_grade IN VARCHAR2)
IS
 v_appraisal VARCHAR2(20);
BEGIN
 v_appraisal := CASE UPPER(p_grade)
     WHEN 'A' THEN 'Excellent'
     WHEN 'B' THEN 'Very good'
     WHEN 'C' THEN 'Bad'
     ELSE 'No such grade!'
     END;
 DBMS_OUTPUT.PUT_LINE('Grade:-'|| UPPER(p_grade)
  ||' Appraisal:-'|| v_appraisal);
END;
/

您可以声明Alternativley的局部变量，该变量设置为大写值并使用：

 v_grade varchar2(1) := UPPER(p_grade);

通常，您不应假定任何调用您的过程的人都会显示dbms_output缓冲区。 可以在可以控制调用环境的地方进行调试或试验，但通常不能在实际代码中进行。 例如，您实际上可能需要一个返回v_appraisal值的函数。 这是simole函数版本的SQL Fiddle演示 。 或者只是一个查找表，其中包含成绩及其说明。