OpenOffice.info

Verfasst: **Di, 27.09.2011 15:00**

S.Eder hat geschrieben:Also das mit den wrong parametern ist einfach ein "Variablen - Übergabe" Fehler?

Die Fehlermeldung kommt bei der Übergabe einer falschen Anzahl von Parametern.

Die Sub refresh_FA erwartet einen [event-]Parameter.
Der wird automatisch übergeben, wenn die Prozedur über das Ereignis aufgerufen wird.

Verfasst: **Di, 27.09.2011 15:02**

Ist es möglich einen globalen Button zu erstellen? - Um einen kompletten Datensatz zu erzeugen

Aus dem Filter + leeren Formular ? So wäre meine aktuelle Idee...

lg

Verfasst: **Mi, 28.09.2011 09:00**

Soo, hab jetzt ein Makro gefunden das anscheinen von einem Kontrollfeld in das andere übertragt.
Jedoch kann ich es selber nicht umschreiben

, falls irgendwer Zeit hat würde er mir hier sehr weiterhelfen. Damit der Filter in das Formular übernommen wird ...

Code: Alles auswählen

    Sub KUNDENNUMMER_UEBERNEHMEN

    'ziel:       fmtkdnr
    'quelle:    txtkdnr

    Dim oFeld as variant
    Dim oDoc as variant
    Dim oForm as variant

       oDoc = ThisComponent
       oForm = oDoc.DrawPage.Forms.getByName("Kunde")
    '   oForm.reload()
       oFeld = oForm.getbyname("txtkdnr")
       iKdNr = oFeld.text
       
       If iKdNr = "" then
          sNachricht = "Neuen Kunden erst speichern! " + chr(13) + "Dann erneut übertragen. "
          If MsgBox (sNachricht ,48+1,"ACHTUNG") = 1 Then exit sub
       End If
       
       oForm2 = oDoc.DrawPage.Forms.getByName("rechnungen")
       oFeld2 = oForm2.getbyname("fmtkdnr")

       If oFeld2.text <> "" then
          sNachricht = "Kunde schon eingetragen! " + chr(13) + chr(13)+ "Soll der vorhandene Eintrag ersetzt werden? "
          If MsgBox (sNachricht ,32+1,"ACHTUNG") = 2 Then exit sub
       End If

       oFeld2.text = iKdNr
               
    End Sub

Verfasst: **Mi, 28.09.2011 18:32**

Dein Formular zeigt 2 verschiedene Daten an ... wenn Du so willst: Du hast 2 Formulare in einem Fenster:

Eines heißt 'MainForm' und zeigt die Daten aus der Tabelle 'tab_smd1'
das andere heißt 'frm_FA' und zeigt die Daten aus der Tabelle 'tab_FA'

WAS möchtest Du jetzt WOHIN geschrieben haben?

g

Verfasst: **Do, 29.09.2011 16:16**

Ich möchte alles in tab_smd1 schreiben. ( tab_FA soll nur eine Hilfestellung sein damit man es nicht von Hand eingeben muss)

lg

Verfasst: **Fr, 30.09.2011 11:57**

Füg' einfach im Makro "refresh_FA" vor dem "End Sub" Folgendes ein:

Code: Alles auswählen

oForm.getByName("txtBaugruppe").text           = ofrm_FA.getByName("txtBaugruppe").text
oForm.getByName("txtFA").text                  = oFeld.StringItemList( id )
oForm.getByName("txtStückzahl FA gesamt").text = ofrm_FA.getByName("txtStückzahl FA gesamt").text
oForm.getByName("txtVersion").text             = ofrm_FA.getByName("txtVersion").text

g

OpenOffice.info

Formular mit GET/POST

Re: Formular mit GET/POST

Re: Formular mit GET/POST

Re: Formular mit GET/POST

Re: Formular mit GET/POST

Re: Formular mit GET/POST

Re: Formular mit GET/POST