Re: Daten auf mehrere Formulare verteilen - verknüpfen
Verfasst: Fr, 21.01.2011 11:01
da steht beschrieben wie Du einen Filter in ein (anderes) Formular setzen kannst
viewtopic.php?f=18&t=19988
Dieser Code könnte auch funktionieren:
vergiss nicht, beim Schliessen des Formulars den Filter zu entfernen ('oForm.ApplyFilter = false')
zu "Kundeninfo anlegen":
wenn du vor dem Filteraufruf für "Kundeninfo anzeigen" eine Abfrage startest, die Dir sagt ob es schon einen Infosatz zu diesem Kunden gibt dann kannst Du beide Anliegen ja in einem Makro lösen.
also:
g
viewtopic.php?f=18&t=19988
Dieser Code könnte auch funktionieren:
Code: Alles auswählen
oDoc = ThisComponent
oCtrl = oDoc.getCurrentController()
oDraw = oDoc.drawpage
oForm = oDraw.forms.getbyName("Formularname")
oForm.Filter="(KundenID = " & sKundenID & ")"
oForm.Reload
End Sub
zu "Kundeninfo anlegen":
wenn du vor dem Filteraufruf für "Kundeninfo anzeigen" eine Abfrage startest, die Dir sagt ob es schon einen Infosatz zu diesem Kunden gibt dann kannst Du beide Anliegen ja in einem Makro lösen.
also:
Code: Alles auswählen
1. Klick => Gibts Info?
-nein: ggf Nachfrage à la: "Noch kein Infosatz vorhanden! Soll einer angelegt werden?"
nein=>Exit Sub
ja=>per SQL neuen (leeren) InfoDatensatz anlegen, der nur die Kundennummer enthält
hier könnte ein Commit stehen ;)
-ja: keine Aktion
2. Formular öffnen und Filter setzen
3. Formular reload