Domino 9 und frühere Versionen > ND6: Entwicklung

Berechtigungsproblem

(1/1)

wuwu:
Hallo,

wir haben eine Datenbank in der Anfragen erfasst werden, durch verschiedene Bereiche im Unternehmen wandern und schließlich vom Vertrieb abgeschlossen werden (Status = 99).

Berechtigungskonzept der DB über Autorenfelder, jeder der mit der Anfrage zu tun bzw. geschickt bekommt darf ändern!

Anforderung ist jetzt, wenn die Anfrage vom Vertrieb abgeschlossen wird (Status = 99) dann sollte das Dokument nicht mehr bearbeitbar sein:

   Dim Rollen As Variant
   Const NotesMacro$="@UserRoles"
   Rollen = Evaluate(NotesMacro$)
   
   'Abfrage: Wenn der Status <> 99 ist sollte das Dokument zum bearbeiten gehen, anosnten nur das AZ & Admin!!!   
   If source.FieldGetText("Status") <> 99 Or (source.FieldGetText("Status") = 99 And (Rollen(0) = "[Admin]" Or Rollen(0) = "[AZ]"))Then
      Continue = True

Dieser Code funktioniert im QueryModeChange, aber im QueryOpen nicht, wo baue ich den Code jetzt ein damit er wenn er direkt in der Ansicht auf bearebiten geht, das das Bearbeiten unterbunden wird!

Mfg & Danke
Horst

jens p:
Hallo,

ich denke zu dem Thema passt ganz gut der Beitrag aus den AtNotes Best Practices "EditMode für bestimmte Dokumente verwehren" (http://www.atnotes.de/index.php?topic=20455.0).

Grüße
Jens P.

wuwu:
Hallo Jens,

genau das hab ich gesucht, auf Best Practices habe ich in dem moment nicht geschaut, sorry!

Danke
Mfg Horst

Navigation

[0] Themen-Index