Problem z insertem Firebird+Lazarus

Witajcie. Nie wiem czemu mam problem z zapytaniem dodającym rekord do bazy danych. Nie ma różnicy czy wykonuje procedurę w Firebirdzie czy kod za pomocą TSqlQuery.
Kod zapytania SQL5:

  INSERT INTO PHONEBOOK1(IMIE, NAZWISKO, JO, STACJONARNY, KOMORKOWY, FAX, EMAIL ) values

  (:addIMIE, :addNAZWISKO, :addJO, :addSTACJONARNY, :addKOMORKOWY, :addFAX, :addEMAIL ) ;

Pola uzupełniam w w TEditach i mam przycisk wykonujący procedurę.
Część procedury:

              SQL5.Open;
              SQL5.params.parambyname('addIMIE').AsString:=edIMIE.Text;
               SQL5.params.parambyname('addNAZWISKO').AsString:=edNAZWISKO.Text;
               SQL5.params.parambyname('addJO').AsString:=edJO.Text;
               SQL5.params.parambyname('addSTACJONARNY').AsString:=edSTACJONARNY.Text;
               SQL5.params.parambyname('addKOMORKOWY').AsString:=edKOMORKOWY.Text;
               SQL5.params.parambyname('addFAX').AsString:=edFAX.Text;
               SQL5.params.parambyname('addEMAIL').AsString:=edEMAIL.Text;

Program niestety wyrzuca błąd jeśli chcemy dodać nowy rekord.

SQL5:Cannot open a non-select statement

Temat już rozwiązałem