Insert-Select-SUM aynı sorguda kullanma

[ertline]

S.A. arkadaşlar
Yıl sonu deviri için carilerin BORC ve ALACAK larını yeni döneme aktarmak için şu sql kodunu yazdım ve carilerin bakiyelerini cari harekete dönem devrii olarak aktarmayı başardım.Fakat alt toplamı aldıramıyorum.

Kod: Tümünü seç

cari_hesap_ekle.Close;
cari_hesap_ekle.SQL.Clear;
cari_hesap_ekle.SQL.Add('insert into cari_hesap(DNO,TARIH,ACIKLAMA,ODEMETIPI,BORC,ALACAK)');
cari_hesap_ekle.SQL.Add('Select KNO,'+QuotedStr(datetostr(date))+','+Quotedstr('Dönem Deviri')+','+ Quotedstr('Nakit')+ ',BORC_TOP,ALACAK_TOP from CARI_KAYIT');
cari_hesap_ekle.ExecSQL;

burada cari_hesap tablosuna eklediğim hareketi SUM ile nasıl tolayabilirim ama tüm carileri için aynı anda olacak.

Hayırlı çalışmalar...

[yastik]

Hemen altında "SUM" fonksiyonunu kullanarak

[ertline]

Aşağıdaki kodda hata vermiyor ama toplam almayıp cari_kayit tablosundaki borc_top ve Alacak_top alanlarının içini Null Yapıyor

Kod: Tümünü seç

cari_hesap_ekle1.Close;
cari_hesap_ekle1.SQL.Clear;
cari_hesap_ekle1.SQL.Add('update cari_kayit set borc_top=(Select SUM(BORC) from CARI_HESAP where dno=:kno),alacak_top=(Select SUM(ALACAK) from CARI_HESAP where dno=:kno)');
cari_hesap_ekle1.ExecSQL;

yardımcı olursanız sevinirim..

Hayırlı çalışmalar...

[bobasturk]

merhaba,

mantık olarak cevap yazmak istedim, ayrıca denemedim.

aynı kod bloğu içinde önce update veya insert işlemini yaptırdıktan sonra query yi clos ederek sum komutlarını yazmanız çözüm olurmu acaba veya aynı trans a bağlı iki query kullanarak

kolay gelsin

[ertline]

Select sorgusundan;

Kod: Tümünü seç

where dno=:kno

Çıkarınca toplam aldı ama doğal olarak tüm cari_hesap tablosunun borc ve alacaklarını topladı
where i nasıl kullanmalıyım burda acaba?

[bobasturk]

merhaba,

çıkarınca tamamında işlemi yapıyorsa sanırım parametre vermede hata oluyor. parametre vererek neleri süzerek işlem yapması gerektiğini bildirmen gerekli diye düşünüyorum.

kolay gelsin

[rsimsek]

Kod: Tümünü seç

//...
cari_hesap_ekle1.Close;
cari_hesap_ekle1.SQL.Clear;
cari_hesap_ekle1.SQL.Add('update cari_kayit ck set ck.borc_top=(Select SUM(BORC) from CARI_HESAP where dno=:kno and cari_hesap_no = ck.cari_hesap_no), alacak_top=(Select SUM(ALACAK) from CARI_HESAP where dno=:kno and cari_hesap_no = ck.cari_hesap_no)');
cari_hesap_ekle1.ExecSQL; 
//...

Her iki tabloda da cari_hesap_no diye eşsiz/unique bir anahtar/key alanı olduğunu varsaydım. Başka bir isim de olabilir, her ne ise UPDATE tablosuna lakap/alias atayıp and ile benzer şekilde eklemelisin