ürün sipariş sayısı

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
erdogan_ozkaya
Üye
Mesajlar: 839
Kayıt: 03 Eki 2007 02:00

Re: ürün sipariş sayısı

Mesaj gönderen erdogan_ozkaya »

unicorn arkadaşıma çoooooook teşekkür ederim.


çalışan kod

Kod: Tümünü seç

procedure TGUNLUK_STOK_RAPORU.SpeedButton1Click(Sender: TObject);
begin
   Memo1.Clear;
   MyQuery1.Close;
   MyQuery1.SQL.Clear;
   with MyQuery1,SQL do
   begin
   // Add('select u.Urun_Kodu,u.Urun_adi,u.Fiili_Stok_Sayisi, sum(sk.Urun_Adeti) Urun_Adeti ,u.toplam ');
  //  Add('from urun_kartlari u                                                  ');
  //  Add('inner join siparisler_detay sk on   u.Urun_Kodu=sk.Urun_Kodu           ');
  //  Add('where Siparis_Tarihi>=:tar1 and Siparis_Tarihi<=:tar2    ');
  //  Add('group by u.urun_kodu,u.Urun_adi,u.Fiili_Stok_Sayisi,u.Toplam           ');

    Add('select deneme.Urun_Kodu,deneme.Urun_adi,deneme.Fiili_Stok_Sayisi,');
    Add('coalesce((select sum(coalesce(sk.Urun_Adeti,0))  from siparisler_detay sk ');
    Add('where   deneme.Urun_Kodu=sk.Urun_Kodu and Siparis_Tarihi>=:tar1 and Siparis_Tarihi<=:tar2),0.0) Urun_Adeti  ');
    Add('from urun_kartlari deneme');



     ParamByName('tar1').Value:=StrToDate(DateToStr(DateTimePicker1.Date));
   ParamByName('tar2').Value:=StrToDate(DateToStr(DateTimePicker2.Date));
  end;
  //  SIPARIS_DETAYLARI_DB.ParamByName('tar1').Value:=StrToDate(DateToStr(DateTimePicker1.Date));
 //   SIPARIS_DETAYLARI_DB.ParamByName('tar2').Value:=StrToDate(DateToStr(DateTimePicker2.Date));

 // if RzButtonEdit9.Text<>'' then begin
 // SIPARIS_DETAYLARI_DB.SQL.Add(' and Sevkiyat_Teslim_Eden='+QuotedStr(RzButtonEdit9.Text)+'');
 // End;

  Memo1.Lines.add(MyQuery1.SQL.Text);
  MyQuery1.Open;
end;
erdogan_ozkaya
Üye
Mesajlar: 839
Kayıt: 03 Eki 2007 02:00

Re: ürün sipariş sayısı

Mesaj gönderen erdogan_ozkaya »

tekrar yardımınız için teşekkür ederim :)

arkadaşlar,

iki tablom var biri "proje_kayit" diğeri "siparis_detay" hangi firma hangi üründen ne kadar sipariş vermiş aşağıdaki tablo gibi çıktı akmak istiyorum,
ürün kartları ve projeler opsiyonel artabilir eksilebilir.

Resim

karşılaştırma Proje_Referans = Cari_Referans olarak yapıyor

Kod: Tümünü seç

DROP TABLE IF EXISTS `siparisler_detay`;
CREATE TABLE `siparisler_detay` (
  `ID` int(11) NOT NULL auto_increment,
  `Urun_Kodu` varchar(255) default NULL,
  `Siparis_No` varchar(255) default NULL,
  `[b]Cari_Referans[/b]` varchar(255) default NULL,
  `Stok_Kodu` varchar(255) default NULL,
  `Urun_adi` varchar(255) default NULL,
  `Urun_Aciklama` varchar(255) default NULL,
  `Urun_Adeti` varchar(255) default NULL,
  `Birim_Turu` varchar(255) default NULL,
  `Siparis_Tarihi` date default NULL,
  `Siparis_Saati` time default NULL,
  `Durumu` varchar(255) default NULL,
  `Ekleyen_Personel_Id` varchar(255) default NULL,
  `Iptal_Nedeni` varchar(255) default NULL,
  `Alis_Fiyati` float default NULL,
  `Satis_Fiyati` float default NULL,
  `Toplam` float default NULL,

Kod: Tümünü seç

DROP TABLE IF EXISTS `proje_kayit`;
CREATE TABLE `proje_kayit` (
  `[b]Proje_Referans[/b]` int(11) NOT NULL auto_increment,
  `Calisilan_Firma` varchar(255) default NULL,
  `Proje_Adi` varchar(255) default NULL, 
  PRIMARY KEY  (`Proje_Referans`)
)
Cevapla