Realice una funcion en acces para que tome cada registro de la tabla Flujo_Pas y se le reste la fecha ingresada por parametros, pero la funcion me entrega solo un valor.
Y no entiendo el por que de ello.
La tabla tiene 31 registros que complen con la consulta sql, y deceo me entregue las 31 diferencias entre las fechas.
Ejemplo:
1.- 185
2.- 254
3.- 367
.
.
.
31.- 2018
Código SQL:
Ver original
FUNCTION Plazo_Acumulado(Operacion AS INTEGER, Fecha_Hoy AS DATE) AS DOUBLE Dim rs AS Recordset Dim res AS DOUBLE SET rs = CurrentDb.OpenRecordset("select Fecha_Fin from Flujo_Pas where Flujo_Id=" & Operacion) While NOT rs.EOF res = DateDiff("d", Fecha_Hoy, Fecha_Fin) IF res > 0 THEN Plazo_Acumulado = res ELSE Plazo_Acumulado = 0 END IF rs.MoveNext Wend END FUNCTION