dbo.toDBdec

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
CREATE FUNCTION dbo.toDBdec (
@valueStr varchar(255),
@fromGroup varchar(255),
@fromDec varchar(255)   )

RETURNS decimal(18,4)
WITH encryption ,
EXECUTE AS CALLER

AS
BEGIN
declare @iv varchar(255)
  
 if (@valueStr is null)  
 begin
  set @valueStr='0'
  set @iv='0'
 end
 else if (@valueStr='')
 begin
  set @valueStr='0'
  set @iv='0'
 end
 else 
 begin 
   declare @angka as varchar(255)
 set @angka=1.00/2
 declare @intComa varchar(1)
 set  @intComa= substring( @angka  ,2,1)
   set @iv =@valueStr
 set @iv =REPLACE(@valueStr,@fromGroup,'')
 set @iv =REPLACE(@valueStr,@fromDec,@intComa)
  end
return(cast(@iv as decimal(18,4)))
END;
 
 
GO