1. 判断是否为偶数函数
create or replace function Even(Value in integer) return boolean is Result boolean; begin -- 判断是否是偶数 Result := (Value mod 2 = 1); return (Result); end Even;
进行调试
declare -- Boolean parameters are translated from/to integers: -- 0/1/null <--> false/true/null result boolean; begin -- Call the function result := even(value => :value); -- Convert false/true/null to 0/1/null :result := sys.diutil.bool_to_int(result); end;