Das Notes Forum

Domino 9 und frühere Versionen => ND9: Entwicklung => Thema gestartet von: Lysienne am 24.02.18 - 14:49:22

Titel: Auswahl in Ansicht einschränken
Beitrag von: Lysienne am 24.02.18 - 14:49:22
Hallo

ist es möglich eine Ansicht so einzuschränken, dass nur ein Dokument ausgewählt werden kann?
Titel: Re: Auswahl in Ansicht einschränken
Beitrag von: eknori am 24.02.18 - 14:53:32
Wenn das eine Dokument durch ein Merkmal bestimmt werden kann, dann kann man das mittels der Ansichtenauswahl einschränken.

Form = "NameDerForm" & merkmal ="WasAuchImmer"
Titel: Re: Auswahl in Ansicht einschränken
Beitrag von: Lysienne am 24.02.18 - 14:58:14
Nein kein Merkmal.
Es sollen alle Dokumente angezeigt werden. Aber der User soll nur ein Dokument auswählen können in der Ansicht.
Titel: Re: Auswahl in Ansicht einschränken
Beitrag von: eknori am 24.02.18 - 15:06:34
nicht von Hause aus. Könnte man ggfs. programmieren. Was ist der use-case?
Titel: Re: Auswahl in Ansicht einschränken
Beitrag von: Lysienne am 24.02.18 - 15:14:33
es geht darum das aus dieser Ansicht über eine Aktion Dokumente gelöscht werden sollen.

Diese Aktion fragt aber vorher ab ob noch diverse Abhängigkeiten zu diesem Dokument sind.

Wenn ja wird abgebrochen.
Darum will ich verhindern das mehrere Dokumente ausgewählt sind.

Würde auch reichen wenn ich in der Aktion abfragen kann ob mehr als ein Dokument markiert ist.
Titel: Re: Auswahl in Ansicht einschränken
Beitrag von: eknori am 24.02.18 - 15:32:51
Über LotusScript

set notesDocumentCollection = db.getUnprocessedDocuments
set doc = col.getFirstDocument

mit getFirstDocument nimmt er immer nur ein document.

Titel: Re: Auswahl in Ansicht einschränken
Beitrag von: WildVirus am 24.02.18 - 15:50:26
und mit col.count erhälst Du die Anzahl an Dokumenten

Außerdem - lass den Anwender doch mehrere auswählen und geh durch die collection alle ausgewählten Dokumente der Reihe nach durch und prüf auf Abhängigkeiten
Titel: Re: Auswahl in Ansicht einschränken
Beitrag von: Lysienne am 24.02.18 - 21:52:48
Danke euch.
Habe folgendes gefunden auf das ich aufbauen kann

Sub Initialize
  Dim session As New NotesSession
  Dim db As NotesDatabase
  Dim collection As NotesDocumentCollection
 Set db = session.CurrentDatabase
  Set collection=db.UnprocessedDocuments
  If collection.Count = 0 Then
     MessageBox "Not found"
  Else
     MessageBox  collection.Count & " documents found"
  End If
End Sub