Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Greska u MySQL sintaksi

[es] :: Pascal / Delphi / Kylix :: Greska u MySQL sintaksi

[ Pregleda: 298 | Odgovora: 3 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

XGhost

Član broj: 33279
Poruke: 313
*.cdn77.com.



+18 Profil

icon Greska u MySQL sintaksi17.07.2020. u 11:11 - pre 7 meseci
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 :)

 
Odgovor na temu

sdurut
Mašinbravar

Član broj: 76787
Poruke: 566



+41 Profil

icon Re: Greska u MySQL sintaksi17.07.2020. u 11:48 - pre 7 meseci
Probaj da staviš ; iza "order by naziv;". Na kraju SQL upita treba da bude ;

Nerasporedjeni_Radnici_Query.Sql.Add (' order by naziv;');

Takođe sledeći red probaj da Edit1.Text zameniš hardcoded tekstom za probu da li će da proradi procedura.

Nerasporedjeni_Radnici_Query.Sql.Add ('and naziv NOT IN (SELECT naziv FROM raspored where obr_per ='+''''+ Edit1.Text +'''');
 
Odgovor na temu

gobs
Goran Surtov
ing. odrzavanje ,
K.Dubica

Član broj: 162343
Poruke: 49
*.s.time4vps.cloud.



+2 Profil

icon Re: Greska u MySQL sintaksi17.07.2020. u 12:08 - pre 7 meseci
mislim da treba ubacivati i prazno mjesto
ovo
Nerasporedjeni_Radnici_Query.Sql.Add ('SELECT naziv FROM administracija');
Nerasporedjeni_Radnici_Query.Sql.Add ('where aktivann = ''Ja''');
bi trebalo da izgleda ovako:
Nerasporedjeni_Radnici_Query.Sql.Add ('SELECT naziv FROM administracija');
Nerasporedjeni_Radnici_Query.Sql.Add (' where aktivann = ''Ja''');
ako ne ubacič prazno mjesto ispred WHERE
on će sastaviti administracijawhere u jednu riječ.
Potpis ...
 
Odgovor na temu

XGhost

Član broj: 33279
Poruke: 313
*.cdn77.com.



+18 Profil

icon Re: Greska u MySQL sintaksi17.07.2020. u 12:12 - pre 7 meseci
rjeseno
Nerasporedjeni_Radnici_Query.Sql.Add ('and naziv NOT IN (SELECT naziv FROM raspored where obr_per ='''+ Edit1.text +''')');
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Greska u MySQL sintaksi

[ Pregleda: 298 | Odgovora: 3 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.