Checkbox nicht sichtbar in Maske

[robertpp]

Hallo,

Ich stehe gerade vor einem komischen Problem.
Ich hab in einer Maske eine Checkbox-Feld mit ja|1 und nein|2. Wenn ich jetzt ein neues Doc mit der Maske erstelle dann wird das Feld auch angezeigt und ich kann einen Wert auswählen.
Wenn ich aber das doc wieder öffne dann wird es nicht mehr angezeigt. Es befindet sich auch keine Hide-when Formel in dem Abschnitt. Wenn ich per Agent das Feld wieder lösche dann wird es wieder angezeigt.
Im doc ist das Feld auch vorhanden mit Value = ""

Hat das Problem schon mal jemand gehabt?

danke robert

[robertpp]

So nach lagen ausprobieren bin ich jetzt auf die Fehlerursache gekommen ich weiß aber nicht warum das so ist:

Der Fehler ist der Code:

Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
   If (Source.IsNewDoc) Then
      Exit Sub
   End If
   Dim varLock As Variant
   Dim s As New NotesSession
   Dim doc As NotesDocument
   Dim UserName As New NotesName(s.UserName)   
   Set doc=Source.Document
   varLock=doc.GetItemValue("LockEdit")
   If (varLock(0) <> "") And Source.EditMode Then
      Msgbox ("Document is currently locked by "+varLock(0)+". A read-only copy will be opened for your use.")
      Exit Sub
   End If
   doc.LockEdit= UserName.Common
   doc.LockEditTime = Now
   Call doc.Save(True,False)
End Sub

Wenn ich den auskommentiere dann passt alles und es wird das Feld angezeigt.
Leider weiß ich immer noch nicht wie ich das lösen kann.

[Untitled]

Kannst du nicht durch auskommentieren die genaue Zeile erurieren?

[robertpp]

Was soll ich davon auskommentieren? der Code funktioniert ja nur wenn er ganz ist sonst hat er ja keinen Sinn!?

robert

[Untitled]

Srückweises auskommentieren zeigt dir genauer, welche Zeile den Fehler verursacht.

Wenn am Ende zB nur noch "doc.LockEdit= UserName.Common" steht und der Fehler trotzdem auftaucht, dann weisst du zB, dass das LockEdit oder UserName.Common das Problem ist.

Klar funktioniert der Code während diesem Prozess nicht, momentan gehts aber darum den anderen Fehler zu finden.

Untitled

[robertpp]

Das Problem was ich jetzt hab ist nicht ein Script Fehler weil da hätte ich mir natürlich zum Helfen gewusst. Das Problem liegt ganz wo anders. Wenn ich den Code auskommentiere dann sehe ich mein Checkbox-Feld in der Maske und wenn ich den Code unter Queryopen laufen lasse dann ist das Feld nicht mehr sichtbar in der Maske!!!
Das ist das eigentliche Problem.
Ich hab jetzt auch schon herausgefunden das es am Call doc.Save liegt. Wenn ich es nicht nochmals speichere dann ist das Checkbox-Feld sichbar.

Aber warum?

[Glombi]

Ich würde den Code in das Postopen setzen:

If (Source.IsNewDoc) Then
      Exit Sub
   End If
dim ws as New NotesUIWorkspace
   Dim varLock As Variant
   Dim s As New NotesSession
   Dim doc As NotesDocument
   Dim UserName As New NotesName(s.UserName)   
   Set doc=Source.Document
   varLock=doc.GetItemValue("LockEdit")
   If (varLock(0) <> "") And Source.EditMode Then
      Msgbox ("Document is currently locked by "+varLock(0)+". A read-only copy will be opened for your use.")
call Source.Close
call ws.EditDocument( false, doc )
      Exit Sub
   End If
   doc.LockEdit= UserName.Common
   doc.LockEditTime = Now
   Call doc.Save(True,False)


Das Queryopen stellt nicht alles zur Verfügung, was man so braucht. Da gibt es offenbar auch Unterschiede zwischen Notes 5 und 6-

Andreas

[Untitled]

Das Problem was ich jetzt hab ist nicht ein Script Fehler weil da hätte ich mir natürlich zum Helfen gewusst.

Ist mir schon klar, den Checkbox-Fehler solltest du ja mit dem Auskommentieren finden

Ich hab jetzt auch schon herausgefunden das es am Call doc.Save liegt.

Das war das Ziel  

Dass kann aber auch bedeuten, dass es einer dieser Zeilen ist:

Code

   
doc.LockEdit= UserName.Common
doc.LockEditTime = Now

Denn wenn du das Doc nicht speicherst, werden auch diese Felder nicht übernommen.

Versuch mal diese zwei Zeilen rauszunehmen, dafür das doc.save wieder rein. Ich vermute, die Checkbox ist dann sichtbar.

Grüsse
Untitled

[robertpp]

So Problem gelöst.

@Untitled: Wäre mal interessant wie du wirklich heißt. Und an den zwei Einträgen hat es nicht gelegen das hab ich davor schon ausprobiert und war das gleiche Problem.

@Andreas: Danke, nachdem ich es ins Postopen gegeben habe hat es gepasst.

Aber absolut unerklärlich warum da das Checkbox-Feld nicht angezeigt wird.

danke robert

[Untitled]

Ich heisse Moritz