Import von lokalen Adressen .. danach refresh

[adminnaddel]

Hallo liebe Gemeinde,

ich lasse mir Personendocs aus dem lokalen Adressbuch in einer andere Db via picklist kopieren und erstellen.

Das Script habe ich hier mal irgendwo gefunden  und individuell angepasst.

Die Routine wird aus einer View gestartet und bestimmte Felder aus dem Personendoc werden ins neue Doc kopiert.

Anschließend laufe ich mit einem refresh (manuell) über alle docs in meiner View um die berechneten Felder mit den übergebenen Daten zu füllen.

Aber dieses manuelle ist lässtig und es wäre schön dieses durch einen code abzulösen.

Die Übergaberoutine endet mit

Call .Save(True, True)

Hier müsste jetzt aber das doc wohl noch geöffnet werden damit die computed fields gefüllt werden 

Einen kurzen Tipp?

lg
Andy

[adminnaddel]

Okay ... ich starte jetzt einfach anschließend den Agent .. der erledigt mir das:

Dim agent As NotesAgent
Set agent = dbThis.GetAgent("RefreshAll")
Call agent.run

Aber nun bleibt leider noch immer das Problem mit meiner UI-View aus der ich alles gestartet habe und derzeitig mir nur mit einem Tastendruck F9 das doc anzeigt :-(

Versuch mit:

Dim Main As NotesView
Set db = session.CurrentDatabase
Set Main = db.GetView("Main")
Call Main.Refresh

passiert nichts 

lg
Andy

[koehlerbv]

Call notesUIWorkspace.ViewRefresh

[adminnaddel]

  wie oft hatte ich schon diese Zeile eingefügt, mein Gott!

Danke

lg
Andy

[Sebastian Botz]

Hallo zusammen,

läßt sich das Problem denn nicht mit der ComputeWithForm Methode der NotesDocumentClass lösen?
Meines Erachtens werden dabei auch Computed Felder berechnet.

Viele Grüße

Sebastian

[master]

Hallo
ich denke die Mischung machts.
ComputeWithForm für den Import (spart den Agent)
Call notesUIWorkspace.ViewRefresh für die Ansicht

Gruß Klaus