Domino 9 und frühere Versionen > ND6: Entwicklung

Refresh der Rechte einer Controlled Access-Section

(1/1)

Untitled:
Hi zusammen

Kann sein, dass ich nur irgendwo ein Häkchen vergessen habe, aber bisher war meine Suche erfolglos.

Ich habe eine Controlled Access-Section eingefügt. Die Formel ist computed for display und basiert auf einem anderen Feld.

Wenn ich nun eine Action klicke, wird das Feld (im Backend) aktualisiert und ein Reload/Refresh durchgeführt.

Wenn ich nun in die Section doppelklicke, werden alle Rechte richtig angezeigt, aber ich kann die Felder darin erst editieren, wenn ich das Dokument abgespeichert und neu geöffnet habe.

Weiss jemand, ob und wie ich die Rechte auch direkt aktualisieren kann? Oder habe ich irgendwo einen Fehler drinne?

Danke für eure Hilfe!!

Moritz

Untitled:
Habs mal vorerst so gelöst:


--- Code: --- Call uiDocThis.Refresh
Call ReOpen(docThis, True)
--- Ende Code ---

Dazu brauchts dann die ReOpen-Funktion von ata:


--- Code: ---Function ReOpen(docThis As NotesDocument, EditMode As Boolean ) As Integer
'Das aktuelle Dokument schließen und wieder öffnen
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim dbThis As NotesDatabase
Dim unid As String

ReOpen = 0

Set dbThis = docThis.ParentDatabase

Call docThis.Save(True, True)

unid = docThis.UniversalID
docThis.SaveOptions = "0" 'Speicherabfrage vermeiden

Set uidoc = ws.CurrentDocument

Call uidoc.Close

Set docThis = dbThis.GetDocumentByUNID(unid)
Set uidoc = ws.EditDocument(True , docThis)
Set docThis = uidoc.Document

If docThis.HasItem("SaveOptions") Then 
          'das Feld SaveOptions wieder entfernen
docThis.RemoveItem("SaveOptions")
Call docThis.Save( True , True )
End If

If EditMode Then
uidoc.EditMode = True
End If

ReOpen = 1
End Function
--- Ende Code ---

Moritz

Navigation

[0] Themen-Index