Dokument nach Änderung aktualisieren

[dasRalph]

Hallo,

folgende Situation:

ich hab eine Datenbank, in der meine Leute einen speziellen Antrag erstellen können. Dieser Antrag soll dann zu einer anderen Abteilung gehen, wo er bearbeitet wird. Dieses Weiterleiten sieht so aus, dass im vom Antragsteller erzeugtem Dokument ("alte Maske") ein Aktionsknopf ist, der ein neues Dokument erzeugt (@command([compose]; "neue Maske")). Diese(s) neue Maske(Dokument) öffnet sich aber in einem neuen Fenster (ähnlich wenn ich bei Mail's auf Weiterleiten klicke). Wenn nun das Dokument "neue Maske" gespeichert wird, dann wird im Ursprungsdokument ("alte Maske") der Status geändert (ein Feld welches nur eine Zahl enthält).

Problem:

Nach dem Speichern von "neue Maske" wird dies Dokument/Fenster geschlossen und ich sehe wieder das Ursprungsdokument ("alte Maske") wo sich aber der Status nicht geändert hat, da es nicht aktualisiert wurde. Außerdem ist der Knopf "weiterleiten" noch da. Er ist nur sichtbar, wenn der Status einen bestimmten Wert hat, da dass Dokument sich aber nicht aktualisiert hat, ist der Knopf auch nicht verschwunden.

möglich vorstellbare Lösungen (die aber nicht funktionieren):

1) Das Dokument "neue Maske" kann beim Speichern/Schließen das Ursprungsdokument ("alte Maske" aktualisieren. Ich hatte hier schon "refresh" und "reload" probiert, aber beides nicht hinbekommen

2) Das Dokument "neue Maske" öffnet sich im selben Fenster wie das Ursprungsdokument, "überschreibt" es also. Dazu hab ich den Knopf "weiterleiten" so programmiert: "@SetFrameSet(_Top); (@command([compose]; "neue Maske")". Vom optischen siehts gut aus, nur übernimmt jetzt das neue Dokument nicht mehr die Werte aus dem Ursprungsdokument  

Hat jemand einen Tipp für mich

Besten Dank, Ralph

[dasRalph]

Beim Zähneputzen ist es mir eingefallen:

Sub Click(Source as Button)
   Dim workspace As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Set uidoc = workspace.CurrentDocument
   Call workspace.ComposeDocument("","","neue Maske")
   Call uidoc.Close
End Sub


falls jetzt aber auch noch jemand einen Tip für's Aktualisieren hat ...


Ralph

[klaussal]

... vielleicht ein tipp:

Sub Exiting(Source As Field)
  Dim workspace As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Set uidoc = workspace.CurrentDocument
  Call uidoc.RefreshHideFormulas
End Sub

[Axel]

... vielleicht ein tipp:

Sub Exiting(Source As Field)
  Dim workspace As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Set uidoc = workspace.CurrentDocument
  Call uidoc.RefreshHideFormulas
End Sub

Hi,

das Ganze hat einen kleine Haken. Wenn der Cursor in diesem Feld steht und der User das Dokument speichert bzw. schließt, wird das Exiting - Event nicht ausgeführt.

Axel

[klaussal]

.. hab ja nicht gesagt, dass er das im exiting-ereignis machen soll. man kann dieses fragment ja auch woanders einbauen