nochmal SQLDataSet

[Delphi.Narium]

Wenn die erste Zeile 15 ausgeführt wird, kann kein Satz in die Tabelle Ware eingefügt worden sein, da h1 dann <> 1 sein muss.
Es wurde dann kein Satz eingefügt oder mehr als ein Satz. Die zweite Zeile 15 wäre das End hinter dem Setzen der Label-Caption.

Welchen Wert hat denn nun h1?

Mal alle DCUs des Projektes löschen und dann das Projekt neu erstellen.

Das die Zeilen zwischen 15 und 42 (also dem Ende der Routine, einfach so übersprungen werden, kann ich mir nicht vorstellen.
Bau doch bitte mal 'ne Fehlerbehandlung ein und lass Dir dann ggfls. auftretende Exceptions ausgeben.

Momentan ist das von Dir beschriebene nur extrem schlecht nachvollziehbar.

Hast Du geprüft, ob finaz = 1 ist? Wenn finaz <> 1, so ist der beschrieben Ablauf der Zeilen schon korrekt.