Domino 9 und frühere Versionen > ND6: Entwicklung

Inhalte eines Dokuments werden gelöscht bei Feldzuweisung

(1/4) > >>

C_T:
Hallo liebe Notesgemeinde,

ich habe folgendes Problem:

Beim öffnen eines Dokumentes, welches eine Queryopen und ein Postopenfunktion hat, werden bei einer Feldzuweisung im Postopen alle Inhalte im Dokument gelöscht.

Also

1. Doppelklick auf das gewünschte Dokument

2. Queryopen kontrolliert ob der Benutzer rechte hat das Dok zu öffnen (hat er)

3. QueryOpen wir gestartetet

3.1. DAs Dokument wird auf uidoc.editmode = true gesetzt
3.2. Es wird geprüft ob die Variable/Feld auf "True" gesetzt ist.
3.3. Das Feld wird auf "True" gesetzt --> Inhalt des Dokuments wird gelöscht
3.4. - XXX andere Sachen

Anbei die Stelle die Probleme verursacht


--- Code: ---Sub Postopen(Source As Notesuidocument)

REM Umgebung
    Dim workspace As New NotesUIWorkspace
    Dim session As New NotesSession

REM Standard
    Dim doc As NotesDocument
    Dim db As NotesDatabase
    Set db = session.CurrentDatabase
    Set doc = source.Document

    Call Anonymisieren

    Call SetBewertung
End Sub

Sub Initialize
    Set workspace = New NotesUIWorkspace
    Set  session = New NotesSession
    Set db = session.CurrentDatabase
    Set uidoc = workspace.CurrentDocument
    Set doc = uidoc.Document
End Sub

Sub Anonymisieren '(Aufgerufen durch QueryOpen)
    Set uidoc = workspace.CurrentDocument
    uidoc.EditMode = True
End Sub

Sub SetBewertung '(Aufgerufen durch QueryOpen)
    If Not (doc.Anonym(0) = "True")  Then
        doc.Anonym = "True" '<-- Hier werden die INhalte gelöscht
        If uidoc.EditMode= False Then
            uidoc.EditMode = True
        End If
        If doc.Bewertungskey(0) <> "" Then
            Call uidoc.Save
        End If
    End If
.....
End Sub

--- Ende Code ---

P.S. Der Code des queryopens und postopens liegen in einer Scriptlibary....

Ich hoffe ihr könnt mir helfen und ich konnte mich verständlich ausdrücken

MFG
Christian

DannyCrown:
mh, weiß zwar nicht warum es so nicht geht, aber hast du es mal mit der anderen Schreibweise probiert?

call doc.ReplaceItemValue( "Anonym", True) ?

C_T:
ich habe mal die schreibweise geändert keine änderung.

Doch ich habe jetzt auch mal testweise die zeile auskommentiert und das dokument wird nicht gelöscht.....

Ich meine häääää warum?

ascabg:
Hallo,

Ich frage auch mal so in s Blaue hinein.

Werden die Werte wirklich geloescht (Felder geleert) oder existieren "HideWhen-Formeln", die die betreffenden Felder einfach nur ausblenden, wenn der Wert im Feld "Anonym" auf den Wert "True" gesetzt wird.


Andreas

DAU-in:
wenn du dir im Debugger die Items ansiehst, werden die wirklich an dieser Stelle gelöscht?
Haben die bis zu dieser Stelle Werte und stehen sie auf ""?


Falls nicht:
Wird evt. zur Anzeige danach eine andere Maske angezogen?

grüsse

Dau-in

Navigation

[0] Themen-Index

[#] Nächste Seite