missing operator or semicolon

ozcank · Mesaj gönderen **ozcank** » 01 Eyl 2014 12:12

Arkadaşlar bu hatayı alıyorum bir türlü çözemedim yardım edebilir misiniz? SQL de çalışıyor.

NIRapor.Close;
NIRapor.SQL.Clear;
NIRapor.SQL.Text:='SELECT STHAR_ACIKLAMA AS CARI_KOD, CARI_ISIM, TBLCASABIT.PLASIYER_KODU, CARI_IL, CARI_ILCE, CARI_TIP, STHAR_TARIH AS TARIH, ST.GRUP_KODU, ST.GRUP_ISIM, S.FISNO, S.STOK_KODU, S.STOK_ADI, '+
                  'CASE WHEN S.STHAR_GCKOD='C' AND S.STHAR_HTUR='J' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END AS NET_SATIS '+
                  'CASE WHEN S.STHAR_GCKOD='C' AND S.STHAR_HTUR='J' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END AS BRUT_SATIS,'+
                  'CASE WHEN S.STHAR_GCKOD='G' AND S.STHAR_HTUR='L' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END AS IADE_TOPLAM,'+
                  '(CASE WHEN S.STHAR_GCKOD='C' AND S.STHAR_HTUR='J' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END)-'+
                  '(CASE WHEN S.STHAR_GCKOD='G' AND S.STHAR_HTUR='L' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS IADE_DUS_NET,'+
                  '(CASE WHEN S.STHAR_GCKOD='C' AND S.STHAR_HTUR='J' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END)-'+
                  '(CASE WHEN S.STHAR_GCKOD='G' AND S.STHAR_HTUR='L' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END) AS IADE_DUS_BRUT'+
                  'FROM TBLSTHAR S INNER JOIN TBLCASABIT ON (TBLCASABIT.CARI_KOD = S.STHAR_ACIKLAMA)'+
                  'INNER JOIN TBLSTSABIT ST ON (ST.STOK_KODU = S.STOK_KODU)'+
                  'LEFT OUTER JOIN TBLSTGRUP ON (TBLSTGRUP.GRUP_KOD = ST.GRUP_KODU) WHERE FISNO='000000000007165'';
NIRapor.Parameters.ParamByName('CARI_KOD').Value:=Edit1.Text+'%';
NIRapor.Open;

G.Arkas · Mesaj gönderen **G.Arkas** » 01 Eyl 2014 08:15

Koymayı unuttuğunuz bir işlem operatörü var "+" lara dikkat edin.

Kod: Tümünü seç

FISNO='000000000007165'';

Çift tırnak oluşmuş. İlk satırda açılan bir " göremedim.

unicorn64 · Mesaj gönderen **unicorn64** » 01 Eyl 2014 09:31

breakpoint koyup debug ederseniz, NIRapor.SQL.Text e değer atadıktan sonra değerini kontrol ederseniz eksikliği siz de farkedersiniz, NET_SATIS alanından sonra virgül eksik

ozcank · Mesaj gönderen **ozcank** » 01 Eyl 2014 10:44

Arkadaşlar tekrar kontrol ettim hatta düzelttim ama ilk satırda "[Error] Unit16.pas(37): Missing operator or semicolon"
burda

Kod: Tümünü seç

NIRapor.SQL.Text:='SELECT STHAR_ACIKLAMA AS CARI_KOD, CARI_ISIM, TBLCASABIT.PLASIYER_KODU, CARI_IL, CARI_ILCE, CARI_TIP, STHAR_TARIH AS TARIH,

hata veriyor.

Kod: Tümünü seç

