Lotus Notes - Obtener los días de la semana en LotusScript

   
Vista:
Imágen de perfil de Alejandro

Obtener los días de la semana en LotusScript

Publicado por Alejandro (22 intervenciones) el 13/11/2015 09:49:45
Hola a tod@s,

estoy buscando una forma de obtener los días de la semana para conocer si una acción sobrepasa la fecha limite mediante un agente en LotusScript. Dispongo de la fecha inicial y la final en una vista y me interesa comprobar si la fecha final es mayor que la limite (la fecha limite viene a ser cada lunes de una semana).

No encuentro información al respecto pero resulta interesante controlar las fechas. Alguien ha dado con la tecla???

Un saludo y gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Obtener los días de la semana en LotusScript

Publicado por ElLobo (53 intervenciones) el 17/11/2015 15:20:50
Lotus Notes permite comparar fechas en formulas Fecha1>Fecha2 o usa @adjust


Si es en LotusScript usa la clase NotesDateTime y su metodo Timedifference que compara diferencia de tiempo en segundos creo.

Mira tambien DateRange en formulas

Algo asi
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
Imágen de perfil de Alejandro

Obtener los días de la semana en LotusScript

Publicado por Alejandro (22 intervenciones) el 23/11/2015 14:15:29
Realmente, lo que intento conseguir es complejo...

Independientemente del día de la semana en que se haga un préstamo, cada lunes deben haberse devuelto todos los ejemplares prestados.

En primer lugar, he intentado jugar con la funcion Weekday en LotusScript pero tengo que darle formato a la fecha para sacar el día mediante Datenumber y me aparecen problemas de tipo que no puedo solventar.

Si existe otra manera de hacerlo... no se me ha ocurrido!!!

Sigo con ello...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Obtener los días de la semana en LotusScript

Publicado por ElLobo (53 intervenciones) el 27/11/2015 15:32:08
Bien.

Cuando guardes el documento crear un campo con la fecha de devolución y luego muestras en una vista todos los documentos que no hayan sido devueltos y cuya fecha de devolucion sea menor a hoy.


Seudo codigo antes de grabar


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
If oDoc.isNewDoc Then
   oDoc.devolverEl = getFechaDevolucion()
   oDoc.Devuelto = "0"
End If
 
Call oDoc.Save
 
 
function getFechaDevolucion() as Variant
 
        Dim dFecha as New NotesDateTime(Now)
 
        Call SumaDia( dFecha ) '<--POR SI HOY ES LUNES  (Nota: Se puede pedir prestado un domingo?)

       While Not isLunes( dFecha )

             Call SumaDia( dFecha )

      End

     getFechaDevolucion = cDat( dFecha.DateOnly )

End Function

Function isLunes( dFecha ) as boolean
       isLunes = ( weekday( dFecha )=2  )
End Function


Algo Asi
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar