Insert IGNORE

[Dozent]

примерное такое ?

    with Form1.IBQuery2 do//add city too DB
      begin
        SQL.Text:='select CITY from CITY like :city';
        Params.ParamByName('city').AsString:=ComboBox1.Text;
        Open;
        if Form1.IBQuery2.RecordCount=0 then
          begin
           Form1.IBQuery5.SQL.Text:='insert into CITY (CITY) VALUES (:city)';
           Params.ParamByName('city').AsString:=ComboBox1.Text;
           Transaction.StartTransaction;
           ExecSQL;
           Transaction.Commit;
           Transaction.Active:=false;
          end;
         Transaction.Active:=false;
         Close;
      end;

[Аватар]

Не, я имел ввиду хранимую SQL-процедуру. Можно еще на этой таблице сделать UNIQUE индекс по названию города, тогда при попытке вставки дубля SQL отфутболит

[Serge_Bliznykov]

примерное такое ?

ну, насколько я понимаю, так тоже вполне можно!

и я бы прислушался к совету Аватара сделать поле city уникальным (добавить уникальный индекс на это поле).

p.s. Кстати, если Вы возьмёте KLADR, то увидите, что в нашей большой стране огромное множество населённых пунктов имеют одинаковые названия. (Их отличают по принадлежности к району, области, краю и т.д.) Вас это не пугает?

[Аватар]

Код в #11 будет отлично работать когда один пользователь. При многопользовательском он полностью не исключает возможность вставки дубля. Хотя если добавить индекс, то он пресечет это. Другое дело получим исключение и нужно аккуратно разобраться с причиной его возникновения.

ADD

Вспомнил еще одну фишку FB для таких целей - MATCHING. Правда не использовал. Посмотреть можно здесь