NIRapor.Close;
NIRapor.SQL.Clear;
NIRapor.SQL.Text:='SELECT STHAR_ACIKLAMA AS CARI_KOD, CARI_ISIM, TBLCASABIT.PLASIYER_KODU, CARI_IL, CARI_ILCE, CARI_TIP, STHAR_TARIH AS TARIH, ST.GRUP_KODU, ST.GRUP_ISIM, S.FISNO, S.STOK_KODU, S.STOK_ADI, '+
                  'CASE WHEN S.STHAR_GCKOD='C' AND S.STHAR_HTUR='J' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END AS NET_SATIS, '+
                  'CASE WHEN S.STHAR_GCKOD='C' AND S.STHAR_HTUR='J' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END AS BRUT_SATIS,'+
                  'CASE WHEN S.STHAR_GCKOD='G' AND S.STHAR_HTUR='L' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END AS IADE_TOPLAM,'+
                  '(CASE WHEN S.STHAR_GCKOD='C' AND S.STHAR_HTUR='J' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END)-'+
                  '(CASE WHEN S.STHAR_GCKOD='G' AND S.STHAR_HTUR='L' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS IADE_DUS_NET,'+
                  '(CASE WHEN S.STHAR_GCKOD='C' AND S.STHAR_HTUR='J' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END)-'+
                  '(CASE WHEN S.STHAR_GCKOD='G' AND S.STHAR_HTUR='L' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END) AS IADE_DUS_BRUT'+
                  'FROM TBLSTHAR S INNER JOIN TBLCASABIT ON (TBLCASABIT.CARI_KOD = S.STHAR_ACIKLAMA) '+
                  'INNER JOIN TBLSTSABIT ST ON (ST.STOK_KODU = S.STOK_KODU) '+
                  'LEFT OUTER JOIN TBLSTGRUP ON (TBLSTGRUP.GRUP_KOD = ST.GRUP_KODU)';
NIRapor.Parameters.ParamByName('CARI_KOD').Value:=Edit1.Text+'%';
NIRapor.Open;

hi_selamlar · Mesaj gönderen **hi_selamlar** » 02 Eyl 2014 08:30

S.A.

Hatan şurda.

Kod: Tümünü seç

'S.STHAR_GCKOD='C' AND S.STHAR_HTUR='J'

yerine

kodlarını şu şekilde değiştir.

Kod: Tümünü seç

'S.STHAR_GCKOD='+QuotedStr(C)+ 'AND S.STHAR_HTUR='+QuotedStr(J)+

Kolay gelsin..

tuna · Mesaj gönderen **tuna** » 02 Eyl 2014 12:27

Kod: Tümünü seç

S.STHAR_GCKOD='C'

yazdığın bu kodların hepsini

Kod: Tümünü seç

S.STHAR_GCKOD=''C''

bununla değiştir hata vermeden çalışacaktır. =' ' Tek tırnaktan dolayı hata veriyor. Ben böyle yapıyorum çalışıyor..

ozcank · Mesaj gönderen **ozcank** » 02 Eyl 2014 06:37

Yardımlarınız için çok teşekkür ederim bu şekilde oldu . SQL de çalıştığı halde "CARI_KOD" da hata veriyor

Kod: Tümünü seç

NIRapor.Close;
NIRapor.SQL.Clear;
NIRapor.SQL.Text:='SELECT STHAR_ACIKLAMA AS CARI_KOD, CARI_ISIM, TBLCASABIT.PLASIYER_KODU,CARI_IL, CARI_ILCE, CARI_TIP, STHAR_TARIH AS TARIH, ST.GRUP_KODU, GRUP_ISIM,S.FISNO,S.STOK_KODU,STOK_ADI, '+
                  'CASE WHEN S.STHAR_GCKOD=''C'' AND S.STHAR_HTUR=''J'' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END AS NET_SATIS, '+
                  'CASE WHEN S.STHAR_GCKOD=''C'' AND S.STHAR_HTUR=''J'' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END AS BRUT_SATIS, '+
                  'CASE WHEN S.STHAR_GCKOD=''G'' AND S.STHAR_HTUR=''L'' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END AS IADE_TOPLAM, '+
                  '(CASE WHEN S.STHAR_GCKOD=''C'' AND S.STHAR_HTUR=''J'' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END)- '+
                  '(CASE WHEN S.STHAR_GCKOD=''G'' AND S.STHAR_HTUR=''L'' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS IADE_DUS_NET, '+
                  '(CASE WHEN S.STHAR_GCKOD=''C'' AND S.STHAR_HTUR=''J'' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END)- '+
                  '(CASE WHEN S.STHAR_GCKOD=''G'' AND S.STHAR_HTUR=''L'' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END) AS IADE_DUS_BRUT '+
                  'FROM TBLSTHAR S INNER JOIN TBLCASABIT ON (TBLCASABIT.CARI_KOD = S.STHAR_ACIKLAMA) '+
                  'INNER JOIN TBLSTSABIT ST ON (ST.STOK_KODU = S.STOK_KODU) LEFT OUTER JOIN TBLSTGRUP ON (TBLSTGRUP.GRUP_KOD = ST.GRUP_KODU)';
