Forum: Datenbanken
Delphi
by Hansa,
16. Okt 2004
Wie kiar das beschrieben hat, so geht es im Prinzip. Wenn schon, dann aber direkt eine stored Procedure verwenden. Ja, man lernt eben nie aus. :zwinker: Das von mir anfangs eingeführte Lager-Beispiel habe ich so realisiert (Menge soll vom Bestand abgezogen werden) :
Delphi :
procedure SchreibeLager (menge : integer);
begin
with EingDM do begin // EingDM : DataModule
...
Forum: Datenbanken
Delphi
by Hansa,
30. Jun 2003
bist hoffentlich nicht beleidigt. Ich mach jetzt einfach notfalls "Try and Error" :mrgreen:
Forum: Datenbanken
Delphi
by Hansa,
30. Jun 2003
Das geht einfacher mit IsEmpty nur mal so nebenbei bemerkt. 8) Lemmy hat mich mit seinen leeren Datenmengen trotzdem verwirrt. Lemmy, wo bist Du :?:
Forum: Datenbanken
Delphi
by Hansa,
30. Jun 2003
NULL <> 0, schon klar und wie soll ich es jetzt machen? Was ist, wenn das SELECT etwas liefert und was, wenn nicht ?
Forum: Datenbanken
Delphi
by Hansa,
30. Jun 2003
Ja, das kommt der Sache schon recht nahe. Schlau werde ich aber immer noch nicht so recht. Wie mache ich das mit vorhanden und Zugang ? Und was ist mit den leeren Datenmengen? Was muß man da beachten ?
Forum: Datenbanken
Delphi
by Hansa,
30. Jun 2003
Eben, so ähnlich ist das. Kein Lager-Dataset: Insert, aktualisieren : Update und nun kommen die Datenmangen ins Spiel. Beim Insert ist eben keine da und beim Update muß die vorhandene angepaßt werden. Nur wie ?
@Lemmy: Deine Frage vorher habe ich nicht sofort verstanden. Es geht um nicht visuelle Sachen. Das soll hinter den Kulissen laufen.
Forum: Datenbanken
Delphi
by Hansa,
30. Jun 2003
Und wie soll ich das machen ? Was ist mit dem Dataset zu machen? Und was ist bei Zugängen von neuen Artikeln, wo halt gar kein Lagerbestand da ist, auch nicht mit Bestand=0?
Forum: Datenbanken
Delphi
by Hansa,
30. Jun 2003
Da da ist mir zu hoch. Was hat das jetzt mit leeren Datenmengen zu tun ? Ich habe ja extra den Lagerbestand genommen, da kann ich vorher nicht wissen, ob die Datenmenge leer ist. Das Dataset hat zudem keine Eigenschaft "ExecSQL". Je nach Lage muß das eben ein Insert, oder ein Update sein. Im Moment sieht der relevante Code so aus:
LagDS.Close;
LagDS.InsertSQL.Text := 'INSERT INTO LAGER...