- Katılım
- 25 May 2018
- Mesajlar
- 1,610
- En iyi yanıt
- 14
- Puanları
- 113
- Konum
- İstanbul
- Web sitesi
- excelarsivi.com
- Ad Soyad
- Murat OSMA
- Office Vers.
- Microsoft 365 TR+EN
Logo'da Vadesi Gelmemiş Çekler tablosu için bu sorguyu kullanabilirsiniz.
[HIDEREPLYTHANKS]
[/HIDEREPLYTHANKS]
[HIDEREPLYTHANKS]
SQL:
ALTER VIEW [dbo].[DLT_213_ENSAR_VADESI_GELMEMIS_ODEME_EMRI_CEK] AS
SELECT
CS.SETDATE AS [Evrak Tarihi],
CS.DUEDATE VADE_TARIHI,
year(CS.SETDATE) as [Yıl],
case month(CS.SETDATE)
WHEN 1 THEN 'Ocak'
WHEN 2 THEN 'Şubat'
WHEN 3 THEN 'Mart'
WHEN 4 THEN 'Nisan'
WHEN 5 THEN 'Mayıs'
WHEN 6 THEN 'Haziran'
WHEN 7 THEN 'Temmuz'
WHEN 8 THEN 'Ağustos'
WHEN 9 THEN 'Eylül'
WHEN 10 THEN 'Ekim'
WHEN 11 THEN 'Kasım'
WHEN 12 THEN 'Aralık' end as [Aylar],
CL.LOGICALREF,
CL.CODE CARI_KOD,
CL.DEFINITION_ UNVAN,
CS.PORTFOYNO,
CASE CS.DOC
WHEN 1 THEN 'Çek Girişi'
WHEN 2 THEN 'Senet Girişi'
WHEN 3 THEN 'Çek Çıkış (Cari Hesaba)'
WHEN 4 THEN 'Senet Çıkış (Cari Hesaba)'
WHEN 5 THEN 'Çek Çıkış (Banka Tahsil)'
WHEN 6 THEN 'Senet Çıkış (Banka Tahsil)'
WHEN 7 THEN 'Çek Çıkış (Banka Teminat)'
WHEN 8 THEN 'Senet Çıkış (Banka Teminat)'
WHEN 9 THEN 'İşlem Bordrosu(Müşteri Çeki)'
WHEN 10 THEN 'İşlem bordrosu (Müşteri Senedi)'
WHEN 11 THEN 'İşlem Bordrosu (Kendi Çekimiz)'
WHEN 12 THEN 'İşlem Bordrosu (Borç Senedimiz)'
ELSE 'Ne Oldugu Belirsiz' END 'İŞLEM TÜRÜ',
CASE CS.CURRSTAT
WHEN 1 THEN 'Portföyde'
WHEN 2 THEN 'Ciro Edildi'
WHEN 3 THEN 'Teminata Verildi'
WHEN 4 THEN 'Tahsile Verildi'
WHEN 5 THEN 'Protestolu Tahsile Verildi'
WHEN 6 THEN 'İade Edildi'
WHEN 7 THEN 'Protesto Edildi'
WHEN 8 THEN 'Tahsil Edildi'
WHEN 9 THEN 'Kendi Çekimiz'
WHEN 10 THEN 'Borç Senedimiz'
WHEN 11 THEN 'Karşılığı Yok'
WHEN 12 THEN 'Tahsil Edilemiyor'
ELSE 'Ne Oldugu Belirsiz' END 'DURUMU',
'DONEM' DONEM,
CS.SPECODE SAHIBI,
CASE CSR.BRANCH WHEN 0 THEN 'YELKEN' WHEN 1 THEN 'DORPEN' END AS FIRMA,
CASE CSR.TRADINGGRP WHEN 1 THEN 'R' WHEN 2 THEN 'GR' END AS TIG,
CASE CS.TRCURR WHEN 0 THEN 'TL' WHEN 1 THEN 'USD' WHEN 20 THEN 'EUR ' END AS PARA_BIRIMI,
CS.TRNET DOVIZ_TUTAR,
CASE WHEN CS.TRCURR>0 THEN CS.TRRATE*ISNULL(CS.TRNET,0) ELSE CS.TRNET END AS TL_TUTAR,
CASE WHEN SUBSTRING(CONVERT(VARCHAR(10),cs.DUEDATE,102), 1, 10)<=SUBSTRING(CONVERT(VARCHAR(10),GETDATE(),102), 1, 10) THEN 'Gecmis'
WHEN CS.DUEDATE>GETDATE() THEN 'Gelmemis' END AS Vade,
CASE CSR.ACCOUNTED WHEN 0 THEN '' WHEN 1 THEN 'M' END AS Muhasebe, CASE WHEN CS.CIRO=1 THEN 'Ciro' else '' end CIRO,
CASE WHEN CS.CIRO=1 THEN
(SELECT C.CODE + ' - ' + C.DEFINITION_ FROM LG_213_CLCARD C WHERE LOGICALREF=
(SELECT CARDREF FROM LG_213_01_CSTRANS WHERE STATNO=1 AND CSREF=CS.LOGICALREF))ELSE ''
END AS CIRO_EDILEN, CS.NEWSERINO CEKNO,BANKNAME
FROM LG_213_01_CSTRANS CST
INNER JOIN LG_213_01_CSCARD CS ON CS.LOGICALREF=CST.CSREF
INNER JOIN LG_213_01_CSROLL CSR ON CSR.LOGICALREF=CST.ROLLREF
INNER JOIN LG_213_01_CLFLINE CLF ON CLF.SOURCEFREF=CSR.LOGICALREF
INNER JOIN LG_213_CLCARD CL ON CL.LOGICALREF=CSR.CARDREF
WHERE CLF.MODULENR=6 AND CLF.TRCODE=61 AND CL.CODE LIKE '[12]%'
UNION ALL
SELECT
CS.SETDATE AS [Evrak Tarihi],
CS.DUEDATE VADE_TARIHI,
year(CS.SETDATE) as [Yıl],
case month(CS.SETDATE)
WHEN 1 THEN 'Ocak'
WHEN 2 THEN 'Şubat'
WHEN 3 THEN 'Mart'
WHEN 4 THEN 'Nisan'
WHEN 5 THEN 'Mayıs'
WHEN 6 THEN 'Haziran'
WHEN 7 THEN 'Temmuz'
WHEN 8 THEN 'Ağustos'
WHEN 9 THEN 'Eylül'
WHEN 10 THEN 'Ekim'
WHEN 11 THEN 'Kasım'
WHEN 12 THEN 'Aralık' end as [Aylar],
CL.LOGICALREF,
CL.CODE
CARI_KOD,
CL.DEFINITION_ UNVAN,
CS.PORTFOYNO,
CASE CS.DOC
WHEN 1 THEN 'Çek Girişi'
WHEN 2 THEN 'Senet Girişi'
WHEN 3 THEN 'Çek Çıkış (Cari Hesaba)'
WHEN 4 THEN 'Senet Çıkış (Cari Hesaba)'
WHEN 5 THEN 'Çek Çıkış (Banka Tahsil)'
WHEN 6 THEN 'Senet Çıkış (Banka Tahsil)'
WHEN 7 THEN 'Çek Çıkış (Banka Teminat)'
WHEN 8 THEN 'Senet Çıkış (Banka Teminat)'
WHEN 9 THEN 'İşlem Bordrosu(Müşteri Çeki)'
WHEN 10 THEN 'İşlem bordrosu (Müşteri Senedi)'
WHEN 11 THEN 'İşlem Bordrosu (Kendi Çekimiz)'
WHEN 12 THEN 'İşlem Bordrosu (Borç Senedimiz)'
ELSE 'Ne Oldugu Belirsiz' END 'İŞLEM TÜRÜ',
CASE CS.CURRSTAT
WHEN 1 THEN 'Portföyde'
WHEN 2 THEN 'Ciro Edildi'
WHEN 3 THEN 'Teminata Verildi'
WHEN 4 THEN 'Tahsile Verildi'
WHEN 5 THEN 'Protestolu Tahsile Verildi'
WHEN 6 THEN 'İade Edildi'
WHEN 7 THEN 'Protesto Edildi'
WHEN 8 THEN 'Tahsil Edildi'
WHEN 9 THEN 'Kendi Çekimiz'
WHEN 10 THEN 'Borç Senedimiz'
WHEN 11 THEN 'Karşılığı Yok'
WHEN 12 THEN 'Tahsil Edilemiyor'
ELSE 'Ne Oldugu Belirsiz' END 'DURUMU',
'DEVİR' DONEM,
CS.SPECODE SAHIBI,
CASE CS.BRANCH WHEN 0 THEN 'YELKEN' WHEN 1 THEN 'DORPEN' END AS FIRMA,
CASE CS.TRADINGGRP WHEN 1 THEN 'R' WHEN 2 THEN 'GR' END AS TIG,
CASE CS.TRCURR WHEN 0 THEN 'TL' WHEN 1 THEN 'USD' WHEN 20 THEN 'EUR ' END AS PARA_BIRIMI,
CS.TRNET DOVIZ_TUTAR,
CASE WHEN CS.TRCURR>0 THEN CS.TRRATE*ISNULL(CS.TRNET,0) ELSE CS.TRNET END AS TL_TUTAR,
CASE WHEN SUBSTRING(CONVERT(VARCHAR(10),cs.DUEDATE,102), 1, 10)<=SUBSTRING(CONVERT(VARCHAR(10),GETDATE(),102), 1, 10) THEN 'Gecmis'
WHEN CS.DUEDATE>GETDATE() THEN 'Gelmemis' END AS Vade,
CASE CST.ACCOUNTED WHEN 0 THEN '' WHEN 1 THEN 'M' END AS Muhasebe,
CASE WHEN CS.CIRO=1 THEN 'Ciro' else '' end CIRO,
CASE WHEN CS.CIRO=1 THEN
(SELECT C.CODE + ' - ' + C.DEFINITION_ FROM LG_213_CLCARD C WHERE LOGICALREF=
(SELECT CARDREF FROM LG_213_01_CSTRANS WHERE STATNO=1 AND CSREF=CS.LOGICALREF))ELSE ''
END AS CIRO_EDILEN, CS.NEWSERINO CEKNO,BANKNAME
FROM LG_213_01_CSTRANS CST
INNER JOIN LG_213_01_CSCARD CS ON CS.LOGICALREF=CST.CSREF
INNER JOIN LG_213_CLCARD CL ON CL.LOGICALREF=CST.CARDREF
WHERE CS.DOC=1 AND CST.CARDMD=5 AND CST.DEVIR=1 AND CST.ROLLREF=0 AND CL.CODE LIKE '[12]%'
Son düzenleme: