slijedeci kod kad unesem u komponentu Query radi savrseno:
---------
SELECT naziv FROM administracija
where aktivann = 'Ja'
and naziv NOT IN (SELECT naziv FROM raspored where obr_per = '7-2020')
UNION
SELECT naziv FROM raspored
where obr_per = '7-2020'
and naziv NOT IN (SELECT naziv FROM administracija where aktivann = 'Ja' )
ORDER BY naziv
---------
Kad isti unesem u proceduru dobijem gresku o sintaksi
-------------
procedure TRaspored.Button29Click(Sender: TObject);
begin
Nerasporedjeni_Radnici_Query.Close;
Nerasporedjeni_Radnici_Query.Sql.Clear;
Nerasporedjeni_Radnici_Query.Sql.Add ('SELECT naziv FROM administracija');
Nerasporedjeni_Radnici_Query.Sql.Add ('where aktivann = ''Ja''');
Nerasporedjeni_Radnici_Query.Sql.Add ('and naziv NOT IN (SELECT naziv FROM raspored where obr_per ='+''''+ Edit1.Text +'''');
Nerasporedjeni_Radnici_Query.Sql.Add ('UNION');
Nerasporedjeni_Radnici_Query.Sql.Add ('SELECT naziv FROM raspored');
Nerasporedjeni_Radnici_Query.Sql.Add ('where obr_per ='+''''+ Edit1.Text +'''');
Nerasporedjeni_Radnici_Query.Sql.Add ('and naziv NOT IN (SELECT naziv FROM administracija where aktivann = ''Ja'')');
Nerasporedjeni_Radnici_Query.Sql.Add (' order by naziv');
Nerasporedjeni_Radnici_Query.Open;
end;
------------
Nazalost nemogu da primjetim gdje sam pogrijesio nadam se da ce neko primjetiti :)