declare
-- Boolean parameters are translated from/to integers:
-- 0/1/null <--> false/true/null
result boolean;
begin
-- Call the function
result := even(p_value => :p_value);
-- Convert false/true/null to 0/1/null
:result := sys.diutil.bool_to_int(result);
end;