PL/SQL的BOOLEAN的三个值:TRUE,FALSE,NULL

Oracle的PL/SQL中的BOOLEAN类型有三个取值，分别是TRUE、FALSE以及NULL。这三个值会给开发的时候造成不必要的麻烦，例如

  

DECLARE  B_FLAG_TRUE BOOLEAN := TRUE;  B_FLAG_FALSE BOOLEAN := FALSE;  B_FLAG_NULL BOOLEAN :=NULL;BEGIN    IF (B_FLAG_NULL AND B_FLAG_TRUE) THEN        DBMS_OUTPUT.PUT_LINE('NULL AND TRUE');    END IF;    IF NOT (B_FLAG_NULL AND B_FLAG_TRUE) THEN        DBMS_OUTPUT.PUT_LINE('NOT (NULL AND TRUE)');    END IF;END;

  

  上面的两个判断，均没有输出字符，因此，我们需要看一下问题出在什么地方：

DECLARE  B_FLAG_TRUE BOOLEAN := TRUE;  B_FLAG_FALSE BOOLEAN := FALSE;  B_FLAG_NULL BOOLEAN :=NULL;  B_FLAG_RESULT BOOLEAN;  FUNCTION TSBOOLEAN (B_FLAG BOOLEAN)RETURN VARCHAR2 IS    BEGIN      RETURN CASE B_FLAG                     WHEN TRUE THEN 'TRUE'                     WHEN FALSE THEN 'FALSE'                     ELSE 'NULL'                  END;  END TSBOOLEAN;BEGIN  B_FLAG_RESULT :=(B_FLAG_NULL AND B_FLAG_TRUE) ;  DBMS_OUTPUT.PUT_LINE(TSBOOLEAN(B_FLAG_RESULT));    IF B_FLAG_RESULT THEN        DBMS_OUTPUT.PUT_LINE(''||'==>'||'');    END IF;    IF NOT B_FLAG_RESULT THEN        DBMS_OUTPUT.PUT_LINE(''||'==>'||'');    END IF;END;

  原来，上面的输出结果是NULL，所以有一个规范：“我们必须要预料到布尔表达式的结果会存在NULL值，因此必须使用NVL()函数来避免不可预料的结果的发生！”。根据实际的结果值进行如下操作：

DECLARE  B_FLAG_TRUE BOOLEAN := TRUE;  B_FLAG_FALSE BOOLEAN := FALSE;  B_FLAG_NULL BOOLEAN :=NULL;  B_FLAG_RESULT BOOLEAN;BEGIN  B_FLAG_RESULT := (NVL(B_FLAG_NULL,FALSE) AND B_FLAG_TRUE);    IF (B_FLAG_RESULT) THEN        DBMS_OUTPUT.PUT_LINE('NULL AND TRUE');    END IF;    IF NOT B_FLAG_RESULT THEN        DBMS_OUTPUT.PUT_LINE('NOT (NULL AND TRUE)');    END IF;END;

  让我们来看一下，在什么情况下会出现NULL值？

DECLARE    TYPE T_ARR IS  ARRAY(3) OF BOOLEAN;    B_ARRAY T_ARR := T_ARR(TRUE,FALSE,NULL);    B_FLAG BOOLEAN;    V_STR VARCHAR2(100);   FUNCTION TSBOOLEAN (B_FLAG BOOLEAN)RETURN VARCHAR2 IS    BEGIN      RETURN CASE B_FLAG                     WHEN TRUE THEN 'TRUE'                     WHEN FALSE THEN 'FALSE'                     ELSE 'NULL'                  END;    END TSBOOLEAN;BEGIN  FOR K IN 1..2 LOOP     FOR I IN 1..3 LOOP       FOR J IN 1..3 LOOP          V_STR :=TSBOOLEAN(B_ARRAY(I));          IF K = 1 THEN             V_STR := V_STR||' AND ';            B_FLAG := (B_ARRAY(I) AND B_ARRAY(J));          ELSE            V_STR := V_STR||' OR ';            B_FLAG := (B_ARRAY(I) OR B_ARRAY(J));          END IF;          V_STR := V_STR||TSBOOLEAN(B_ARRAY(J))||' ==> ';          DBMS_OUTPUT.PUT_LINE (V_STR||TSBOOLEAN(B_FLAG));       END LOOP;     END LOOP;  END LOOP;END;

  输出的结果如下：

TRUE AND TRUE ==> TRUE

TRUE AND FALSE ==> FALSE

TRUE AND NULL ==> NULL

FALSE AND TRUE ==> FALSE

FALSE AND FALSE ==> FALSE

FALSE AND NULL ==> FALSE

NULL AND TRUE ==> NULL

NULL AND FALSE ==> FALSE

NULL AND NULL ==> NULL

TRUE OR TRUE ==> TRUE

TRUE OR FALSE ==> TRUE

TRUE OR NULL ==> TRUE

FALSE OR TRUE ==> TRUE

FALSE OR FALSE ==> FALSE

FALSE OR NULL ==> NULL

NULL OR TRUE ==> TRUE

NULL OR FALSE ==> NULL

NULL OR NULL ==> NULL