利用SQL語句完成位操作 (轉)

利用SQL語句完成位操作 (轉)[@more@]

  在我們的中，有些欄位其值是按位表示的，即不同的位有不同的含義，比如用不同的位代表的不同或屬性，該位為1時，表示使用者有此許可權或屬性，為0則無此許可權或屬性等。相信有很多資料庫為了也有類似的設計。

  在C語言中提供了&, |, ~以及>>,< 提供的BITAND函式好用，Oracle的函式在運算元較大時會出錯），如果大家有類似的需求，只要參照其設計方法，可以很容易完成。

1. func_bitoper

  我們在工作中常常有這樣的需求，要求將某個欄位的某一位或多位置為1或0,輸入引數in_value是待處理的值，enable_mask表示要將哪幾位置為1，如要將bit0和bit2置為1，則enable_mask := POWER(2,0) + POWER(2,2); ,enable_mask為0表示沒有需要置為1的位，同理disable_mask表示要將哪幾位置為0，如要將bit1和bit3置為0，則disable_mask := POWER(2,1) + POWER(2,3); ,disable_mask為0表示沒有需要置為0的位, 返回值為經過位操作後的值。

  換句話說，enable動作相當於與enable_mask進行或操作，disable動作相當於與~disable_mask進行與操作。

create or replace function func_bitoper(in_value IN NUMBER,enable_mask IN NUMBER,
  disable_mask IN NUMBER ) return NUMBER IS
 
 l_enable  number;
 l_disable  number;
 i  number;
 j  number;
 l_outvalue  number;
 l_temp  number;
begin
 l_enable  := enable_mask;
 l_disable  := disable_mask;
 l_outvalue := in_value;
 
 -- enable
 j := 0;
 while l_enable > 0 l
 
  if MOD(l_enable,2) = 1 then  -- to do set work
  l_temp :=TRUNC(l_outvalue/POWER(2,j));
  if MOD (l_temp,2) = 0 then  -- set it to 1
  l_outvalue := l_outvalue + POWER(2,j);
  end if; 
  end if;
  l_enable := TRUNC(l_enable/2);
  j := j+1 ;
 end loop;

 -- disable
 j := 0;
 while l_disable > 0 loop
 
  if MOD(l_disable,2) = 1 then  -- to do set work
  l_temp :=TRUNC(l_outvalue/POWER(2,j));
  if MOD (l_temp,2) = 1 then  -- set it to 0
  l_outvalue := l_outvalue - POWER(2,j);
  end if; 
  end if;
  l_disable := TRUNC(l_disable/2);
  j := j+1 ;
 end loop;

 return l_outvalue;
end;
/

2. func_and

  用於對兩個數進行與操作，經常用於判斷使用者是否有許可權等。

create or replace function func_and(in_value IN NUMBER,in_mask IN NUMBER)
  return number is
  i  number;
  n_result number;
  n_value number;
  n_mask  number;
begin
 n_value := in_value;
 n_mask  := in_mask;
 i := 0;
 n_result := n_value;
 while n_value > 0 loop
  if (mod(n_mask,2) = 0) and (mod(n_value,2) = 1) then
  n_result := n_result - power(2,i);
  end if;
  n_value := TRUNC(n_value/2);
  n_mask  := TRUNC(n_mask/2);
  i := i + 1;
 end loop;
 return n_result;
end;
/

  好願與大家共享，希望起到拋磚引玉的作用。