Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Wirsing am 09.01.03 - 09:25:37

Titel: Antwortdokumentenfelder in Hauptdokument anzeigen
Beitrag von: Wirsing am 09.01.03 - 09:25:37
Hallo zusammen,

ich habe ein Hauptdokument mit verschieden vielen Antworten.
Nun möchte ich im Hauptdokument die Antworten untereinander anzeigen lassen.
Allerdings nicht die komplette Maske, sondern nur eine Art tabellarische Zusammenfassung (z.B. Zwei Felder).

Ist soetwas möglich? Und geht es auch, dass diese Zeilen dann beim Anklicken auf das Antwortdokument verlinken?

Vielen Dank

Gruss

Wirsing
Titel: Re:Antwortdokumentenfelder in Hauptdokument anzeigen
Beitrag von: Centaury am 09.01.03 - 09:35:11
Zur ersten Frage: Ich würde das wahrscheinlich mit einer eingebetteten Ansicht machen. Eine Verlinkung hat man dann allerdings nicht. Das ist die simpelste Lösung, denke ich.
Titel: Re:Antwortdokumentenfelder in Hauptdokument anzeigen
Beitrag von: Wirsing am 09.01.03 - 09:42:59
Hab ich auch schon probiert, aber ich bekomme die Auswahlformel nicht gebacken.
Wie kann ich der Ansicht mitteilen, das ich nur die Antowrten des angezeigten Hauptdokumentes haben möchte?
Titel: Re:Antwortdokumentenfelder in Hauptdokument anzeigen
Beitrag von: Performance am 09.01.03 - 09:44:01
Beispiel für die erste Antwortebene:
mach dir ein RTF Feld z.B. plink
schreibe oberhalb des Feldes als Info:
Das hauptdokument hat <Computed Value1> <Computed Value2>
<Computed Value1> ==> @DocChildren("no";"1";"%")
<Computed Value2> ==> @DocChildren("Antworten";"Antwort";"Antworten")

in der Queryopen:
Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
   
   If Not IsNewDoc Then   
      
      Dim session As New NotesSession   
      Dim workspace As New NotesUIWorkspace
      Dim docsCollChild As NotesDocumentCollection
      Dim doc As NotesDocument
      Dim docChild As NotesDocument
      Dim rtitem As NotesRichTextItem
      Dim i As Integer
      
      Set doc = Source.Document
      Set docsCollChild = doc.Responses
      
      If doc.HasItem( "plink" ) Then   
         Call doc.RemoveItem( "plink" )
      End If
      
      Set rtitem = doc.CreateRichTextItem( "plink" )
      
      For i =1 To docsCollChild.Count
         
         Set docChild = docsCollChild.GetNthDocument(i)
         
            Call rtitem.AppendDocLink( docChild , Cstr(docChild.viewTaskNr(0)) + " : " + docChild.tname( 0 ))
            Call rtitem.AppendText( " "  + docChild.tname( 0 ) )
            Call rtitem.AddNewLine( 1 )

      Next i      
      
   
   End If
   
End Sub


cu
Titel: Re:Antwortdokumentenfelder in Hauptdokument anzeigen
Beitrag von: Centaury am 09.01.03 - 09:48:39
Stimmt, das ist ein Problem, dass ich eben nicht bedacht habe...
Titel: Re:Antwortdokumentenfelder in Hauptdokument anzeigen
Beitrag von: Wirsing am 09.01.03 - 10:02:58
Wow!

Das klappt ja sogar!  :o :o :o


Danke für Eure Mühen, jetzt muss ich nur noch die Felder aus den Antwortdokumenten pflücken. Das ist ja nicht weiter schwer. ::)

Gruss

Wirsing
Titel: Re:Antwortdokumentenfelder in Hauptdokument anzeigen
Beitrag von: Till_21 am 09.01.03 - 13:52:06
mach doch eine eingebettete ansicht mit folg. selection :
select $REF=@text(@documentuniqueid)

gruss