Quickreport QrExpr Expression özelliği hakkında

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
ender_arslanturk
Kıdemli Üye
Mesajlar: 709
Kayıt: 18 Şub 2005 03:38
Konum: İstanbul

Quickreport QrExpr Expression özelliği hakkında

Mesaj gönderen ender_arslanturk »

Selâmun Aleyküm.

Arkadaşlar veritabanında ki bir alanı şarta bağlayarak quicreportta sayfa sayfa nasıl toplam alabiliriz ?

Mesela;

Tablo Adı : Satislar
Satislar Alan 1 : ID (Otomatik tam sayı alan)
Satislar Alan 2 : StokKodu (yazısal alan)
Satislar Alan 3 : KdvOrani (Ondalık sayı alan)
Satislar Alan 4 : KdvTutari (Ondalık sayı alan)

En basit şekliyle vt içerik;

Kod: Tümünü seç

ID       StokKodu       KdvOrani     KdvTutari
1         a1                 18             100
2         a2                 8               200
3         a2                 8               200
4         a1                 18             100
5         a3                 8               300
6         a5                 18             500
.....
150      a4                 8               400
151      a2                 18             200
152      a15               18              300
gibi düşünelim :)

Şimdi bunu quickreportta raporunu aldığım zaman farzedelim ki 3 sayfa oluyor. Quickreporta bir tane pagefooter un içerisinde qrexpr attığımda expression özelliğine;

QrExpr1.Expression:

Kod: Tümünü seç

IF(Satislar.KdvOrani=8 , SUM(Satislar.KdvTutari) ,0 )
yazmama rağmen sayfa sayfa toplayarak! doğru bir sonuç alamıyorum. Bu konuda forumda aramalarıma dair sonuçlar olmasına karşın tam isabetli bir cevap göremedim.

Acaba nerede hata yapıyorum ? Ya da kodda mı modelleme yapmalıyım ?

Bu arada dip not (bilmeyen arkadaşlar için expressionun özelliği) :

Kod: Tümünü seç

IF(şart, doğru sonuç, yanlış sonuç)


İyi çalışmalar diliyorum Sizlere..
mstsargin
Üye
Mesajlar: 12
Kayıt: 16 May 2009 04:21

Re: Quickreport QrExpr Expression özelliği hakkında

Mesaj gönderen mstsargin »

s.a arkadaşlar

SUM(IF(Query1.KdvOrani = 8, Query1.KdvTutari,0.0))

SUM(IF(Query1.KdvOrani = 18, Query1.KdvTutari,0.0))

bu şekilde sizin istediğiniz işlemi yapıyor.
Kullanıcı avatarı
ender_arslanturk
Kıdemli Üye
Mesajlar: 709
Kayıt: 18 Şub 2005 03:38
Konum: İstanbul

Re: Quickreport QrExpr Expression özelliği hakkında

Mesaj gönderen ender_arslanturk »

mstsargin yazdı:s.a arkadaşlar

SUM(IF(Query1.KdvOrani = 8, Query1.KdvTutari,0.0))

SUM(IF(Query1.KdvOrani = 18, Query1.KdvTutari,0.0))

bu şekilde sizin istediğiniz işlemi yapıyor.

Hocam harikasın.. Allah razı olsun Üstadım.. Kod fıstık gibi.. ;)
Cevapla