2011-10-31 對集合的密集性判斷

http://www.itpub.net/thread-1499223-10-1.html

98 樓

我建立了這個工具函式來顯示一個布林型變數的值：

CREATE OR REPLACE PROCEDURE plch_bpl (val IN BOOLEAN)
IS
BEGIN
   DBMS_OUTPUT.put_line (
      CASE val WHEN TRUE THEN 'TRUE' WHEN FALSE THEN 'FALSE' ELSE 'NULL' END);
END plch_bpl;
/

下列的選項中都包含了下面這個函式的實現程式碼：

CREATE OR REPLACE FUNCTION plch_is_dense (numbers_in IN DBMS_SQL.number_table)
   RETURN BOOLEAN

我寫了另一個幫助過程來測試這個 plch_is_dense 函式:

CREATE OR REPLACE PROCEDURE plch_test_is_dense
IS
   l_numbers   DBMS_SQL.number_table;
BEGIN
   l_numbers (1000) := 1;
   l_numbers (3000) := 1;
   plch_bpl (plch_is_dense (l_numbers));
   l_numbers.delete;
   l_numbers (2) := 1;
   l_numbers (3) := 1;
   plch_bpl (plch_is_dense (l_numbers));
END;
/

哪些選項建立的plch_is_dense使得plch_test_is_dense在執行之後會顯示這兩行文字？

FALSE
TRUE

(A)

IS
BEGIN
   RETURN numbers_in.COUNT = (numbers_in.LAST - numbers_in.FIRST);
END;

(B)

IS
   l_number   NUMBER;
BEGIN
   FOR indx IN numbers_in.FIRST .. numbers_in.LAST
   LOOP
      l_number := numbers_in (indx);
   END LOOP;
   RETURN TRUE;
EXCEPTION
   WHEN NO_DATA_FOUND
   THEN
      RETURN FALSE;
END;

(C)

IS
   l_number   NUMBER;
BEGIN
   FOR indx IN 1 .. numbers_in.COUNT
   LOOP
      l_number := numbers_in (indx);
   END LOOP;
   RETURN TRUE;
EXCEPTION
   WHEN NO_DATA_FOUND
   THEN
      RETURN FALSE;
END;

(D)

IS
BEGIN
   RETURN numbers_in.COUNT = (numbers_in.LAST - numbers_in.FIRST + 1);
END;

執行結果如下

(A)

CREATE OR REPLACE FUNCTION plch_is_dense(numbers_in IN DBMS_SQL.number_table)
  RETURN BOOLEAN IS
BEGIN
  RETURN numbers_in.COUNT =(numbers_in.LAST - numbers_in.FIRST);
END;
/

SQL> exec plch_test_is_dense;
FALSE
FALSE
PL/SQL procedure successfully completed
SQL>

(B)

CREATE OR REPLACE FUNCTION plch_is_dense(numbers_in IN DBMS_SQL.number_table)
  RETURN BOOLEAN IS
  l_number NUMBER;
BEGIN
  FOR indx IN numbers_in.FIRST .. numbers_in.LAST LOOP
    l_number := numbers_in(indx);
  END LOOP;
  RETURN TRUE;
EXCEPTION
  WHEN NO_DATA_FOUND THEN
    RETURN FALSE;
END;
/

SQL> exec plch_test_is_dense;
FALSE
TRUE
PL/SQL procedure successfully completed
SQL>

(C)

CREATE OR REPLACE FUNCTION plch_is_dense(numbers_in IN DBMS_SQL.number_table)
  RETURN BOOLEAN IS
  l_number NUMBER;
BEGIN
  FOR indx IN 1 .. numbers_in.COUNT LOOP
    l_number := numbers_in(indx);
  END LOOP;
  RETURN TRUE;
EXCEPTION
  WHEN NO_DATA_FOUND THEN
    RETURN FALSE;
END;
/

SQL> exec plch_test_is_dense;
FALSE
FALSE
PL/SQL procedure successfully completed
SQL>

(D)

CREATE OR REPLACE FUNCTION plch_is_dense(numbers_in IN DBMS_SQL.number_table)
  RETURN BOOLEAN IS
BEGIN
  RETURN numbers_in.COUNT =(numbers_in.LAST - numbers_in.FIRST + 1);
END;
/

SQL> exec plch_test_is_dense;
FALSE
TRUE
PL/SQL procedure successfully completed
SQL>

 

答案說明在101樓

10-31答案BD. 對於非密集型的COLLECTION訪問不能從1開始，而是要用FIRST方法。訪問不存在的元素會引發NO_DATA_FOUND異常。

來自 “ ITPUB部落格 ” ，連結：http://blog.itpub.net/680385/viewspace-2659909/，如需轉載，請註明出處，否則將追究法律責任。