FireBird+Delphi+Where problemi

[habilkader]

S.A şöyle bi problemim var

şimdi firebirdde SP_SORGU adında SP yazalım

Kod: Tümünü seç

Select StokKodu, miktar, SatısFiyatı From Stokhareketi 

daha sonra delphi tarafında bu SP yi şu şekilde çağırabiliyorum

Kod: Tümünü seç

IBQuery.SQL.Text:='Select * from SP_Sorgu'; 
IBQuery.open; 

burda sorun yok şimdi aynı SP yi birde şöyle çağırayım

Kod: Tümünü seç

IBQuery.SQL.Text:='Select * from SP_Sorgu Where StokKodu='ST001''; 
IBQuery.open; 

where ifadesindeki STOKKODU alanı SP içinde seçili olduğu için Stokkodu alanını delphi tarafında sorgulayabiliyorum bundada sorun yok.

şimdi SP yi biraz değiştireyim ve yeni SP aşağıdaki gibi olsun
her stoğun ayrı ayrı satış tutarlarını bulsun

Kod: Tümünü seç

Select StokKodu, Sum(Miktar*Fiyatı) as Tutar From Stokhareketi 
group by StokKodu 

şimdi delphi tarafında SP mi çağırıyorum

Kod: Tümünü seç

IBQuery.SQL.Text:='Select * from SP_Sorgu '; 
IBQuery.open; 

burda da sorun yok herşey güzel.
Ancak form üzerinde bir Checkbox ve 2 adette Maskedit var, kullanıcı isterse Checboxı işaretleyerek maskeditlere 2 tarih girip bu 2 tarih arasındaki hareketlerin tutarlarını görmek isteyebilir. bu durumda delphi tarafından SP yi şöyle çağıyorum

Kod: Tümünü seç

IBQuery.SQL.Text:='Select * from SP_Sorgu where Tarih between :Tar1 and :tar2'; 
IBQuery.open; 

ancak SP içinde Tarih alanı seçilmemiş olduğundan hata alıyorum.
SP içinde Tarih alanını seçersem bu kezde tarihe görede Group by ile Tarih alanını gruplama yapmam gerekecek ki bu sefer yanlış sonuç kümesi dönecek.

Sonuç:
SP de Select ile seçilmemiş bir alan Delphi tarafından Where ile karşılaştırlamıyor.
SP tarafında eğer o alanı seçersem ki SUM kullnıyorsam o alanı gruplamam da gerekecek, gruplarsam yanlış bir sonuç kümesi dönüyor.

Tarih bilgilerini parametre olarak SP ye aktararak yapmaya kalkarsam bu kez de kullnıcı tarih seçimi yapmaz kayıtların tamamını görmek isterse tarih değerleri SP ye null olarak döner ve ve yine hata alırım.

geriye tek bir çözüm kalıyor SP yi çöpe atıp delphi tarafından SQL kodlarla yapmak.
bu durumda da SP kullanmayarak performansı düşürmüş olacağız
bir türlü işin içinden çıkamadım lütfen yardım.

[cihan]

S.A şöyle bi problemim var

şimdi firebirdde SP_SORGU adında SP yazalım

Kod: Tümünü seç

Select StokKodu, miktar, SatısFiyatı From Stokhareketi 

daha sonra delphi tarafında bu SP yi şu şekilde çağırabiliyorum

Kod: Tümünü seç

IBQuery.SQL.Text:='Select * from SP_Sorgu'; 
IBQuery.open; 

burda sorun yok şimdi aynı SP yi birde şöyle çağırayım

Kod: Tümünü seç

IBQuery.SQL.Text:='Select * from SP_Sorgu Where StokKodu='ST001''; 
IBQuery.open; 

where ifadesindeki STOKKODU alanı SP içinde seçili olduğu için Stokkodu alanını delphi tarafında sorgulayabiliyorum bundada sorun yok.

şimdi SP yi biraz değiştireyim ve yeni SP aşağıdaki gibi olsun
her stoğun ayrı ayrı satış tutarlarını bulsun

Kod: Tümünü seç

Select StokKodu, Sum(Miktar*Fiyatı) as Tutar From Stokhareketi 
group by StokKodu 

şimdi delphi tarafında SP mi çağırıyorum

Kod: Tümünü seç

IBQuery.SQL.Text:='Select * from SP_Sorgu '; 
IBQuery.open; 

burda da sorun yok herşey güzel.
Ancak form üzerinde bir Checkbox ve 2 adette Maskedit var, kullanıcı isterse Checboxı işaretleyerek maskeditlere 2 tarih girip bu 2 tarih arasındaki hareketlerin tutarlarını görmek isteyebilir. bu durumda delphi tarafından SP yi şöyle çağıyorum

Kod: Tümünü seç

IBQuery.SQL.Text:='Select * from SP_Sorgu where Tarih between :Tar1 and :tar2'; 
IBQuery.open; 

ancak SP içinde Tarih alanı seçilmemiş olduğundan hata alıyorum.
SP içinde Tarih alanını seçersem bu kezde tarihe görede Group by ile Tarih alanını gruplama yapmam gerekecek ki bu sefer yanlış sonuç kümesi dönecek.

Sonuç:
SP de Select ile seçilmemiş bir alan Delphi tarafından Where ile karşılaştırlamıyor.
SP tarafında eğer o alanı seçersem ki SUM kullnıyorsam o alanı gruplamam da gerekecek, gruplarsam yanlış bir sonuç kümesi dönüyor.

Tarih bilgilerini parametre olarak SP ye aktararak yapmaya kalkarsam bu kez de kullnıcı tarih seçimi yapmaz kayıtların tamamını görmek isterse tarih değerleri SP ye null olarak döner ve ve yine hata alırım.

geriye tek bir çözüm kalıyor SP yi çöpe atıp delphi tarafından SQL kodlarla yapmak.
bu durumda da SP kullanmayarak performansı düşürmüş olacağız
bir türlü işin içinden çıkamadım lütfen yardım.

sp içinde yapabilirsin

3 tane parametre tanımlarsın
stokkodu,tar1,ve tar2 diye

if dersin stokkodu,tar1ve tar2 null ise genel selecti çalıştırırsın
if dersin stokkodu not null ise ve tar1,tar2 nul ise stok kodu ile ilgili selecti çalıştırırsın
if dersin stokkodu null ve tar1,tar2 not null ise tarih aralığına göre selecti çalıştırırsın

[sabanakman]

O prosedürden elde ettiğin sonucu bir tabloymuş gibi farzedersen gelen hata normal olacaktır. Bu tıpkı bir tablonun olmayan alanına şart vermek gibi bir durum olsa gerek.

[aslangeri]

s.a.
madem stored procedure kullanıyorsun o zaman koşullarını input parametresi olarak gönder.
o zaman select sql in şu şekilde olacak

Kod: Tümünü seç

select * from benim_sp(:param1,:param2...:paramN)

sp nin içinde select sql kısmında ise where input parametrelerini koyacaksın.

Kod: Tümünü seç

where 
((tarih>=:ip_tarih1) or (:ip_tarih1 is null)) and
((tarih<=:ip_tarih2) or (:ip_tarih2 is null)) and
((stokkodu=:ip_stokkodu) or (:ip_stokkodu='')) and
((birimid=:ip_birimid) or (:ip_birimid=-1))
.....

umarım anlatabilmişimdir.
kolay gelsin.

[rsimsek]

Aynı soruya iki başlık açmayalım
viewtopic.php?t=22006