SQL Sorgu Kasa Bakiye Raporu

Murat OSMA

Yönetici
Site Yöneticisi
Katılım
25 May 2018
Mesajlar
1,325
En iyi yanıt
11
Puanları
113
Konum
İstanbul
Web sitesi
excelarsivi.com
Ad Soyad
Murat OSMA
Office Versiyon
Office 365 TR+EN
Logo'da Kasa Bakiye Raporu almak için bu sorguyu kullanabilirsiniz.

[HIDEREPLYTHANKS]
SQL:
SELECT K.CODE AS KASA_KODU,K.NAME AS KASA_ADI,L.DATE_,L.TRCODE,L.LINEEXP AS ACIKLAMA,

ISNULL(CASE WHEN L.SIGN=0 THEN L.TRNET END,0) AS 'BORC',
ISNULL(CASE WHEN L.SIGN=1 THEN L.TRNET END,0) AS 'ALACAK',

SUM((CASE WHEN KS2.SIGN=1 THEN FORMAT(KS2.TRNET*-1,'N','tr-TR') ELSE FORMAT(KS2.TRNET,'N','tr-TR') END))  AS KASA_ID_BAKIYE

FROM  LG_001_01_KSLINES L LEFT OUTER JOIN LG_001_KSCARD K ON K.LOGICALREF=L.CARDREF
LEFT JOIN LG_001_01_KSLINES KS2 ON KS2.DATE_<=L.DATE_
WHERE  L.DATE_ BETWEEN '2018-01-01' AND '2018-12-31'
GROUP BY K.CODE,K.NAME,L.DATE_,L.TRCODE,L.LINEEXP,ISNULL(CASE WHEN L.SIGN=0 THEN L.TRNET END,0), ISNULL(CASE WHEN L.SIGN=1 THEN L.TRNET END,0)
[/HIDEREPLYTHANKS]


Sonuç Tablo

kasabakiye-min.png
 
Son düzenleme:

Hüseyin

Yeni Üye
Katılım
16 Ağu 2018
Mesajlar
15
En iyi yanıt
0
Puanları
3
Yaş
50
Konum
Rize
Ad Soyad
Hüseyin Ferahlı
Office Versiyon
office 2010 tr
elinize sağlık
 

fatihseda

Yeni Üye
Katılım
25 Eki 2018
Mesajlar
16
En iyi yanıt
0
Puanları
1
Konum
Burdur
Ad Soyad
Ali İhsan Bekar
Office Versiyon
Office 2019 TR
teşekkürler
 

Vedat ÖZER

Logo Uzmanı
Geliştirici
Katılım
4 Haz 2018
Mesajlar
265
En iyi yanıt
4
Puanları
63
Yaş
30
Konum
Antalya / Merkez
Ad Soyad
Vedat ÖZER
Office Versiyon
2019
Merhaba,

Dikkatimi çekti 2015-05-05 tarihinde bakiye 3 satır boyunca aynı ?
 

Vedat ÖZER

Logo Uzmanı
Geliştirici
Katılım
4 Haz 2018
Mesajlar
265
En iyi yanıt
4
Puanları
63
Yaş
30
Konum
Antalya / Merkez
Ad Soyad
Vedat ÖZER
Office Versiyon
2019
SQL:
----== MS SQL 2012 çalışır

