Witam
Próbuję już drugi dzień napisac poprawnie procedurkę, która będzie mi kopiować rekord z jednej tabeli (ibquery1) do drugiej (ibquery2).
procedure TForm1.Button2Click(Sender: TObject);
begin
with IBQUERY1, IBQUERY2, SQL do
begin
Close;
Clear;
Add('INSERT INTO ARCHIWA (ID_KUR, NAZWISKO, IMIE) SELECT ID_KUR, NAZWISKO, IMIE FROM KURSANT WHERE ID_KUR = 2');
ExecSQL;
IBTransaction2.Commit;
end;
end;
Zrobiłem 2 identyczne bazy (w IBExpert) z tą samą strukturą, tylko jedna to KURSANT, a druga to ARCHIWA.
Do tabeli ARCHIWA chcę kopiować rekord z tabeli KURSANT WHERE ID_KUR = np. 2.
Potem oczywiście usunąć ten rekord z tabeli KURSANT, ale z tym nie mam problemu.
Co do powyższego kodu:
Wyskakuje błąd "Unknown table KURSANT", tak jakby nie rozpoznawał tej tabeli.
Gdzie robię błąd w tym kodzie?
Używam komponentów IBX.