Lotus Notes - Funcion en lotusscript

 
Vista:

Funcion en lotusscript

Publicado por Sara (4 intervenciones) el 28/02/2007 16:38:11
Hola no sé casi nada de lotus script y tengo que pasar un valor de un campo a otro mediante script el problema es que es de tipo fecha, tengo esta formula para que me de la fecha con el día el nombre del mes y el año, 7 de Septiembre del 2006(ejemplo), lo hago con esta formula:
MESD := @Text(@Month(@Today));
MEST := @If(MESD = "1"; "Enero"; MESD = "2"; "Febrero";MESD = "3"; "Marzo";MESD = "4"; "Abril";MESD = "5"; "Mayo";MESD = "6"; "Junio";MESD = "7"; "Julio";MESD = "8"; "Agosto";MESD = "9"; "Septiembre";MESD = "10"; "Octubre";MESD = "11"; "Noviembre";MESD = "12"; "Diciembre";"");
@Text(@Day(@Today)) + " de " + MEST + " de " + @Text(@Year(@Today))
¿cómo puedo hacerlo en un script?
Gracias de antemano.
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

RE:Funcion en lotusscript

Publicado por Hugo Correa (286 intervenciones) el 28/02/2007 18:15:02
Tomo un campo llamado FECHA (DATE), copia el siguiente código:

Dim NS As New NOTESSESSION
Set NWS=New notesuiworkspace
Set Ndb =NS.currentdatabase
Set Nuid=NWS.currentdocument
Set Nd=Nuid.document
dia=Day( Nuid.FieldGetText("fecha"))
mes=Month( Nuid.FieldGetText("fecha"))
anio=Year( Nuid.FieldGetText("fecha"))
If mes=1 Then
nom_mes="Enero"
Elseif mes=2 Then
nom_mes="Febrero"
Elseif mes=3 Then
nom_mes="Marzo"
Elseif mes=4 Then
nom_mes="Abril"
Elseif mes=5 Then
nom_mes="Mayo"
Elseif mes=6 Then
nom_mes="Junio"
Elseif mes=7 Then
nom_mes="Julio"
Elseif mes=8 Then
nom_mes="Agosto"
Elseif mes=9 Then
nom_mes="Septiembre"
Elseif mes=10 Then
nom_mes="Octubre"
Elseif mes=11 Then
nom_mes="Noviembre"
Elseif mes=12 Then
nom_mes="Diciembre"
End If
Resultado=Str(dia)+ " de "+nom_mes+" del "+Str(anio)

Saludos
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

RE:Funcion en lotusscript

Publicado por Sara (4 intervenciones) el 01/03/2007 09:19:20
Muchas gracias Hugo me has salvado la vida.
Un saludo
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