sql server自定义进制转换函数

create function bin_to_dec(@v_bin varchar(32))
returns int
as
begin
declare @v_bin1 varchar(32)
declare @v_dec bigint
declare @v_com bigint
declare @v_temp_dec bigint
declare @v_temp_bin1 varchar(32)
declare @v_temp_bin2 varchar(1)
declare @v_n int
declare @v_bin2 varchar(32)
set @v_bin1=replace(@v_bin,'0','2')
set @v_bin2=@v_bin
set @v_dec=0
set @v_temp_bin1=''
set @v_temp_bin2=''
set @v_n=1
set @v_com=0
while(@v_bin1<>@v_com)
  begin
  set @v_temp_bin2=substring(@v_bin1,1,1)
 -- print @v_temp_bin2
  --print @v_bin1
  if (@v_temp_bin2<>1)
     set @v_temp_bin2=0
  else set @v_temp_bin2=1
  set @v_temp_dec=@v_temp_bin2*power(2,len(@v_bin1)-1)
  --print
 -- print @v_temp_dec
  set @v_n=@v_n+1
  --print @v_n
  set @v_temp_bin1=substring(@v_bin2,@v_n,len(@v_bin1)-1)
  set @v_bin1=@v_temp_bin1
  set @v_dec=@v_dec+@v_temp_dec
  --print
  --print @v_dec
  --print '------^^------'
  end
return @v_dec
end

GO

 

create function hex_to_dec(@v_hex varchar(32))
returns int
as
begin
declare @v_bin1 varchar(32)
declare @v_dec bigint
declare @v_com varchar(1)
declare @v_temp varchar(1)
declare @v_temp_dec bigint
declare @v_temp_bin1 varchar(32)
declare @v_temp_bin2 int
declare @v_n int
declare @v_bin2 varchar(32)
set @v_bin1=replace(@v_hex,'0','x')
set @v_bin2=@v_bin1
set @v_dec=0
set @v_temp_bin1=''
set @v_temp_bin2=''
set @v_n=1
set @v_com=''
while(@v_bin1<>'')
  begin
  set @v_temp=substring(@v_bin1,1,1)
 -- print @v_temp_bin2
 -- print @v_bin1
  if (@v_temp='x')
     set @v_temp_bin2=0
  else
    if @v_temp='A'
       set @v_temp_bin2=10
     else
       if (@v_temp='B')
          set @v_temp_bin2=11
 else
         if (@v_temp='C')
             set @v_temp_bin2=12
   else
            if (@v_temp='D')
               set @v_temp_bin2=13
      else
               if (@v_temp='E')
                  set @v_temp_bin2=14
                else
   if (@v_temp='F')
                     set @v_temp_bin2=15
                  else set @v_temp_bin2=@v_temp           
          
         
        
  set @v_temp_dec=@v_temp_bin2*power(16,len(@v_bin1)-1)
  --print
  --print @v_temp_dec
  set @v_n=@v_n+1
  --print @v_n
  set @v_temp_bin1=substring(@v_bin2,@v_n,len(@v_bin1)-1)
  set @v_bin1=@v_temp_bin1
  set @v_dec=@v_dec+@v_temp_dec
  --print
 
  --print '------^^------'
  end
return @v_dec
 --print @v_dec
end

GO

 

create function oct_to_dec(@v_oct varchar(32))
returns int
as
begin
declare @v_bin1 varchar(32)
declare @v_dec bigint
declare @v_com bigint
declare @v_temp_dec bigint
declare @v_temp_bin1 varchar(32)
declare @v_temp_bin2 varchar(1)
declare @v_n int
declare @v_bin2 varchar(32)
set @v_bin1=replace(@v_oct,'0','x')
set @v_bin2=@v_oct
set @v_dec=0
set @v_temp_bin1=''
set @v_temp_bin2=''
set @v_n=1
set @v_com=0
while(@v_bin1<>@v_com)
  begin
  set @v_temp_bin2=substring(@v_bin1,1,1)
 -- print @v_temp_bin2
  --print @v_bin1
  if (@v_temp_bin2='x')
     set @v_temp_bin2=0
  set @v_temp_dec=@v_temp_bin2*power(8,len(@v_bin1)-1)
  --print
 -- print @v_temp_dec
  set @v_n=@v_n+1
  --print @v_n
  set @v_temp_bin1=substring(@v_bin2,@v_n,len(@v_bin1)-1)
  set @v_bin1=@v_temp_bin1
  set @v_dec=@v_dec+@v_temp_dec
  --print
  --print @v_dec
  --print '------^^------'
  end
return @v_dec
end

GO