Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: meichhorner am 15.05.03 - 16:50:07

Titel: Dokument aus eingebetteter Ansich löschen?
Beitrag von: meichhorner am 15.05.03 - 16:50:07

Hy,

entweder lässt meine Konzentration nach oder .....  ???

wie lösche ich ein Dokument aus eine eingebetteten Ansicht heraus ???

Cu
Martin

Titel: Re:Dokument aus eingebetteter Ansich löschen?
Beitrag von: Axel am 15.05.03 - 16:58:03

Hi,

geht meines Wissens nicht.


Axel

Titel: Re:Dokument aus eingebetteter Ansich löschen?
Beitrag von: meichhorner am 15.05.03 - 17:06:16

Wirklich nicht  ???

Auch kein Workaround  ???

Danke,
Martin

Titel: Re:Dokument aus eingebetteter Ansich löschen?
Beitrag von: Axel am 16.05.03 - 09:13:47

Hi,

vielleicht doch.


Schau mal hier: http://www.atnotes.de/index.php?board=7;action=display;threadid=4612;start=0 (http://www.atnotes.de/index.php?board=7;action=display;threadid=4612;start=0)


Axel

Titel: Habe einen Workaround gefunden...
Beitrag von: meichhorner am 16.05.03 - 11:30:08

Endlich klappts ...  ;D

Habe mir den Agent aus dem Posting von Rob Green http://www.atnotes.de/index.php?board=7;action=display;threadid=4612;start=0 (http://www.atnotes.de/index.php?board=7;action=display;threadid=4612;start=0) geklaut und das ganze wie folgt gelöst.

Zitat

1. Habe eine Gliederung (Outline) erstellt
2. In den Gliederungspunkt habe eine Aktion reingeschrieben:
Code:@SetEnvironment("ViewAction";"Remove");
@Command([ToolsRunMacro];"IsEmbeddedView")

2. In den Gliederungspunkt habe ich allerdings eine andere Aktion reingeschrieben:
Code: @PostedCommand([FileSave]);
@SetEnvironment("ViewAction";"delete");
@Command([ToolsRunMacro];"IsEmbeddedView");
@Command([ViewRefreshFields])

Zitat

3. dann habe ich die Gliederung in eine Maske embedded (ist der rosane Part im Bild....sorry.  )
4. in die gleiche Maske habe ich einen View embedded
5. dann einen Agent namens "IsEmbeddedView" erstellt mit Inhalt:
Code:Dim s As New NotesSession
Dim ws As New NotesUIWorkspace
Dim uiview As notesuiview
Set uiview=ws.currentview
'check to see if cursor is in the embedded view
If Not (uiview Is Nothing) Then
Call ws.currentdocument.clear
End If

Das habe ich auch so gemacht und fertig.

Den Code im Querydocumentdelete brauche ich nicht mehr.

Zitat

6. ins QueryDocumentDelete kam
Code:
Dim s As New NotesSession
Dim doc As NotesDocument
Dim ViewAction as String
ViewAction = s.GetEnvironmentString("ViewAction")
if ViewAction <> "" then
Set doc = source.documents.getfirstdocument
'here branching code would be inserted to figure out
'what to do based on the type of doc and the
'ViewAction environment variable...
Msgbox doc.universalid+Chr(13)+Chr(13)+ _
doc.address1(0), 0, ViewAction
'just testing, don't delete anyting
continue = False
'reset ViewAction
call s.SetEnvironmentVar("ViewAction","")
End If

Cu
Martin

Titel: Re:Dokument aus eingebetteter Ansich löschen?
Beitrag von: Axel am 16.05.03 - 11:50:43

Hi,

... und wie hast du das gemacht, wenn du den Code in QuerydocumentDelete nicht mehr brauchst.

Geht das auch für mehrere markierte Dokumente und kann man auch noch andere Aktionen ausführen?


Axel
 

Titel: Re:Dokument aus eingebetteter Ansich löschen?
Beitrag von: Rob Green am 16.05.03 - 12:02:54

@Axel, das Doc wurde per
Call ws.currentdocument.clear
zur Löschung freigegeben. Mehr möchte er nicht und benötigt insofern QueryDocumentDelete nicht mehr.

Das wurde nur dazu benötigt, um überhaupt ein Event zu triggern, damit man andere Sachen als Löschen machen kann. Das Löschen war nur der Trick in ein Event reinzukommen. Sonst gibt es garantiert keinen anderen Weg, leider.

Titel: Re:Dokument aus eingebetteter Ansich löschen?
Beitrag von: Axel am 16.05.03 - 12:15:43

Hi,

schade aber auch. Trotzdem danke.


Axel

Titel: Re:Dokument aus eingebetteter Ansich löschen?
Beitrag von: meichhorner am 16.05.03 - 12:19:38

Jup, genau.

ich brauche nur eine löschen AKtion.

Den Rest spare ich mir noch auf bis ich mal alle Server und CLients auf der 6er habe. ;)

Cu
Martin