Probleme beim Speichern in eine Tabelle

[Delphi.Narium]

Wenn es in beiden Fällen keine Fehlermeldung gibt, dann muss es auch in beiden Fällen einen entsprechenden Datensatz geben. Für gewöhnlich scheitert ein Edit auf eine leere Datenmenge und ein Post darauf erst recht.

Lass Dir bitte in beiden Fällen mal nach dem .Open, aber noch vor dem .Edit .RecNo und .RecordCount ausgeben.

Sollte in beiden Fällen jeweils 1 sein, ansonsten bekommst Du bei den Abfragen andere Ergebnisse, als Du erwartest und änderst in den Ergebnismengen jeweils den zufällig ersten Datensatz.

[hoika]

Hallo,
noch mal die Frage

select * FROM PLANUNG where ID_AUFTRAG = ' + IntToStr(id_Planung)

Ist ID_AUFTRAG wirklich richtig, oder müsste es nicht ID_PLANUNG heissen.

[Luckner]

Zur hoika,
select * FROM PLANUNG where ID_AUFTRAG = ' + IntToStr(id_Planung) ist korrekt. "id_Planung" ist eine Variable, die Lese ich mit 'OnCellKlick' aus in einer weiter Tabelle aus. Klar, die Variable hätte auch id-Auftrag heissen können.
Es gibt keine Meldung beim Posten. Das wundert mich ja auch, weil sonst kommt immer eine Meldung. Habe für den Eintrag: DatamodulePlanung.IBDataSetPlanungSTATUS.AsString := 'Test' eingetragen und alle Tabellen nach diesem String suchen lassen. Nichts gefunden.

Zur Uwe Raabe,
edit ist korrekt. Möchte In der Tabelle "Planung" einen Eintrag ändern.

Zu Delphi.Narium:
werde gleich testen

[Luckner]

Zur Delphi.Narium:
jeweils 1.

[hoika]

Hallo,
benutzt Du DatamodulePlanung.IBDataSetPlanungSTATUS.AsString auch an einer anderen Stelle?
Das sind ja persistente Felder (meine persönliche Meinung -> grauenhaft ),
vielleicht ist die Zuordnung zum DataSet verlorengegangen?

Probier doch mal
DatamodulePlanung.IBDataSetPlanung.FieldByName('ST ATUS').AsString := ComboBoxStatus.Text;

[Luckner]

Hallo Heiko,

auch das hat nichts gebracht. Ohne Fehlermeldung, aber nirgens ein Eintrag.

[hoika]

Hallo,
vielleicht hat es was mit den Transaktionen zu tun.
Gibt es bei Dir auch einen DBMonitor?

Probier mal das hier.

Delphi-Quellcode:

if DataModulePlanung.IBTransactionPlanung.InTransaction then DataModulePlanung.IBTransactionPlanung.Commit;

DataModulePlanung.IBTransactionPlanung.StartTransaction;

DatamodulePlanung.IBDataSetPlanung.Close;

Und dann noch das hier
DatamodulePlanung.IBDataSetPlanung.SelectSQL.Add(' select * FROM PLANUNG where ID_AUFTRAG_TEST = ' + IntToStr(id_Planung));

Das müsste ja einen Fehler (Exception) erzeugen.
Kommt die Exception ?

[hoika]

Hallo,

Zitat:

Ohne Fehlermeldung, aber nirgens ein Eintrag.

Wieso nirgens, die Änderung bezieht sich doch auf genau einen Datensatz.
Wie erkennst Du überhaupt, ob sich was geändert hat,
per IBExpert oder indem Du danach den Datensatz in Deinem Programm anzeigst?

[Uwe Raabe]

Zitat von hoika:

Das sind ja persistente Felder (meine persönliche Meinung -> grauenhaft ),

Verwende ich ständig und möchte ich nicht missen! Man kann soviel mehr soviel einfacher damit machen, wenn man damit umzugehen weiß. Insbesondere seit es die FieldOptions gibt.

[hoika]

Hallo,
wenn ich ein VarChar-Feld vergrößere, ändert sich die Feldlänge auch in dem persistenten Feld?