ID übernahme

Hallo,

Ich habe eine Datenbank erstellt, und möchte jetzt , das man darin Themen erstellen kann und zu den Themen auch Beiträge erstellen kann.
Jedes Thema soll automatisch eine ID bekommen (tuts auch), nur soll jetzt auch der Beitrag zu dem geschriebenen Thema die ID des Themas übernehmen, so das man zu jedem Thema auch den dazugehörige Beitrag lesen kann.

Das Problem ist, das ich nicht weis, wie ich es schaffe das die Beiträge die gleiche ID wie das Thema hat

kann mir da einer helfen ?

Wäre super!

Hallo

Ich habe jetzt bei "Formeln übernehmen Werte aus gewähltem Dokument" einen Haken gesetzt.
Ich weis allerdings nicht ganau, wie ich dem berechneten Feld jetzt einen Wert zuweise.

So hab ich die ID vergabe gemacht

Zitat

dim doc as NotesDocument
Set doc = Source.Document
If Cstr(doc.Nr(0)) = "" Then ' prüfen ob Feld Nr noch leer ist
Dim view As NotesView
Set view = doc.ParentDatabase.GetView("Nr") ' Ansicht "Nr"
Dim doc_temp As NotesDocument
Set doc_temp = view.GetFirstDocument ' suche erstes Dokument in der Ansicht
If Not doc_temp Is Nothing Then ' wenn Dokument vorhanden
doc.Nr = doc_temp.Nr(0) + 1
Else ' falls noch kein Dokument mit einer laufenden Nummer existiert
doc.Nr = 1
End If
End If

Alles anzeigen

Ansicht "Nr":
- Select Formel: SELECT @Text(NR) != ""
- 1. Spalte:
- - Formel: NR
- - Eigenschaft: sortiert, absteigend
Script muss in QuerySave der Maske

Irgendiwe klappt das nicht
in meiner Hauptmaske hab ich kein berechnetes Feld für die ID
die ID steht bei in der Ansicht.

Könntest du vielleicht mal posten, wie ich es schaffe, das jedes Thema eine eigene Feste ID hat, so das ich nacher die Beiträge mit dem berechneten Feld der ID zuweisen kann.
Wäre super

Also.
Bei jedem Dokument wird in der Ansicht eine Nr angezeigt, die automatisch erstellt wird.

Allerdings, funktioniert es eher wie eine Auflistung.
Von daher glaube ich, das es doch nicht richtig war.
So hatte ichs probiert:

Zitat

dim doc as NotesDocument
Set doc = Source.Document
If Cstr(doc.Nr(0)) = "" Then ' prüfen ob Feld Nr noch leer ist
Dim view As NotesView
Set view = doc.ParentDatabase.GetView("Nr") ' Ansicht "Nr"
Dim doc_temp As NotesDocument
Set doc_temp = view.GetFirstDocument ' suche erstes Dokument in der Ansicht
If Not doc_temp Is Nothing Then ' wenn Dokument vorhanden
doc.Nr = doc_temp.Nr(0) + 1
Else ' falls noch kein Dokument mit einer laufenden Nummer existiert
doc.Nr = 1
End If
End If

Ansicht "Nr":
- Select Formel: SELECT @Text(NR) != ""
- 1. Spalte:
- - Formel: NR
- - Eigenschaft: sortiert, absteigend

Alles anzeigen

Und da ich auf die art kein ID feld habe, kann ich in meiner antwort Maske kein Feld darauf beziehen

hoffe es ist diesmal verständlicher
gruß

wenn ich jetzt eine Antwort schreibe, erhält diese wie ein Thema eine Zahl.
Alledings ist es da auch eher eine Auflistung ( Jede Antwort einen andere Zahl egal zu welchem Thema)

Hab aber in der AntwortMaske ein berechnetes Feld mit der Formel Nr
Hab ich da irgendwas flasch verstanden ?

Nein.
Nur in der Themen erstell Maske

Zu 1) Ich habe in meiner ThemenMaske eine Aktion die ich Antworten genannt hab. Wenn man drauf klickt, kommt man zur AntwortenMaske.

zu 3) Jede Antwort bekommt die Nummer, die auf die andere folgt.
Also, wenn es das 5. Thema ist, steht in der Ansicht die 5 davor usw...

2. Versteh ich leider nicht ganz

Entschuldigung
Bei punkt 3 war ich jetzt Gedanklich bei der Nummerierung der Themen

Wenn man eine Antwort schreibt bekommt diese auch die Nachfolgende Nummer. Also wenn das z.B. die 4. insgesamt geschriebene Antwort ist, dann bekommt sie die Nummer 4. Die darauffolgende Antwort (egal zu welchem Thema ) bekommt dann die 5 usw.

Da hab ich @DocNumber

Jetzt sind die Zahlen ganz verschwunden.

Also, ich hab jetzt in meiner "ThemenMaske" ein berechnetes Feld, mit der Formel "Nr".
Genauso, wie in meiner "AntwortenMaske". Bloß, das ich da bei "Formeln übernehmen Werte aus gewählten Dokumenten" einen Haken gesetzt hab

passt das soweit ?