19. Juli 2010 14:55
19. Juli 2010 15:08
IF Nebentabelle.INSERT then;
19. Juli 2010 15:10
Herdi hat geschrieben:Ziel ist in der Tabelle B für jede vorkommende Datengruppe (Gruppe 1, Gruppe 2, usw.) einen Satz anzulegen.
Import | Ist | Ziel |
Gruppe 1 | Gruppe 1 | Gruppe1 |
Gruppe 1 | ||
Gruppe 1 | ||
Gruppe 2 | Gruppe 2 | Gruppe 2 |
Gruppe 2 | ||
Gruppe 3 | Gruppe 3 | Gruppe 3 |
Gruppe 1 | Gruppe 1 | |
Gruppe 3 | Gruppe 3 | |
Gruppe 2 | Gruppe 2 |
19. Juli 2010 15:41
ParamVerw.HoleCode(SatzArtCodeVar);
ParamVerw.HoleSatzArtTyp(SatzArtTypVar);
IF (Satzartencode <> SatzArtCodeVar) OR (Satzartentyp <> SatzArtTypVar) THEN BEGIN
ParamVerw.SetzeCode(Satzartencode);
ParamVerw.SetzeSatzArtTyp(Satzartentyp);
BelegStapelEingelesen.INIT;
BelegStapelEingelesen.Satzartencode := Satzartencode;
BelegStapelEingelesen.Satzartentyp := Satzartentyp;
BelegStapelEingelesen."Belege/BuBlätter autom. erst." := SatzArtTyp."Autom. Belege/Stapel erstellen";
BelegStapelEingelesen."autom. buchen" := SatzArtTyp."Erst. Belege/Stapel Autobuchen";
BelegStapelEingelesen."autom. Bericht als PDF" := SatzArtTyp."Erst. Belege/Stapel Autodruck";
// BelegStapelEingelesen.INSERT(TRUE);
IF BelegStapelEingelesen.INSERT(TRUE) THEN BEGIN
"Lfd. Nr. Beleg eingelesen" := BelegStapelEingelesen."Lfd. Nummer";
ParamVerw.SetzeInteger(BelegStapelEingelesen."Lfd. Nummer");
END ELSE ParamVerw.HoleInteger("Lfd. Nr. Beleg eingelesen");
Natalie hat geschrieben:Herdi hat geschrieben:Ziel ist in der Tabelle B für jede vorkommende Datengruppe (Gruppe 1, Gruppe 2, usw.) einen Satz anzulegen.
Habe ich nicht verstanden - kannst du ein Beispiel geben?
Typ | Art |
1 | Auszug |
1 | Auszug |
2 | Druck |
2 | Druck |
1 | Auszug |
3 | Test |
3 | Test |
Import | Ist | Ziel |
Gruppe 1 | Gruppe 1 | Gruppe1 |
Gruppe 1 | ||
Gruppe 1 | ||
Gruppe 2 | Gruppe 2 | Gruppe 2 |
Gruppe 2 | ||
Gruppe 3 | Gruppe 3 | Gruppe 3 |
Gruppe 1 | Gruppe 1 | |
Gruppe 3 | Gruppe 3 | |
Gruppe 2 | Gruppe 2 |
19. Juli 2010 15:50
Herdi hat geschrieben:@fiddi: Leider klappt das nicht so einfach, habe es schon so ausprobiert...
19. Juli 2010 15:55
19. Juli 2010 16:03
19. Juli 2010 16:05
Herdi hat geschrieben:Beim Schreiben von Daten in die Tabelle A merke ich mir beim Durchlaufen des OnInsertTriggers in einer Nebentabelle B 3 Felder der Tabelle A.
TabB.SETRANGE(Feld2, 'A');
TabB.SETRANGE(Feld3, 'B');
TabB.SETRANGE(Feld4, 'C');
IF TabB.ISEMPTY THEN BEGIN
TabB.INIT;
TabB.Feld1 := NeuerInteger;
TabB.Feld2 := 'A';
TabB.Feld3 := 'B';
TabB.Feld4 := 'C';
END;
19. Juli 2010 16:05
fiddi hat geschrieben:Das ist Korrekt. Ich vergaß zu erwähnen, das der Primärschlüssel deiner Tabelle B die Felder enthalten muss, die nur einmal vorkommen dürfen.
BelegStapelEingelesen.SETRANGE(Satzartencode,Satzartencode);
BelegStapelEingelesen.SETRANGE(Satzartentyp,Satzartentyp);
IF NOT BelegStapelEingelesen.FINDLAST THEN BEGIN
BelegStapelEingelesen.INIT;
BelegStapelEingelesen.Satzartencode := Satzartencode;
BelegStapelEingelesen.Satzartentyp := Satzartentyp;
BelegStapelEingelesen."Belege/BuBlätter autom. erst." := SatzArtTyp."Autom. Belege/Stapel erstellen";
BelegStapelEingelesen."autom. buchen" := SatzArtTyp."Erst. Belege/Stapel Autobuchen";
BelegStapelEingelesen."autom. Bericht als PDF" := SatzArtTyp."Erst. Belege/Stapel Autodruck";
BelegStapelEingelesen.INSERT(TRUE);