Ò»¸öOracle×Ô¶¨Òå¾Û¼¯º¯ÊýµÄÀý×Ó

Ç°ÌìÓÐÈËÌáÁËÐèÇó£¬Ïë¶Ôij¸ö×ֶνøÐа´Î»µÄ»ò²Ù×÷¡£±¾À´½¨Òé²éѯ³öÀ´Ö®ºóÔÚÓ¦ÓóÌÐòÀïÃæ´¦Àí£¬µ«ÊÇÊý¾ÝÁ¿±È½Ï´ó£¬¾õµÃ»¹ÊÇ·µ»ØÒ»¸ö·Ö×é¼ÆËãÖ®ºóµÄÖµ±È½ÏºÏÊÊ¡£
Á½¸öÎÊÌ⣬һ¸öÊÇ°´Îª»òµÄ²Ù×÷£¬Õâ¸ö²Î¿¼Á˱ðÈ˵ÄÎĵµ£¬ÓÃbitandº¯ÊýʵÏÖ¡£ Ô­ÎÄÈçÏ£º
http://blog.chinahr.com/blog/hewy0526/post/112968
È»ºó¾ÍÊÇ×Ô¶¨ÒåµÄ¾Û¼¯º¯ÊýÁË¡£Õâ¸ö²Î¿¼Á˹ٷ½ÎĵµµÄÀý×Ó£¬¾Í²»ÁгöÔ­Îijö´¦ÁË¡£
È«²¿´úÂëÈçÏ£º
-- 1. Implement the type BitOrImpl to contain the ODCIAggregate routines:
create type BitOrImpl as object
(
  bitorval NUMBER, -- result.
  static function ODCIAggregateInitialize(sctx IN OUT BitOrImpl)
    return number,
  member function ODCIAggregateIterate(self IN OUT BitOrImpl,
    value IN number) return number,
  member function ODCIAggregateTerminate(self IN BitOrImpl,
    returnValue OUT number, flags IN number) return number,
  member function ODCIAggregateMerge(self IN OUT BitOrImpl,
    ctx2 IN BitOrImpl) return number
);
/
-- 2. mplement the type body for BitOrImpl:
create or replace type body BitOrImpl is
static function ODCIAggregateInitialize(sctx IN OUT BitOrImpl)
return number is
begin
  sctx := BitOrImpl(0);
  return ODCIConst.Success;
end;
member function ODCIAggregateIterate(self IN OUT BitOrImpl, value IN number) return number is
begin
  self.bitorval := (self.bitorval + value) - bitand(self.bitorval, value);
  return ODCIConst.Success;
end;
member function ODCIAggregateTerminate(self IN BitOrImpl,
    returnValue OUT number, flags IN number) return number is
begin
  returnValue := self.bitorval;
  return ODCIConst.Success;
end;
member function ODCIAggregateMerge(self IN OUT BitOrImpl, ctx2 IN BitOrImpl) return number is
begin
  self.bitorval := (self.bitorval + ctx2.bitorval) - bitand(self.bitorval, ctx2.bitorval);
  return ODCIConst.Success;
end;
end;
/
-- 3. Create the user-defi