Letzten Datensatz ins Formular Laden
Verfasst: Mi 15. Jul 2020, 13:22
Hallo
Habe 2 Tabellen mit jeweils zwei Zahlfelder, die eine Beziehung zwischen ihren Primärschlüssel id haben also eine 1-1 Beziehung. Im Formular sind sie auch so als MainForm und SubForm abgebildet. Hier gibt es auch 3 Buttons die jeweils ihrem Namen analoge Aktion eingestellt haben. (Speichern, Neuer Datensatz und Letzter Datensatz)
Wenn ich normal Daten eingebe und dann auf den Speichern Button drücke funktioniert es wie erwartet. Wenn ich auf Neuer Datensatz Drücke werden die Felder beider Formulare geleert wie erwartet. Der Button Letzter Datensatz wird erst aktiv wenn ich den Button neuer Datensatz gerückt habe, weiss nicht wieso er vorher micht aktiv wird . Er ist dem MainForm zugeordnet, wenn ich ihn der SubForm zuordne wird er nie aktiviert. Mein Hauptproblem ist wenn ich den Button Letzter Datensatz klicke wird nur im oberen Mainform der letzte Datensatz geschrieben, das Subformular bleibt leer. Wenn ich jetzt versuche daten einzugeben im Subformular gibt’s beim speichern ein sql exception da ja die Primärschlüssel nicht übereinstimmen. Ich möchte das in beide Formulare der jeweiliger letzte Datensatz geladen wird. Habe auch zusätzlich versucht beim button Letzter Datensatz unter Ereigniss „Aktion Ausführen“ folgendes Makro auszuführen, es hat aber nichts gebracht.
Sub LadeLetztenDatensatz
DIM oForm AS OBJECT
DIM oSubForm AS OBJECT
DIM oDoc AS OBJECT
DIM oDrawpage AS OBJECT
oDoc = thisComponent
oDrawpage = oDoc.drawpage
oForm = oDrawpage.forms.getByName("MainForm")
oSubForm = oForm.getByName("SubForm")
oForm.last()
oSubForm.last()
End Sub
Was auch nicht geht: wollte das beim Laden des Formulars der letzte Datensatz geladen wird. Habe im Mainform und SubForm als Ereignes „Beim Laden“ obige Makro hinzugefügt. Da passiert leider gar nichts beim laden.
Hat jemand eine Idee was ich in diesen beiden Fällen (letzter Datensatz laden beim öffnen des Formulars und letzter Datensatz laden per Button) machen muss ?
Danke
[img][img]
Habe 2 Tabellen mit jeweils zwei Zahlfelder, die eine Beziehung zwischen ihren Primärschlüssel id haben also eine 1-1 Beziehung. Im Formular sind sie auch so als MainForm und SubForm abgebildet. Hier gibt es auch 3 Buttons die jeweils ihrem Namen analoge Aktion eingestellt haben. (Speichern, Neuer Datensatz und Letzter Datensatz)
Wenn ich normal Daten eingebe und dann auf den Speichern Button drücke funktioniert es wie erwartet. Wenn ich auf Neuer Datensatz Drücke werden die Felder beider Formulare geleert wie erwartet. Der Button Letzter Datensatz wird erst aktiv wenn ich den Button neuer Datensatz gerückt habe, weiss nicht wieso er vorher micht aktiv wird . Er ist dem MainForm zugeordnet, wenn ich ihn der SubForm zuordne wird er nie aktiviert. Mein Hauptproblem ist wenn ich den Button Letzter Datensatz klicke wird nur im oberen Mainform der letzte Datensatz geschrieben, das Subformular bleibt leer. Wenn ich jetzt versuche daten einzugeben im Subformular gibt’s beim speichern ein sql exception da ja die Primärschlüssel nicht übereinstimmen. Ich möchte das in beide Formulare der jeweiliger letzte Datensatz geladen wird. Habe auch zusätzlich versucht beim button Letzter Datensatz unter Ereigniss „Aktion Ausführen“ folgendes Makro auszuführen, es hat aber nichts gebracht.
Sub LadeLetztenDatensatz
DIM oForm AS OBJECT
DIM oSubForm AS OBJECT
DIM oDoc AS OBJECT
DIM oDrawpage AS OBJECT
oDoc = thisComponent
oDrawpage = oDoc.drawpage
oForm = oDrawpage.forms.getByName("MainForm")
oSubForm = oForm.getByName("SubForm")
oForm.last()
oSubForm.last()
End Sub
Was auch nicht geht: wollte das beim Laden des Formulars der letzte Datensatz geladen wird. Habe im Mainform und SubForm als Ereignes „Beim Laden“ obige Makro hinzugefügt. Da passiert leider gar nichts beim laden.
Hat jemand eine Idee was ich in diesen beiden Fällen (letzter Datensatz laden beim öffnen des Formulars und letzter Datensatz laden per Button) machen muss ?
Danke
[img][img]