Convertir funcion de access a funcion de sql

[erickita05]

Hola amigos yo soy medio nueva en sql y quisiera convertir una funcion que tengo hecha para access a sql.
Les mando la funcion en access y lo que he logrado hacer en sql para ver si me ayudan a darle los toques finales.

Esta es la funcion en Access
Public Function ProximaInspeccionIntermedia(FechaExpiracionAnual As Date, Periodos As Double, Duracion As Integer) As Date

Dim Anualidad As Date
Dim i As Double
For i = Periodos To Duracion Step Periodos

Anualidad = FechaExpiracionAnual
If (Anualidad <= Now()) Then
ProximaInspeccionIntermedia = DateAdd("m", 0, Anualidad)
Else
If (Anualidad >= Now) Then
ProximaInspeccionIntermedia = DateAdd("m", 0, Anualidad)
End If
Exit For
End If
Next i


End Function


Y esto es lo que tengo hecho en Sql
CREATE FUNCTION ProximaInspeccionIntermedia
(@FechaExpiracionAnual Date, @Periodos Double, @Duracion Integer)
RETURNS Datetime
BEGIN
DECLARE Anualidad DATEtime
DECLARE i DOUBLE
FOR i = Periodos TO Duracion Step Periodos

Anualidad = FechaExpiracionAnual
IF (Anualidad <= getdate()) THEN
ProximaInspeccionIntermedia = DateAdd("m", 0, Anualidad)
Else
If (Anualidad >= getdate) Then
ProximaInspeccionIntermedia = DateAdd("m", 0, Anualidad)
End If
Exit For
End If
Next i;

End Function

[Andres95]

aunque no me queda muy claro la funcionalidad, la sintaxis seria algo mas o menos asi...

Código:

CREATE FUNCTION dbo.ProximaInspeccionIntermedia(
    @FechaExpiracionAnual Date
   ,@Periodos             decimal(5,2)
   ,@Duracion             Integer
   ,@FechaActual          datetime) 
RETURNS Datetime
BEGIN
Declare @Anualidad DATEtime
       ,@i decimal(5,2)
       ,@FechaReturn datetime
       ,@Continue bit

Set @i = Periodos
Set @Continue = 1

While  i <= Duracion  And @Continue = 1
Begin 
   Set @Anualidad = FechaExpiracionAnual

   If (@Anualidad <= @FechaActual) 
   Begin
      Set @FechaReturn = DateAdd("m", 0, Anualidad)
   End
   Else
   Begin
      If (Anualidad >= @FechaActual) 
      Begin
         Set @FechaReturn = DateAdd("m", 0, Anualidad)
      End
      Set @Continue = 0
   End
   Set @i = @i + Periodos
End

Return @FechaReturn
End
GO

Espero te sea util para continuar con la funcionalidad...

Saludos!