Im Trigger abfragen ob Datensatz existiert

[Walter Landwehr]

Hallo,

gibt es ein Möglichkeit im Trigger abzufragen ob ein Datensatz existiert. Etwa so:

Delphi-Quellcode:

Select count(PATIENTNR) from tbl_patdiagnose PD where PD.suchwort = :New.SUCHWORT and PD.patientnr = :New.PATIENTNR;
 if (Count) = 0 then
 begin
   INSERT INTO TBL_PATDIAGNOSE(
                 PATDIAGNOSENR, PATIENTNR, DATUM, DAUERDIAGNOSE, DIAGNOSE, 
                 ANLAGE, ANLAGEBENUTZER, DIAGNOSENR, Suchwort, ReferenzTabelle, ReferenzNr)
          VALUES (
                 Gen_ID(GEN_TBL_PATDIAGNOSE,1), new.PATIENTNR, new.BEHANDLUNGSDATUM, 'N', new.Text,
                 new.Anlage, new.ANLAGEBENUTZER, new.GEBUEHRENNR, new.Suchwort, 'PB', new.PatBlattNr);
 end;