NIRapor.Parameters.ParamByName('CARI_KOD').Value:=Edit1.Text+'%';
NIRapor.Open;

ozcank · Mesaj gönderen **ozcank** » 02 Eyl 2014 06:57

Boş kayıt döndürüyor hata vermiyor ama kayıt da göstermiyor DBGrid e

Kod: Tümünü seç

NIRapor.Close;
NIRapor.SQL.Clear;
NIRapor.SQL.Text:='SELECT STHAR_ACIKLAMA AS CARI_KOD, CARI_ISIM, TBLCASABIT.PLASIYER_KODU,CARI_IL, CARI_ILCE, CARI_TIP, STHAR_TARIH AS TARIH, ST.GRUP_KODU, GRUP_ISIM,S.FISNO,S.STOK_KODU,STOK_ADI, '+
                  'CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END AS NET_SATIS, '+
                  'CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END AS BRUT_SATIS, '+
                  'CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END AS IADE_TOPLAM, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END)- '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS IADE_DUS_NET, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END)- '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END) AS IADE_DUS_BRUT '+
                  'FROM TBLSTHAR S INNER JOIN TBLCASABIT ON (TBLCASABIT.CARI_KOD = S.STHAR_ACIKLAMA) '+
                  'INNER JOIN TBLSTSABIT ST ON (ST.STOK_KODU = S.STOK_KODU) LEFT OUTER JOIN TBLSTGRUP ON (TBLSTGRUP.GRUP_KOD = ST.GRUP_KODU) ';
//NIRapor.Parameters.ParamByName('CARI_KOD').Value:=Edit1.Text+'%';
NIRapor.Open;

ozcank · Mesaj gönderen **ozcank** » 13 Eyl 2014 02:47

Arkadaşlar neden boş kayıt döndürür ? SQL de Query de çalışıyor

Kod: Tümünü seç

NIRapor.Close;
NIRapor.SQL.Clear;
NIRapor.SQL.Text:='SELECT STHAR_ACIKLAMA AS CARI_KOD, CARI_ISIM, TBLCASABIT.PLASIYER_KODU,CARI_IL, CARI_ILCE, CARI_TIP, STHAR_TARIH AS TARIH, ST.GRUP_KODU, GRUP_ISIM,S.FISNO,S.STOK_KODU,STOK_ADI, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS NET_SATIS, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END) AS BRUT_SATIS, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS IADE_TOPLAM, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END)- '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS IADE_DUS_NET, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END)- '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END) AS IADE_DUS_BRUT '+
                  'FROM TBLSTHAR S INNER JOIN TBLCASABIT ON (TBLCASABIT.CARI_KOD = S.STHAR_ACIKLAMA) '+
                  'INNER JOIN TBLSTSABIT ST ON (ST.STOK_KODU = S.STOK_KODU) LEFT OUTER JOIN TBLSTGRUP ON (TBLSTGRUP.GRUP_KOD = ST.GRUP_KODU) ';
//NIRapor.Parameters.ParamByName('CARI_KOD').Value:=Edit1.Text+'%';
NIRapor.Open;
end;
end;

unicorn64 · Mesaj gönderen **unicorn64** » 13 Eyl 2014 12:22

her sorgu her zaman kayıt döndürecek diye bir şart yoktur...
verdiğiniz cari koduyla uygun kayıt olmayabilir,
joinlerinize uygun kayıt olmayabilir,
örneğin stok hareket tablosundaki sthar_aciklama alanıyla cari sabit tablosundaki cari_kod alanı üzerinden join kurmuşsunuz, sthar_aciklama alanında cari kodu yazmıyorsa sonuç gelmez...

