Autor Thema: Refresh der Rechte einer Controlled Access-Section  (Gelesen 1800 mal)

Offline Untitled

  • Senior Mitglied
  • ****
  • Beiträge: 364
    • Musiker24.ch - Musiker und Bands finden
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

Offline Untitled

  • Senior Mitglied
  • ****
  • Beiträge: 364
    • Musiker24.ch - Musiker und Bands finden
Re: Refresh der Rechte einer Controlled Access-Section
« Antwort #1 am: 11.09.06 - 14:50:44 »
Habs mal vorerst so gelöst:

Code
Call uiDocThis.Refresh
Call ReOpen(docThis, True)

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

Moritz


 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz