oracle统计出正整数对应二进制的里面1的位数-JZTXT

declare
n number:=15;
count1 int :=0;
begin
while n<>0
loop
n := bitand(n,n-1);
count1 := count1+1;
end loop;
dbms_output.put_line(count1);
end;

结果为：

对于负数oracle似乎处理不了，正整数没问题。