sorgunuzu sql server management studio üzerinde çalıştırıp sonuç aldınız mı???

ozcank · Mesaj gönderen **ozcank** » 13 Eyl 2014 02:38

Evet Query de çalıştırdığımda çalışıyor. Şu hale getirdiğimde DBGrid e liste alabildim fakat S.STOK_KODU, ST.STOK_ADI da hata alıyorum normalde query de doğru çalışıyor

Kod: Tümünü seç

NIRapor.Close;
NIRapor.SQL.Clear;
NIRapor.SQL.Text:='SELECT STHAR_ACIKLAMA AS CARI_KOD, CARI_ISIM, TBLCASABIT.PLASIYER_KODU, CARI_IL, CARI_ILCE, CARI_TIP, STHAR_TARIH AS TARIH, S.STOK_KODU, ST.STOK_ADI '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS NET_SATIS, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END) AS BRUT_SATIS, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS IADE_TOPLAM, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END)- '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS IADE_DUS_NET, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END)- '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END) AS IADE_DUS_BRUT '+
                  'FROM TBLSTHAR AS S INNER JOIN TBLCASABIT ON (TBLCASABIT.CARI_KOD = S.STHAR_ACIKLAMA) '+
                  'INNER JOIN TBLSTSABIT AS ST ON (ST.STOK_KODU = S.STOK_KODU) LEFT OUTER JOIN TBLSTGRUP ON (TBLSTGRUP.GRUP_KOD = ST.GRUP_KODU) ';
NIRapor.Open;

ozcank · Mesaj gönderen **ozcank** » 13 Eyl 2014 05:44

Arkadaşlar raporu alabildim fakat GRUP_ISMI bir türlü olmuyor hata veriyor yardım edebilecek misiniz?

Kod: Tümünü seç

NIRapor.Close;
NIRapor.SQL.Clear;
NIRapor.SQL.Text:='SELECT STHAR_ACIKLAMA AS CARI_KOD, CARI_ISIM, TBLCASABIT.PLASIYER_KODU, CARI_IL, CARI_ILCE, CARI_TIP, STHAR_TARIH AS TARIH, S.STOK_KODU, ST.STOK_ADI, ST.GRUP_KODU, GRUP_ISMI, S.FISNO, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS NET_SATIS, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END) AS BRUT_SATIS, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS IADE_TOPLAM, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END)- '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_NF ELSE 0 END) AS IADE_DUS_NET, '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'C'+#39+' AND S.STHAR_HTUR='+#39+'J'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END)- '+
                  '(CASE WHEN S.STHAR_GCKOD='+#39+'G'+#39+' AND S.STHAR_HTUR='+#39+'L'+#39+' THEN S.STHAR_GCMIK*S.STHAR_BF ELSE 0 END) AS IADE_DUS_BRUT '+
                  'FROM TBLSTHAR AS S INNER JOIN TBLCASABIT ON (TBLCASABIT.CARI_KOD = S.STHAR_ACIKLAMA) '+
                  'INNER JOIN TBLSTSABIT AS ST ON (ST.STOK_KODU = S.STOK_KODU) LEFT OUTER JOIN TBLSTGRUP ON (TBLSTGRUP.GRUP_KOD = ST.GRUP_KODU) ';
NIRapor.Open;

ozcank · Mesaj gönderen **ozcank** » 13 Eyl 2014 10:52

Herkese Yardımlarından dolayı teşekkür ederim.

Delphi Forum

missing operator or semicolon

missing operator or semicolon

Re: missing operator or semicolon

Re: missing operator or semicolon

Re: missing operator or semicolon

Re: missing operator or semicolon

Re: missing operator or semicolon

Re: missing operator or semicolon

Re: missing operator or semicolon

Re: missing operator or semicolon

Re: missing operator or semicolon

Re: missing operator or semicolon

Re: missing operator or semicolon

Re: missing operator or semicolon