Lotus Notes - Traer documentos hijos

 
Vista:

Traer documentos hijos

Publicado por Sara (3 intervenciones) el 21/09/2006 18:24:41
Hola , no tengo mucha idea de Notes por no decir nada, el caso es que necesito obtener todos los documentos hijos de un formulario.

tengo este script para obtener el documento Principal pero no sé como coger los hijos:

Dim db As notesdatabase
Dim docPrincipal As NotesDocument
Dim doc As NotesDocument
Dim vista As NotesView
Dim s As Notessession

Set db = s.CurrentDatabase
Set docPrincipal = session.DocumentContext
Set vista = db.GetView ("VoPadres&Hijos")

Set doc = vista.GetDocumentByKey (docPrincipal.IncidenciaN(0))
Me da el documento que estoy buscando... pero necesito traer todos los que sean sus hijos.
La vista VoPadres&Hijos esta con la siguiente f´órmula : SELECT Form = "MiFormulario"; @AllDescendants.

Os agradeceria vustra ayuda....
Gracias y un saludo.
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:Traer documentos hijos

Publicado por Federico Acevedo (90 intervenciones) el 25/09/2006 14:58:23
Sara,

Si necesitas traer todos los "hijos" del documento DOC, puedes usar este codigo:

Dim col As NotesDocumentCollection
Dim docRespuesta As NotesDocument

Set col = doc.Responses
Set docRespuesta = col.GetFirstDocument
Do While Not docRespuesta Is Nothing
Print "Fecha de Creacion " & docRespuesta.Created
Set docRespuesta = col.GetNextDocument( docRespuesta )
Loop

Lo que hace es setear una coleccion con todos los documentos de respuesta (propiedad "Responses") y luego la recorre, imprimiendo la fecha de creacion de cada respuesta.

Espero que te ayude.

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:Traer documentos hijos

Publicado por Sara (3 intervenciones) el 27/09/2006 13:36:49
Gracias me ha servido pero como ya te he dicho antes no sé casi nada de LotusScript y quiero saber como le asigno un valor a un campo dentro de los documentos respuestas.

Gracias de antemano....

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
Imágen de perfil de Alicia

RE:Traer documentos hijos

Publicado por Alicia (6 intervenciones) el 10/10/2006 18:33:01
Es muy fácil, sería así:

Set docRespuesta = col.GetNextDocument( docRespuesta )

docRespuesta.Campo = "valor"

Y si quieres coger un valor de un campo de otro documento, sería:

docRespuesta.Campo = doc.Campo2(0)

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