Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: Thunder am 21.11.06 - 12:33:36

Titel: PostedCommand Problem
Beitrag von: Thunder am 21.11.06 - 12:33:36

Hallo Notes-Gemeinde,

ich habe folgendes Problem. Ich möchte aus einem Dokument eine Wiedervorlage erstellen und das aktuelle gleichzeitig in ein Archiv schieben. Die Maske ist so eingerichtet -> 'Formeln übernehmen Werte aus dem Dokument' und das Archiv wird über das Flag IB_Archiv gekennzeichnet.
Leider schaffe ich es momentan immer nur, daß eines von beiden funktioniert. So wie die Formel jetzt ist wird die Wiedervorlage sauber erstellt und es wandert nicht ins Archiv und wenn ich die 'Posted' Befehle rausnehme, dann klappt die Archivfunktion, aber die aktuellen Werte werden nicht übernommen...
Wie kann ich beider erzwingen?


@PostedCommand([EditDocument]);
FIELD IB_Archiv := "1";
@PostedCommand([FileSave]);
@PostedCommand([FileCloseWindow]);
@PostedCommand([Compose];"Eingabe")


Gruß
Remko

Titel: Re: PostedCommand Problem
Beitrag von: Glombi am 21.11.06 - 12:40:02

Versuchs mal so:

@Command([EditDocument]);
FIELD IB_Archiv := "1";
@Command([FileSave]);
@Command([CloseWindow]);
@PostedCommand([Compose];"Eingabe")

Andreas

Titel: Re: PostedCommand Problem
Beitrag von: Thunder am 21.11.06 - 13:06:36

Hm - leider nicht.
Das Dokument wird dann ins Archiv geschoben aber leider wird das Archivflag nicht gesetzt.

Titel: Re: PostedCommand Problem
Beitrag von: Thunder am 27.11.06 - 08:43:07

Kann doch nicht angehen, dass das nicht funktioniert.
Ich habe schon alles mögliche versucht aber es funktioniert immer nur entweder die Wiedervorlage vernünftig oder das Archivflag...  :-\
Keiner mehr eine Idee?

Titel: Re: PostedCommand Problem
Beitrag von: Glombi am 27.11.06 - 10:18:44

Ich würde es mit LotusScript versuchen, wenn es mit @Formelsprache nicht geht.

Andreas

Titel: Re: PostedCommand Problem
Beitrag von: Thunder am 27.11.06 - 10:58:42

 :'(
Würde ich gern Andreas-leider kenne ich mich damit nicht aus.

Titel: Re: PostedCommand Problem
Beitrag von: Glombi am 27.11.06 - 11:04:45

Die Formel sähe so in Script aus:

Dim ws As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Dim doc As NotesDocument
   
   Set uidoc = ws.CurrentDocument
   Set doc = uidoc.Document
   
   doc.IB_Archiv = "1"
   If uidoc.EditMode Then
      Call uidoc.Save
   End If
   
   Call doc.Save( True, True, True )
   
   Call ws.ComposeDocument( "", "", "Eingabe")
   Call uidoc.Close



Du kannst es ja mal damit versuchen. Das ganze in Sub Click eines Buttons oder einer Aktion.

Andreas

Titel: Re: PostedCommand Problem
Beitrag von: Thunder am 27.11.06 - 12:06:15

Jaaa - so klappt das dann auch !     :D
Danke Andreas.

Jetzt kann ich endlich weitermachen mit der DB.
Eine schöne Woche noch.