iki tarih arasındaki stok Hareketleri bulma
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
iki tarih arasındaki stok Hareketleri bulma
selam arkaşlar yapmak istediğim iki tarih arasındaki Stok hareketleri
görmek.birinci,ikinci tarihi girip o tarihler arasında stokhareketleri rapor şeklinde gösterecek.sqlstring özelliğinde şu kodları yazdım.
select stok.Malzeme, stok.Tarih, Stok.Miktar from stok,Malzeme where stok.Tarih=Malzeme.Kodu and
Tarih>= :Otarih and Tarih<= :Otarih2
neresi yanlış.
Şimdiden Teşekkür ederim.
görmek.birinci,ikinci tarihi girip o tarihler arasında stokhareketleri rapor şeklinde gösterecek.sqlstring özelliğinde şu kodları yazdım.
select stok.Malzeme, stok.Tarih, Stok.Miktar from stok,Malzeme where stok.Tarih=Malzeme.Kodu and
Tarih>= :Otarih and Tarih<= :Otarih2
neresi yanlış.
Şimdiden Teşekkür ederim.
Kod: Tümünü seç
stok.Tarih=Malzeme.Kodu

Merhaba...
- Öncelikle kural (syntax) hatası mı arıyoruz yoksa çalışıyor ama yanlış sonuçlar mı döndürüyor...
- Parametre kurgusu doğru görünüyor ama parametreleri nerede nasıl aktardığın görünmüyor... Ayrıca Kod ile tarih eşitliğini anlamadım... Yanlış aktarmış olabilirsin...
- Ek olarak Between olarak forumda aratırsan iki tarih arası karşılaştırma yapmak -bence- daha kolay...
- Öncelikle kural (syntax) hatası mı arıyoruz yoksa çalışıyor ama yanlış sonuçlar mı döndürüyor...
- Parametre kurgusu doğru görünüyor ama parametreleri nerede nasıl aktardığın görünmüyor... Ayrıca Kod ile tarih eşitliğini anlamadım... Yanlış aktarmış olabilirsin...
- Ek olarak Between olarak forumda aratırsan iki tarih arası karşılaştırma yapmak -bence- daha kolay...
stok Hareket Tablosundakileri aktarmaya çalıştım.Tablonun adı(stok) Alanları(Tarih,Malzeme,Miktar)
forma su şekilde yazdım.
procedure TForm7.DateTimePicker2CloseUp(Sender: TObject);
begin
Edit2.Text:=DateToStr(DateTimePicker2.Date);
Query1.ParamByName('Tarih').ASDate:= DateTimePicker2.Date;
SQlstrings özelliğinede
select stok.Malzeme, stok.Tarih, Stok.Miktar from stok When stokTarih>= :Tarih and Tarih<= :Tarih2
nerde yanlışlık yapıyorum.Arkadaşlar
forma su şekilde yazdım.
procedure TForm7.DateTimePicker2CloseUp(Sender: TObject);
begin
Edit2.Text:=DateToStr(DateTimePicker2.Date);
Query1.ParamByName('Tarih').ASDate:= DateTimePicker2.Date;
SQlstrings özelliğinede
select stok.Malzeme, stok.Tarih, Stok.Miktar from stok When stokTarih>= :Tarih and Tarih<= :Tarih2
nerde yanlışlık yapıyorum.Arkadaşlar
Kod: Tümünü seç
select stok.Malzeme, stok.Tarih, Stok.Miktar from stok When stokTarih>= :Tarih and Tarih<= :Tarih2
Kod: Tümünü seç
select stok.Malzeme, stok.Tarih, Stok.Miktar from stok When stokTarih>= Tarih and Tarih<= Tarih2
***********************************
Kamil odur ki; koya dünyada bir eser,
Eseri olmayanın, yerinde yeller eser.
***********************************
Kamil odur ki; koya dünyada bir eser,
Eseri olmayanın, yerinde yeller eser.
***********************************
Merhaba...
- Şunu bir button altına yazıp, deneyip çalışıp çalışmadığını söyler misin ...
- Tarihlerini veritabanındakilere göre değiştir.
- Bu sana kurgu hakkında klavuz olacaktır...
- Şunu bir button altına yazıp, deneyip çalışıp çalışmadığını söyler misin ...
- Tarihlerini veritabanındakilere göre değiştir.
- Bu sana kurgu hakkında klavuz olacaktır...
Kod: Tümünü seç
Query1.SQL.Clear;
Query1.SQL.Add('SELECT stok.Malzeme, stok.Tarih, stok.Miktar'');
Query1.SQL.Add('FROM stok');
Query1.SQL.Add('WHERE stok.Tarih BETWEEN :Otarih AND :Otarih2');
Query1.ParamByName('Otarih').AsDate := StrToDate('01.01.2005');
Query1.ParamByName('Otarih2').AsDate := StrToDate('31.12.2005');
Query1.Active := True;