PL/SQL 如何输出布尔型

1、布尔型的声明与赋值
	PL/SQL提供的两个表示布尔值的直接量为TRUE和FALSE。这些值不是字符串，我们也不用加引号。
	可以直接用布尔直接量给布尔类型变量赋值。
--声明与赋值示例		
DECLARE
   is_boolean   BOOLEAN;          -- 声明一个布尔类型变量
BEGIN
   is_boolean  := FALSE;          -- 给这个变量赋值
END;

--缺省情况下，布尔型的默认值为false
DECLARE
   v_boolean   BOOLEAN;
BEGIN
   IF v_boolean THEN
      DBMS_OUTPUT.put_line( 'true' );
   ELSE
      DBMS_OUTPUT.put_line( 'false' );
   END IF;
END;
false

PL/SQL procedure successfully completed.

	只有TRUE、FALSE 和NULL 才可以赋给布尔类型的变量。
	当表达式中使用关系操作符的时候，返回结果也是布尔类型的值，如下面的示例:
		
	v_flag := (count > 200);

2、如何输出布尔型
--下面的例子是一个使用put_line函数输出的情形
SQL> DECLARE
  2     v_bool   BOOLEAN;
  3  BEGIN
  4     v_bool      := TRUE;
  5     DBMS_OUTPUT.put_line( 'The value if v_bool is ' || v_bool );
  6  END;
  7  /
   DBMS_OUTPUT.put_line( 'The value if v_bool is ' || v_bool );
                         *
ERROR at line 5:
ORA-06550: line 5, column 26:
PLS-00306: wrong number or types of arguments in call to '||'
ORA-06550: line 5, column 4:
PL/SQL: Statement ignored
--上面在输出布尔型的时候收到了错误提示PLS-00306
--在这个地方需要注意的是使用PUT_LINE函数，由于dbms_output函数的参数本身并不支持boolean型，因此给出了错误提示
--下面是PUT_LINE函数参数的描述
SQL> desc dbms_output
PROCEDURE PUT_LINE
 Argument Name                  Type                    In/Out Default?
 ------------------------------ ----------------------- ------ --------
 A                              VARCHAR2                IN
 
可以通过调用dbms_sqltcb_internal包中i_convert_from_boolean函数来实现，调用时应具有相应的权限。
 SQL> DECLARE
  2     v_bool   BOOLEAN;
  3  BEGIN
  4     v_bool      := TRUE;
  5  DBMS_OUTPUT.put_line( 'Firstly, v_bool is ' || sys.dbms_sqltcb_internal.i_convert_from_boolean(v_bool));
  6     v_bool      := FALSE;
  7  DBMS_OUTPUT.put_line( 'Next , v_bool is ' || sys.dbms_sqltcb_internal.i_convert_from_boolean(v_bool));
  8  END;
  9  /
Firstly, v_bool is TRUE
Next , v_bool is FALSE

PL/SQL procedure successfully completed.

也通过函数来返回布尔型
FUNCTION bool2char(bool IN boolean) RETURN varchar2 IS 
  BEGIN
    IF bool THEN RETURN 'TRUE';
    ELSIF NOT bool THEN RETURN 'FALSE';
    ELSE RETURN 'NULL'; END IF;
  END;

SQL> DECLARE
  2     v_bool   BOOLEAN;
  3  
  4     FUNCTION bool2char( bool IN BOOLEAN )
  5        RETURN VARCHAR2 IS
  6     BEGIN
  7        IF bool THEN
  8           RETURN 'TRUE';
  9        ELSIF NOT bool THEN
 10           RETURN 'FALSE';
 11        ELSE
 12           RETURN 'NULL';
 13        END IF;
 14     END;
 15  BEGIN
 16     v_bool      := TRUE;
 17     DBMS_OUTPUT.put_line( 'Firstly, v_bool is ' || bool2char( v_bool ) );
 18     v_bool      := FALSE;
 19     DBMS_OUTPUT.put_line( 'Next, v_bool is ' || bool2char( v_bool ) );
 20     v_bool      := NULL;
 21     DBMS_OUTPUT.put_line( 'Finally, v_bool is ' || bool2char( v_bool ) );
 22  END;
 23  /
Firstly, v_bool is TRUE
Next, v_bool is FALSE
Finally, v_bool is NULL

PL/SQL procedure successfully completed.      -->Author : Robinson Cheng  Blog ：http://blog.csdn.net/robinson_0612