SELECT
KSCARD.CODE AS [Kasa Kodu],
KSCARD.NAME AS [Kasa Adı],
KSLINES.DATE_ AS [Tarih],
KSLINES.HOUR_ AS Saat,
KSLINES.MINUTE_ AS Dakika,
CASE
WHEN KSLINES.TRCODE = 11 THEN 'Ch Tahsilat'
WHEN KSLINES.TRCODE = 12 THEN 'Ch Ödeme'
WHEN KSLINES.TRCODE = 21 THEN 'Bankaya Yatırılan'
WHEN KSLINES.TRCODE = 22 THEN 'Bankadan Çekilen'
WHEN KSLINES.TRCODE = 31 THEN 'Satınalma Faturası'
WHEN KSLINES.TRCODE = 32 THEN 'Perakende Satış İade Fatura'
WHEN KSLINES.TRCODE = 33 THEN 'Toptan Satış İade Fatura'
WHEN KSLINES.TRCODE = 34 THEN 'Alınan Hizmet Faturası'
WHEN KSLINES.TRCODE = 35 THEN 'Satınalma İade Faturası'
WHEN KSLINES.TRCODE = 36 THEN 'Perakende Satış Faturası'
WHEN KSLINES.TRCODE = 37 THEN 'Toptan Satış Faturası'
WHEN KSLINES.TRCODE = 38 THEN 'Verilen Hizmet Faturası'
WHEN KSLINES.TRCODE = 39 THEN 'Mistahsil Makbuz'
WHEN KSLINES.TRCODE = 41 THEN 'Muhasebe (Tahsil)'
WHEN KSLINES.TRCODE = 42 THEN 'Muhasebe (Tediye)'
WHEN KSLINES.TRCODE = 51 THEN 'Personel Borçlanması'
WHEN KSLINES.TRCODE = 52 THEN 'Personel Geri Ödemesi'
WHEN KSLINES.TRCODE = 61 THEN 'Çek Tahsili'
WHEN KSLINES.TRCODE = 62 THEN 'Senet Tahsili'
WHEN KSLINES.TRCODE = 63 THEN 'Çek Ödemesi'
WHEN KSLINES.TRCODE = 64 THEN 'Senet Ödemesi'
WHEN KSLINES.TRCODE = 71 THEN 'Açılış (Borç)'
WHEN KSLINES.TRCODE = 72 THEN 'Açılış (Alacak)'
WHEN KSLINES.TRCODE = 73 THEN 'Virman (Borç)'
WHEN KSLINES.TRCODE = 74 THEN 'Virman (Alacak)'
WHEN KSLINES.TRCODE = 75 THEN 'Gider Pusulası'
WHEN KSLINES.TRCODE = 76 THEN 'Verilen Serbest Meslek Makbuzu'
WHEN KSLINES.TRCODE = 77 THEN 'Alınan Serbest Meslek Makbuzu'
WHEN KSLINES.TRCODE = 79 THEN 'Kur Farkı (Borç)'
WHEN KSLINES.TRCODE = 80 THEN 'Kur Farkı (Alacak)' END AS [İşlem Türü],
KSLINES.BRANCH AS [Is Yeri],
KSLINES.SPECODE AS [Ozel Kod],
KSLINES.CYPHCODE AS [Yetki Kodu],
KSLINES.FICHENO AS [Fis No],
KSLINES.CUSTTITLE AS [Kasa Aciklamasi],
KSLINES.LINEEXP AS [Satir Aciklamasi],
KSLINES.TRRATE AS [İşlem Kuru],
KSLINES.REPORTRATE AS [Raporlama Kuru],
CASE WHEN  KSLINES.TRCURR IN(0,160) THEN 'TL' ELSE (SELECT TOP 1  K.CURCODE FROM L_CURRENCYLIST K WHERE K.CURTYPE=KSLINES.TRCURR) END [Döviz Türü],
CASE WHEN KSLINES.SIGN = 0 THEN KSLINES.AMOUNT ELSE 0 END AS [Borc],
CASE WHEN KSLINES.SIGN = 1 THEN KSLINES.AMOUNT ELSE 0 END AS [Alacak],
SUM(
CASE WHEN KSLINES.SIGN = 0  THEN KSLINES.AMOUNT ELSE -KSLINES.AMOUNT END
)  OVER(PARTITION BY KSLINES.CARDREF ORDER BY KSLINES.DATE_ ROWS BETWEEN UNBOUNDED PRECEDING AND CURRENT ROW  ) [Bakiye]

           
FROM LG_006_01_KSLINES KSLINES LEFT OUTER JOIN
LG_006_KSCARD KSCARD ON KSLINES.CARDREF = KSCARD.LOGICALREF
WHERE KSLINES.CANCELLED=0                    
ORDER BY KSLINES.DATE_,KSLINES.HOUR_,KSLINES.MINUTE_
 
Son düzenleme:
Üst Alt