CREATE FUNCTION retNumber(@chk_data decimal(8,2), @chk_type char(2) )
RETURNS decimal (8,2)
AS
begin
declare @ret_var decimal(8,2)
declare @str_data varchar(20)
declare @str_ret varchar(20)
declare @str_temp varchar(20)
declare @str_abs varchar(20)
declare @ln_len int
declare @ln_asc int
declare @ln_move int
set @str_abs='N'
if @chk_data<0
begin
set @str_abs='Y'
set @chk_data=abs(@chk_data)
end
set @str_data= convert(char(9),@chk_data)
set @str_data = replicate('0',9 - len(@str_data)) + @str_data
set @str_temp=left(@str_data,1)
if @str_temp='0'
set @str_temp=''
set @str_data=Replace(@str_data,'.','')
set @str_data=substring(@str_data,2,len(@str_Data) - 1 )
set @str_ret=''
if substring(@chk_type,1,1)<>'Y'
return @chk_data
if substring(@chk_type,2,1)='W'
begin
set @ln_len = 1
while @ln_len <= 7
begin
set @ln_move=(@ln_len + 1)*(@ln_len + 3) + (@ln_len + 2)
set @ln_asc=ascii(substring(@str_data,@ln_len,1)) + @ln_move%10
if @ln_asc>57
set @ln_asc=@ln_asc - 10
set @str_ret=char(@ln_asc)+@str_ret
set @ln_len = @ln_len + 1
end
set @str_ret=substring(@str_ret,1,5)+'.'+substring(@str_ret,6,2)
end
else
begin
set @ln_len = 1
while @ln_len <= 7
begin
set @ln_move=8 - @ln_len
set @ln_move=(@ln_move + 1)*(@ln_move + 3) + (@ln_move + 2)
set @ln_asc=ascii(substring(@str_data,@ln_len,1)) - @ln_move%10
if @ln_asc<48
set @ln_asc= @ln_asc + 10
set @str_ret=char(@ln_asc)+@str_ret
set @ln_len = @ln_len + 1
end
set @str_ret=substring(@str_ret,1,5)+'.'+substring(@str_ret,6,2)
end
if @str_abs='Y'
set @ret_var = - convert(dec(8,2),@str_temp+@str_ret)
else
set @ret_var = convert(dec(8,2),@str_temp+@str_ret)
return @ret_var
end
select dbo.retNumber(salary,'YR'),salary from pay_specify where em_no='1188'
11.67 67629.91