Problem mit Datenübergabe

[frankie07]

Hallo zusammen,

ich bin ein ziemlicher Script Neuling und brauche mal eure Hilfe.
Ich habe folgenden Code, mit dem ich beim klicken auf eine Schaltfläche ein ganz bestimmtes Dokument öffne:

Dim session As New notessession
Dim db As notesdatabase
Dim doc As notesdocument
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
   
Set db = session.currentdatabase
Set doc = db.getDocumentByUNID ("78E5B66BE7BA1B27C1257313002AE7EF")
Call ws.EditDocument(True, doc)

Jetzt würde ich noch gerne ein paar Werte aus dem ersten Dokument an das über die Schaltfläche geöffnete Dokument übergeben. Kann mir da jemand helfen?

[DAU-in]

welches ist das erste Dokument?

[frankie07]

Das erste Dokument ist das, in dem die Schaltfläche ist und aus dem ich Werte in das gerade geöffnete übergeben will.
Hast du das gemeint?

[bikerboy]

dein Dokument ist doch das uidoc ....


Also

uidoc.Feldname = doc.getitemValue("FeldName")(0)

[frankie07]

... wie gesagt, bin kein guter Scripter :-(

des schaut jetzt so aus:
Dim session As New notessession
Dim db As notesdatabase
Dim doc As notesdocument
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
   
Set db = session.currentdatabase
Set doc = db.getDocumentByUNID ("78E5B66BE7BA1B27C1257313002AE7EF")
Call ws.EditDocument(True, doc)
uidoc.test = doc.getitemValue("avd_kont_art")(0)

Funktioniert aber nicht. das Feld "test" ist in dem gerade geöffneten Dokument. Das Feld "avd_kont_art" will ich übergeben.

[DAU-in]

das uidoc ist aber noch gar nicht gesetzt, fahrradlbua!


Er besorgt sich ein Dokument im Backend und öffnet es im Frontend.

wenn das erste das bereits geöffnete sein soll und mit dem uidoc angesprochen werden soll, muss er das uidoc erst einmal setzen, dann das backend dokument holen,  dann die Werte aus dem Frontend in das Backenddokument übertragen (also genau andersrum als bei dir ) und dann das Backenddokument öffnen.

aber ich bezweifle, dass das wirklich die gewünschte Reihenfolge ist.

[DAU-in]

... wie gesagt, bin kein guter Scripter :-(

des schaut jetzt so aus:
Dim session As New notessession
Dim db As notesdatabase
Dim doc As notesdocument
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
   
Set db = session.currentdatabase
Set doc = db.getDocumentByUNID ("78E5B66BE7BA1B27C1257313002AE7EF")
Call ws.EditDocument(True, doc)
uidoc.test = doc.getitemValue("avd_kont_art")(0)

Funktioniert aber nicht. das Feld "test" ist in dem gerade geöffneten Dokument. Das Feld "avd_kont_art" will ich übergeben.

sorry, aber was sagt dein Debugger zu dem Ganzen?

[bikerboy]

hmmm ich hatte nur kurz auf die Deklaration geachtet,

dachte wir haben hier nur Snippets.

Dann holt er sich halt das aktuelle uidoc mit

Code

Set uidoc = ws.currentdocument

das sollte ja dann das Dokument sein in dem er den Knopf gedrückt hat.

[Axel]

uidoc.test = doc.getitemValue("avd_kont_art")(0)

So kann das schon mal überhaupt nicht funktionieren.

Wenn du das mit dem uidoc machen willst, dann so:

Call uidoc.FieldSetText("Test", doc.getitemValue("avd_kont_art")(0))


Axel

[DerAndre]

Ich hätte da mal ne Frage. Mit Formula hast Du schon gearbeitet?
Wieviel Erfahrung hast Du in der Notesprogrammierung?

Was soll da eigentlich erreicht werden? Für mich sieht das aus, als das da was für eine Anzeige übergeben werden soll. Warum also nicht Notes die Arbeit machen lassen? Felder mit gleichem Namen und Werte automatisch übergeben?

[DerAndre]

Dominoforum

Bitte nochmal die Regeln lesen... 

X-Post

[frankie07]

Wenn ich das jetzt so mache:

Dim session As New notessession
Dim db As notesdatabase
Dim doc As notesdocument
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
   
Set db = session.currentdatabase
Set doc = db.getDocumentByUNID ("78E5B66BE7BA1B27C1257313002AE7EF")
Call ws.EditDocument(True, doc)
Call uidoc.FieldSetText("Test", doc.getitemValue("avd_kont_art")(0))

Kommt die Meldung: "Object Variable not set"

[DAU-in]

weil du das uidoc nicht setzt.

ich fürchte, dir fehlen jegliche Grundlagen für die Programmierung.

[pete_bla]

Hi,

hast du jetzt das mit dem X-Posting verstanden ?
(ich glaub nicht ganz - ich hab zumindest noch keinen verweis im "domino-forum" auf dieses Posing gefunden)

Dominoforum

Bitte nochmal die Regeln lesen... 

X-Post

Ansonsten wird Dir sicher gleich Deine Problemlösung verraten... 

Nur nochmal so viel zu deinem Script:
doc ist ja das Dokument, dass du öffnen willst.
UIDoc hast du Deklariert (Dim uidoc As NotesUIDocument )
aber noch nicht zugewiesen, ich vermute du willst das aktuelle, aus dem Du die Schaltfläche betätigst. -> gleich nach dem Dim ein "Set UIDoc = WS.CurrentDocument"

Ausserdem musst du noch das UIDoc des geöffneten zuweise. (Du hast es zwar als doc aber eben noch nicht als UIDoc. Nennen wir es besser UIDoc2 - sonst wirds nachher verwirrend!)

Das ganze wäre aber auch ohne LSC lösbar.

Mehr aber erst, wenn Du Dich an die Regeln hälst!

Gruss, Pete(r)

[frankie07]

Jetzt hab ichs verstanden. Sorry, ich wollt gegen keine Regeln verstoßen, war keine Absicht!!!!

Hier der Link: http://www.dominoforum.de/modules/newbb/viewtopic.php?topic_id=16809&forum=47

[bikerboy]

Ich persönlich bin kein Freund des uidocs, deswegen würde ich die dein Uidoc so intanzieren

Set uidoc = ws.currentDocument.document

du solltest aber deine Dekleration auf

Dim uidoc as NotesDocument

ändern sonst fliegt es dir um die ohren.

Die Änderungen werden dann trotzdem im geöffneten Document angezeigt. Falls dies nicht der Fall sein sollte kannst mit einem

call ws.currentdocument.refresh

nachhelfen

[DerAndre]

Mach in Deinen Options auf jeden Fall ein

Option Declare

damit wirst Du gezwungen alle Variablen zu deklarieren und Bau eine Fehlerbehandlung ein, das erleichtert Dir die Suche bei Fehlern ungemein.

Dim uidoc as notesdocument

ist verwirrend. Variable mit präfix ui ( also Frontend ) und dann als notesdocument ( also Backend ) deklarieren ist nix.

[DAU-in]

also, mit uidoc ein Backenddokument zu bezeichnen halte ich für ziemlich gefährlich, Fahradlbua.
Wenn ich von einem anderen Code übernehme, und die Variablen beginnen mit ui, dann erwarte ich ein Frontentobjekt und kein Backend.

[bikerboy]

ein spiel mit dem feuer ich weiss, aber man muss ja nur einmal einen blick auf die deklaration werfen oder da ich ein kompromissbereiter mensch bin :

Dim currentDoc as NotesDocument

Set  uidoc = ws.currentDocument

Set currentDoc = uidoc.Document

Mir ging es ja nur darum dass er nicht den überblick bei seinen variablen verliert.

[Driri]

Sehe ich anders. So etwas sollte man sich gar nicht erst angewöhnen. Das mag bei kurzen Scripten noch gutgehen, aber spätestens bei umfangreichen Skriptbibliotheken schaut da niemand mehr durch - auch der Entwickler des Scriptes i.d.R. nicht mehr.