0

Die Mitnahme von Datensätzen einer Verknüpften Datenbank

Hallo Zusammen, 

Ich habe ein kleines Problem, bei dem ich hoffe Ihr könnt mir helfen. 

 

Ich habe folgende Datenbankstruktur: 

(Auszug) 

Kunden > Kommissionsliste > Kommissionsposten 
Rechnungen > Rechnungsposten 
Lager > Artikel 

In der Unterdatenbank Kommissionsliste habe ich eine Befehlsfläche, die eine Rechnung generieren soll: 

let myKomm := this;
let newRechnung := (create Rechnungen);
let myPosition := Kommissionsposten
let newPosition := Rechnungsposten
newRechnung.(Kunde := myKomm.Kunden);
(...)

for myPosition in myKomm.Kommissionsposten do
   let newPosition := (create Rechnungsposten);
   newPosition.Artikel := myPosition.Artikel
     (...)
end

So das klappt im Prinzip auch alles ganz fein. Rechnung wird erstellt und auch die Rechnungsposten erstellen sich, doch sie sind zueinander nicht zugeordnet. 

Ich hoffe mein Problem ist verständlich und jemand kann mir weiterhelfen. 

4 Antworten

null
    • Ninox-Professional
    • planoxpro
    • vor 4 Jahren
    • Gemeldet - anzeigen

    Hallo Matthias, versuch's doch mal nach diesem Schema:

     

    let myK := Kunden;
    let newR := (create Rechnungen);
    newR.(Kunden := myK);
    [...]
    for kp in Kommissionsposten do
        let newRP := (create Rechnungsposten);
        newRP.(Rechnungen := newR);
        newRP.(Artikel := kp.Artikel)
        [...]
    end

    • Landtechnik
    • Admin.4
    • vor 4 Jahren
    • Gemeldet - anzeigen

    Danke wird direkt mal Umgesetzt! 

    • Landtechnik
    • Admin.4
    • vor 4 Jahren
    • Gemeldet - anzeigen

    Eine Frage bleibt: 

    wenn ich, sagen wir mal: 

    let myK := Kunden;
    let newR := (create Rechnungen);
    newR.(Kunden := myK);
    [...]
    for kp in Kommissionsposten do
        let newRP := (create Rechnungsposten);
        newRP.(Rechnungen := newR);
        newRP.(Artikel := kp.Artikel)
        [...]

    for kp in Kommissionsposten2 do
        let newRP := (create Rechnungsposten);
        newRP.(Rechnungen := newR);
        newRP.(Artikel := kp.Artikel)
    end

    end

    Wie verhindere ich, dass bei mehreren Kommissionsposten, die Kommissionsposten2 doppelt in der Rechnung angezeicht werden. 

    • Landtechnik
    • Admin.4
    • vor 4 Jahren
    • Gemeldet - anzeigen

    okay verstanden, 

    end;

    beendet das Skript mit Sprung in die nächste Zeile

Anmelden, um zu antworten

Content aside

Kategorien

Alle Themen anzeigen
  • vor 4 JahrenZuletzt aktiv
  • 4Antworten
  • 407Ansichten