create or replace function SHI_TO2(
f1 in number)
return varchar2
is
vf11 varchar(30);
vf12 number:=f1;
begin
Loop
exit when vf12 = 0 ;
if mod(vf12,2)=0 then
vf11:='0'||vf11 ;
else
vf11:='1'||vf11 ;
end if ;
vf12:=trunc(vf12/2);
end loop;
return(vf11);
end SHI_TO2;