Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Fbaum am 17.07.02 - 08:40:24

Titel: Dokument mit anderer Maske bearbeiten
Beitrag von: Fbaum am 17.07.02 - 08:40:24
Hallo,
ich habe folgendes Problem:
Ein Dokument wird mit der Maske A erstellt. Nach dem Speichern wird diese Maske A durch Maske B ersetzt. Das Dokument wird also beim Öffnen mit Maske B angezeit. So solls auch sein.
Gibt es nun eine Möglichkeit, wenn ich das geöffnete Dokument editiere, daß es automatisch wieder in der Maske A angezeigt wird??
Danke für Eure Hilfe.
Gruß
FBaum
Titel: Re: Dokument mit anderer Maske bearbeiten
Beitrag von: Till_21 am 17.07.02 - 09:45:02
Augen auf :

http://www.atnotes.de/cgi-bin/yabb/YaBB.pl?board=002-2;action=display;num=1026736508
Titel: Re: Dokument mit anderer Maske bearbeiten
Beitrag von: Fbaum am 17.07.02 - 10:38:00
Hallo,
ich will das Dokument ja nicht aus einer Ansicht aus mit ner anderen Maske aufmachen.
Das Dokument wird zur Vorschau mit Maske B geöffnet. Die Daten werden jetzt mit Maske B angezeigt. Wenn ich nun auf einen Button BEARBEITEN klicke möchte ich, daß das Dokument von Maske B zur Maske A wechselt.
Weiß nicht ob sowas überhaupt geht.
Gruß FBaum
Titel: Re: Dokument mit anderer Maske bearbeiten
Beitrag von: rar am 17.07.02 - 11:25:23
Probier mal im Querymodechange, wenn es in EditMode wechselt, das Dokument ins Backend zu holen, das UIDoc zu schließen, die Form des doks auf die Maske 2 zu ändern und dann mit ws.EditDocument wieder das Doc zu öffnen.
Vielleicht klappts so.
-rar
Titel: Re: Dokument mit anderer Maske bearbeiten
Beitrag von: Fbaum am 17.07.02 - 11:33:52
Gibt´s noch nen Tip...Mit Lotusscript ist bei mir noch nicht so weit her... Wird aber noch !!
Danke und Gruß
FBaum
Titel: Re: Dokument mit anderer Maske bearbeiten
Beitrag von: rar am 17.07.02 - 13:01:57
Ins Queryopen der Maske Schreibst du:

Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Dim ws As New NotesUIWorkspace
Set uidoc = Source
If uidoc.EditMode = False Then
    Set doc = uidoc.Document
    Call uidoc.close()
    doc.Form = "Maske B"
    Call ws.EditDocument(True,doc)
End If


Im Querysave mußt du auch abfragen, ob das Document gleich im Bearbeitungsmodus geöffnet wird. Wenn Ja, mußt du ja auch die Maske wechseln.
Gleiches Script nur mit der Änderung
If uidoc.EditMode = True Then

Und im Querysave muß die Maske wieder auf Maske A umgesetzt werden
Einfach:
Source.Document.Form = "Maske A"

Das müßte es eigntlich sein.
Wenn was nicht passt, laß es mich wissen.

-rar
Titel: Re: Dokument mit anderer Maske bearbeiten
Beitrag von: Fbaum am 17.07.02 - 13:16:02
Hallo,
funktioniert soweit. Nur musste ich das Script ins QuerymodeChange Ereignis eintragen.
Aber es geht.
Vielen Dank und Gruß
FBaum  :)
Titel: Re: Dokument mit anderer Maske bearbeiten
Beitrag von: rar am 17.07.02 - 13:39:55
Sorry. Natürlich gehört es ins QueryModeChange. Ich habe keine Ahnung wie sich das QueryOpen in mein Eintrag geschwindelt hat. Waren sicher irgendwelche Hacker ;)