Funcion DateSerial SQL

Otro codigo conseguido de Internet.

CREATE function [dbo].[DateSerial] (@Año smallint, @Mes smallint, @Dia smallint)

returns smalldatetime

as begin

Declare @sAn varchar(4)

declare @sMe varchar(2)

Declare @sDi varchar(2)

declare @Res smalldatetime

Set @san=cast(@año as varchar(4))

set @sme=right('0'+cast(@mes as varchar(2)),2)

if @dia=0

begin

set @res=@san+@sme+'01'

set @res=datediff(day,1,@res)

end

else

begin

set @sdi=right('0'+cast(@dia as varchar(2)),2)

set @res=@san+@sme+@sdi

end

return @res

end