Çek senet durumu

Gönderen Konu: Çek senet durumu  (Okunma sayısı 3848 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı asmbnm

  • Yeni Kullanıcı
  • *
  • Karma: 0
Ynt: Çek senet durumu
« Yanıtla #15 : 04.03.2015, 14:21 »
çek-senet hareketlerinin tamamını nasıl görebilirim.

Çevrimdışı ibrahim02

  • Logo Kullanıcısı Pro
  • ***
  • Karma: 0
Ynt: Çek senet durumu
« Yanıtla #16 : 04.03.2015, 15:06 »
çek-senet hareketlerinin tamamını nasıl görebilirim.

Where Kısmını silin bütün hepsi gelir

Çevrimdışı asmbnm

  • Yeni Kullanıcı
  • *
  • Karma: 0
Ynt: Çek senet durumu
« Yanıtla #17 : 04.03.2015, 15:21 »
where kısmı neresi


SELECT CSC.DUEDATE                       AS [Vade],
       YEAR(csc.duedate)                 AS [Yıl],
       CASE MONTH(CSC.DUEDATE)
            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],
       CSR.DATE_                         AS [İşlem Tarihi],
       CSC.PORTFOYNO                     AS [Pört No],
       CSC.NEWSERINO                     AS [Seri No],
       CSC.AMOUNT                        AS [Tutar],


CASE 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 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',

       CSC.OWING                         AS [Borçlu],
       
CASE WHEN ISNULL(CLC.CODE, '') <> '' THEN CLC.DEFINITION_ ELSE (SELECT CLC1.DEFINITION_ FROM LG_015_CLCARD CLC1 WHERE CLC1.LOGICALREF =(SELECT TOP 1 CTS1.CARDREF FROM LG_015_01_CSTRANS CTS1 WHERE CTS1.STATUS = 1 AND CTS1.CSREF = CST.CSREF ORDER BY CTS1.LOGICALREF ASC)) END AS [CH Adı],
 CSC.BANKNAME AS [Çekin Bankası],
 ISNULL(ISNULL(BNK.DEFINITION_, BNK1.DEFINITION_), CSC.BANKNAME) AS [Banka Adı],

 CASE WHEN ISNULL(CLC.CODE, '') <> '' THEN CLC.CITY ELSE (SELECT CLC1.CITY FROM LG_015_CLCARD CLC1 WHERE CLC1.LOGICALREF =(SELECT TOP 1 CTS1.CARDREF FROM LG_015_01_CSTRANS CTS1 WHERE CTS1.STATUS = 1 AND CTS1.CSREF = CST.CSREF ORDER BY CTS1.LOGICALREF ASC)) END AS "Şehir"
FROM   LG_015_01_CSTRANS                 AS CST
       LEFT OUTER JOIN LG_015_01_CSCARD  AS CSC
            ON  CSC.LOGICALREF = CST.CSREF
       LEFT OUTER JOIN LG_015_01_CSROLL  AS CSR
            ON  CSR.LOGICALREF = CST.ROLLREF
       LEFT OUTER JOIN LG_015_CLCARD     AS CLC
            ON  CLC.LOGICALREF = CST.CARDREF
            AND CST.CARDMD = 5
       LEFT OUTER JOIN LG_015_BANKACC    AS BNC
            ON  BNC.LOGICALREF = CSC.OURBANKREF
       LEFT OUTER JOIN LG_015_BNCARD     AS BNK
            ON  BNK.LOGICALREF = BNC.BANKREF
       LEFT OUTER JOIN LG_015_BANKACC    AS BNC1
            ON  BNC1.LOGICALREF = CST.CARDREF
            AND CST.CARDMD = 7
       LEFT OUTER JOIN LG_015_BNCARD     AS BNK1
            ON  BNK1.LOGICALREF = BNC1.BANKREF
 (ISNULL(CSC.AMOUNT, 0) <> 0)
       AND csc.doc = 1
       AND csc.duedate >= CONVERT(VARCHAR, GETDATE(), 112)
       AND CSc.CURRSTAT IN (1,2,3,4,5,6,7,8,9,10,11,12)
       AND cst.statno = 1
ORDER BY
       CSc.dueDATE

Çevrimdışı asmbnm

  • Yeni Kullanıcı
  • *
  • Karma: 0
Ynt: Çek senet durumu
« Yanıtla #18 : 04.03.2015, 15:22 »
where kısmı neresidir. ya da nereyi nasıl düzeltmek gerekiyor.


SELECT CSC.DUEDATE                       AS [Vade],
       YEAR(csc.duedate)                 AS [Yıl],
       CASE MONTH(CSC.DUEDATE)
            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],
       CSR.DATE_                         AS [İşlem Tarihi],
       CSC.PORTFOYNO                     AS [Pört No],
       CSC.NEWSERINO                     AS [Seri No],
       CSC.AMOUNT                        AS [Tutar],


CASE 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 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',

       CSC.OWING                         AS [Borçlu],
       
CASE WHEN ISNULL(CLC.CODE, '') <> '' THEN CLC.DEFINITION_ ELSE (SELECT CLC1.DEFINITION_ FROM LG_015_CLCARD CLC1 WHERE CLC1.LOGICALREF =(SELECT TOP 1 CTS1.CARDREF FROM LG_015_01_CSTRANS CTS1 WHERE CTS1.STATUS = 1 AND CTS1.CSREF = CST.CSREF ORDER BY CTS1.LOGICALREF ASC)) END AS [CH Adı],
 CSC.BANKNAME AS [Çekin Bankası],
 ISNULL(ISNULL(BNK.DEFINITION_, BNK1.DEFINITION_), CSC.BANKNAME) AS [Banka Adı],

 CASE WHEN ISNULL(CLC.CODE, '') <> '' THEN CLC.CITY ELSE (SELECT CLC1.CITY FROM LG_015_CLCARD CLC1 WHERE CLC1.LOGICALREF =(SELECT TOP 1 CTS1.CARDREF FROM LG_015_01_CSTRANS CTS1 WHERE CTS1.STATUS = 1 AND CTS1.CSREF = CST.CSREF ORDER BY CTS1.LOGICALREF ASC)) END AS "Şehir"
FROM   LG_015_01_CSTRANS                 AS CST
       LEFT OUTER JOIN LG_015_01_CSCARD  AS CSC
            ON  CSC.LOGICALREF = CST.CSREF
       LEFT OUTER JOIN LG_015_01_CSROLL  AS CSR
            ON  CSR.LOGICALREF = CST.ROLLREF
       LEFT OUTER JOIN LG_015_CLCARD     AS CLC
            ON  CLC.LOGICALREF = CST.CARDREF
            AND CST.CARDMD = 5
       LEFT OUTER JOIN LG_015_BANKACC    AS BNC
            ON  BNC.LOGICALREF = CSC.OURBANKREF
       LEFT OUTER JOIN LG_015_BNCARD     AS BNK
            ON  BNK.LOGICALREF = BNC.BANKREF
       LEFT OUTER JOIN LG_015_BANKACC    AS BNC1
            ON  BNC1.LOGICALREF = CST.CARDREF
            AND CST.CARDMD = 7
       LEFT OUTER JOIN LG_015_BNCARD     AS BNK1
            ON  BNK1.LOGICALREF = BNC1.BANKREF
WHERE  (ISNULL(CSC.AMOUNT, 0) <> 0)
       AND csc.doc = 1
       AND csc.duedate >= CONVERT(VARCHAR, GETDATE(), 112)
       AND CSc.CURRSTAT IN (1,2,3,4,5,6,7,8,9,10,11,12)
       AND cst.statno = 1
ORDER BY
       CSc.dueDATE

Çevrimdışı ibrahim02

  • Logo Kullanıcısı Pro
  • ***
  • Karma: 0
Ynt: Çek senet durumu
« Yanıtla #19 : 04.03.2015, 15:38 »
where kısmı neresidir. ya da nereyi nasıl düzeltmek gerekiyor.



Where Kısmı Koşul kısmı burası

WHERE  (ISNULL(CSC.AMOUNT, 0) <> 0)
       AND csc.doc = 1
       AND csc.duedate >= CONVERT(VARCHAR, GETDATE(), 112)
       AND CSc.CURRSTAT IN (1,2,3,4,5,6,7,8,9,10,11,12)
       AND cst.statno = 1


Çevrimdışı asmbnm

  • Yeni Kullanıcı
  • *
  • Karma: 0
Ynt: Çek senet durumu
« Yanıtla #20 : 04.03.2015, 15:39 »
teşekkür ederim.
Allah razı olsun

Çevrimdışı halisbatmaz

  • Logo Uzmanı
  • *****
  • Karma: -4
Ynt: Çek senet durumu
« Yanıtla #21 : 04.03.2015, 15:51 »
Rapor Benim Raporum
tırnakları sil

s = "SELECT"


s = s & " CSC.DUEDATE AS [Vade],"
s = s & " year(csc.duedate) as [Yıl],"
s = s & " case month(CSC.DUEDATE)"
s = s & " WHEN 1 THEN 'Ocak'"
s = s & " WHEN 2 THEN 'Şubat'"
s = s & " WHEN 3 THEN 'Mart'"
s = s & " WHEN 4 THEN 'Nisan'"
s = s & " WHEN 5 THEN 'Mayıs'"
s = s & " WHEN 6 THEN 'Haziran'"
s = s & " WHEN 7 THEN 'Temmuz'"
s = s & " WHEN 8 THEN 'Ağustos'"
s = s & " WHEN 9 THEN 'Eylül'"
s = s & " WHEN 10 THEN 'Ekim'"
s = s & " WHEN 11 THEN 'Kasım'"
s = s & " WHEN 12 THEN 'Aralık' end as [Aylar],"

s = s & " CSR.DATE_ AS [İşlem Tarihi],"
s = s & " CSC.PORTFOYNO AS [Pört No],"
s = s & " CSC.NEWSERINO AS [Seri No],"
s = s & " CSC.AMOUNT AS [Tutar],"
s = s & " CASE(CSc.CURRSTAT)  WHEN 1 THEN 'Pörtföyde' when 2 then 'Ciro Edildi' when 4 then 'Banka Tahsil' END 'Durumu' ,   "
s = s & " CSC.OWING AS [Borçlu],"
s = s & "  (SELECT CLC1.DEFINITION_ FROM LG_" & Firma & "_CLCARD CLC1 WHERE CLC1.LOGICALREF =(SELECT TOP 1 CTS1.CARDREF FROM LG_" & Firma & "_" & Dönem & "_CSTRANS CTS1 WHERE CTS1.STATUS IN (1,2,4) AND CTS1.CSREF = CST.CSREF ORDER BY CTS1.LOGICALREF ASC))  AS [Ciro Eden],"
s = s & " ISNULL(ISNULL(BNK.DEFINITION_, BNK1.DEFINITION_), CSC.BANKNAME) AS [Banka Adı],"

s = s & " CASE WHEN ISNULL(CLC.CODE, '') <> '' THEN CLC.DEFINITION_ ELSE (SELECT CLC1.DEFINITION_ FROM LG_" & Firma & "_CLCARD CLC1 WHERE CLC1.LOGICALREF =(SELECT TOP 1 CTS1.CARDREF FROM LG_" & Firma & "_" & Dönem & "_CSTRANS CTS1 WHERE CTS1.STATUS = 1 AND CTS1.CSREF = CST.CSREF ORDER BY CTS1.LOGICALREF ASC)) END AS [Ciro Edilen],"

s = s & " ''AS [Boş]"
s = s & " FROM LG_" & Firma & "_" & Dönem & "_CSTRANS AS CST LEFT OUTER JOIN LG_" & Firma & "_" & Dönem & "_CSCARD AS CSC ON CSC.LOGICALREF = CST.CSREF"
s = s & " LEFT OUTER JOIN LG_" & Firma & "_" & Dönem & "_CSROLL AS CSR ON CSR.LOGICALREF = CST.ROLLREF "
s = s & " LEFT OUTER JOIN LG_" & Firma & "_CLCARD AS CLC ON CLC.LOGICALREF = CST.CARDREF AND CST.CARDMD = 5 "
s = s & " LEFT OUTER JOIN LG_" & Firma & "_BANKACC AS BNC ON BNC.LOGICALREF = CSC.OURBANKREF "
s = s & " LEFT OUTER JOIN LG_" & Firma & "_BNCARD AS BNK ON BNK.LOGICALREF = BNC.BANKREF "
s = s & " LEFT OUTER JOIN LG_" & Firma & "_BANKACC AS BNC1 ON BNC1.LOGICALREF = CST.CARDREF AND CST.CARDMD = 7 "
s = s & " LEFT OUTER JOIN LG_" & Firma & "_BNCARD AS BNK1 ON BNK1.LOGICALREF = BNC1.BANKREF WHERE (ISNULL(CSC.AMOUNT, 0) <> 0)  AND  csc.doc=1 and csc.duedate>= '01.01.2015'  and CSc.CURRSTAT IN (1,2,4) and cst.statno=1  order by CSc.dueDATE"
« Son Düzenleme: 04.03.2015, 15:53 Gönderen: halisbatmaz »

Çevrimdışı asmbnm

  • Yeni Kullanıcı
  • *
  • Karma: 0
Ynt: Çek senet durumu
« Yanıtla #22 : 04.03.2015, 17:09 »
tırnaklardan kasıt anlamadım

benim firma LG_015_01


Çevrimdışı ByBirol®

  • Logo Sistem Administrator
  • Logo Uzmanı
  • *****
  • Karma: 18
  • admin@artibilisim.com Logo Çözüm Ortağı
Ynt: Çek senet durumu
« Yanıtla #23 : 04.03.2015, 17:30 »
Yani kodlar , VBA ' ya göre ayarlanmış olup ilgili ifadeleri temizleyip , Sade T-SQL haline getiriniz .

Çevrimdışı asmbnm

  • Yeni Kullanıcı
  • *
  • Karma: 0
Ynt: Çek senet durumu
« Yanıtla #24 : 04.03.2015, 20:54 »
Ben bu konulara yabancıyım. istediğim tek şey her çek ve senetlerin son durumu nedir? Aşağıdaki kodlarda çek ile ilgili bütün hareketleri veriyor.örneğin çeki bankaya tahsile çıkıyorum karşılıksız olduğunda tekrar portföye alıp müşteriye iade çıkıyorum. aşağıdaki kodlarla yaptığımda sanki aynı numaralı çekten 3 adet varmış gibi gösteriyor. ne yapmalıyım. Her çekimin durumunu 1 defa göstermesi için. çek tahsil se tahsil, iade ise iade, vs. gibi


SELECT CSC.DUEDATE                       AS [Vade],
       YEAR(csc.duedate)                 AS [Yıl],
       CASE MONTH(CSC.DUEDATE)
            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],
       CSR.DATE_                         AS [İşlem Tarihi],
       CSC.PORTFOYNO                     AS [Pört No],
       CSC.NEWSERINO                     AS [Seri No],
       CSC.AMOUNT                        AS [Tutar],


CASE 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 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',

       CSC.OWING                         AS [Borçlu],
       
CASE WHEN ISNULL(CLC.CODE, '') <> '' THEN CLC.DEFINITION_ ELSE (SELECT CLC1.DEFINITION_ FROM LG_015_CLCARD CLC1 WHERE CLC1.LOGICALREF =(SELECT TOP 1 CTS1.CARDREF FROM LG_015_01_CSTRANS CTS1 WHERE CTS1.STATUS = 1 AND CTS1.CSREF = CST.CSREF ORDER BY CTS1.LOGICALREF ASC)) END AS [CH Adı],
 CSC.BANKNAME AS [Çekin Bankası],
 ISNULL(ISNULL(BNK.DEFINITION_, BNK1.DEFINITION_), CSC.BANKNAME) AS [Banka Adı],

 CASE WHEN ISNULL(CLC.CODE, '') <> '' THEN CLC.CITY ELSE (SELECT CLC1.CITY FROM LG_015_CLCARD CLC1 WHERE CLC1.LOGICALREF =(SELECT TOP 1 CTS1.CARDREF FROM LG_015_01_CSTRANS CTS1 WHERE CTS1.STATUS = 1 AND CTS1.CSREF = CST.CSREF ORDER BY CTS1.LOGICALREF ASC)) END AS "Şehir"
FROM   LG_015_01_CSTRANS                 AS CST
       LEFT OUTER JOIN LG_015_01_CSCARD  AS CSC
            ON  CSC.LOGICALREF = CST.CSREF
       LEFT OUTER JOIN LG_015_01_CSROLL  AS CSR
            ON  CSR.LOGICALREF = CST.ROLLREF
       LEFT OUTER JOIN LG_015_CLCARD     AS CLC
            ON  CLC.LOGICALREF = CST.CARDREF
            AND CST.CARDMD = 5
       LEFT OUTER JOIN LG_015_BANKACC    AS BNC
            ON  BNC.LOGICALREF = CSC.OURBANKREF
       LEFT OUTER JOIN LG_015_BNCARD     AS BNK
            ON  BNK.LOGICALREF = BNC.BANKREF
       LEFT OUTER JOIN LG_015_BANKACC    AS BNC1
            ON  BNC1.LOGICALREF = CST.CARDREF
            AND CST.CARDMD = 7
       LEFT OUTER JOIN LG_015_BNCARD     AS BNK1
            ON  BNK1.LOGICALREF = BNC1.BANKREF


Çevrimdışı asmbnm

  • Yeni Kullanıcı
  • *
  • Karma: 0
Ynt: Çek senet durumu
« Yanıtla #25 : 04.03.2015, 21:31 »
CH Adı   Vade   İşlem Tarihi   Seri No   Tutar   İŞLEM TÜRÜ   DURUMU   Borçlu   Banka Adı   Şehir
AKMERT   28.02.2015   03.03.2015   5898857    4.000,00      Çek Girişi   Tahsil Edildi   AKBANK      BAYRAMPAŞA-İSTANBUL
AKMERT   28.02.2015      5898857    4.000,00      Çek Girişi   Tahsil Edildi   AKBANK   AKBANK   BAYRAMPAŞA-İSTANBUL
AKMERT   28.02.2015      5898857    4.000,00      Çek Girişi   Tahsil Edildi   AKBANK      BAYRAMPAŞA-İSTANBUL

Çevrimdışı asmbnm

  • Yeni Kullanıcı
  • *
  • Karma: 0
Ynt: Çek senet durumu
« Yanıtla #26 : 04.03.2015, 21:38 »
örneğin aşağıdaki çek 3 işlem görmüş ve 3 satır görünüyor. ben ise çekin en son durumunu görmek istiyorum. Ne yapmam gerekiyor

CH Adı   Vade            İşlem Tarihi   Seri No   Tutar     İŞLEM TÜRÜ   DURUMU            Borçlu    Banka Adı          Şehir
AKMERT   28.02.2015   03.03.2015   5898857    4.000,00   Çek Girişi   Tahsil Edildi   AKBANK                             BAYRAMPAŞA-İSTANBUL
AKMERT   28.02.2015                      5898857    4.000,00   Çek Girişi   Tahsil Edildi   AKBANK     AKBANK          BAYRAMPAŞA-İSTANBUL
AKMERT   28.02.2015                      5898857    4.000,00   Çek Girişi   Tahsil Edildi   AKBANK                              BAYRAMPAŞA-İSTANBUL

Çevrimdışı ByBirol®

  • Logo Sistem Administrator
  • Logo Uzmanı
  • *****
  • Karma: 18
  • admin@artibilisim.com Logo Çözüm Ortağı
Ynt: Çek senet durumu
« Yanıtla #27 : 04.03.2015, 22:01 »
Halis arkadaşımızın paylaştığı sorguyu uygulayin .

Çevrimdışı asmbnm

  • Yeni Kullanıcı
  • *
  • Karma: 0
Ynt: Çek senet durumu
« Yanıtla #28 : 04.03.2015, 23:09 »
Bu kodu nasıl uygulayacağım  (benim firma bilgilerim   LG_015_01 )


s = "SELECT"


s = s & " CSC.DUEDATE AS [Vade],"
s = s & " year(csc.duedate) as [Yıl],"
s = s & " case month(CSC.DUEDATE)"
s = s & " WHEN 1 THEN 'Ocak'"
s = s & " WHEN 2 THEN 'Şubat'"
s = s & " WHEN 3 THEN 'Mart'"
s = s & " WHEN 4 THEN 'Nisan'"
s = s & " WHEN 5 THEN 'Mayıs'"
s = s & " WHEN 6 THEN 'Haziran'"
s = s & " WHEN 7 THEN 'Temmuz'"
s = s & " WHEN 8 THEN 'Ağustos'"
s = s & " WHEN 9 THEN 'Eylül'"
s = s & " WHEN 10 THEN 'Ekim'"
s = s & " WHEN 11 THEN 'Kasım'"
s = s & " WHEN 12 THEN 'Aralık' end as [Aylar],"

s = s & " CSR.DATE_ AS [İşlem Tarihi],"
s = s & " CSC.PORTFOYNO AS [Pört No],"
s = s & " CSC.NEWSERINO AS [Seri No],"
s = s & " CSC.AMOUNT AS [Tutar],"
s = s & " CASE(CSc.CURRSTAT)  WHEN 1 THEN 'Pörtföyde' when 2 then 'Ciro Edildi' when 4 then 'Banka Tahsil' END 'Durumu' ,   "
s = s & " CSC.OWING AS [Borçlu],"
s = s & "  (SELECT CLC1.DEFINITION_ FROM LG_" & Firma & "_CLCARD CLC1 WHERE CLC1.LOGICALREF =(SELECT TOP 1 CTS1.CARDREF FROM LG_" & Firma & "_" & Dönem & "_CSTRANS CTS1 WHERE CTS1.STATUS IN (1,2,4) AND CTS1.CSREF = CST.CSREF ORDER BY CTS1.LOGICALREF ASC))  AS [Ciro Eden],"
s = s & " ISNULL(ISNULL(BNK.DEFINITION_, BNK1.DEFINITION_), CSC.BANKNAME) AS [Banka Adı],"

s = s & " CASE WHEN ISNULL(CLC.CODE, '') <> '' THEN CLC.DEFINITION_ ELSE (SELECT CLC1.DEFINITION_ FROM LG_" & Firma & "_CLCARD CLC1 WHERE CLC1.LOGICALREF =(SELECT TOP 1 CTS1.CARDREF FROM LG_" & Firma & "_" & Dönem & "_CSTRANS CTS1 WHERE CTS1.STATUS = 1 AND CTS1.CSREF = CST.CSREF ORDER BY CTS1.LOGICALREF ASC)) END AS [Ciro Edilen],"

s = s & " ''AS [Boş]"
s = s & " FROM LG_" & Firma & "_" & Dönem & "_CSTRANS AS CST LEFT OUTER JOIN LG_" & Firma & "_" & Dönem & "_CSCARD AS CSC ON CSC.LOGICALREF = CST.CSREF"
s = s & " LEFT OUTER JOIN LG_" & Firma & "_" & Dönem & "_CSROLL AS CSR ON CSR.LOGICALREF = CST.ROLLREF "
s = s & " LEFT OUTER JOIN LG_" & Firma & "_CLCARD AS CLC ON CLC.LOGICALREF = CST.CARDREF AND CST.CARDMD = 5 "
s = s & " LEFT OUTER JOIN LG_" & Firma & "_BANKACC AS BNC ON BNC.LOGICALREF = CSC.OURBANKREF "
s = s & " LEFT OUTER JOIN LG_" & Firma & "_BNCARD AS BNK ON BNK.LOGICALREF = BNC.BANKREF "
s = s & " LEFT OUTER JOIN LG_" & Firma & "_BANKACC AS BNC1 ON BNC1.LOGICALREF = CST.CARDREF AND CST.CARDMD = 7 "
s = s & " LEFT OUTER JOIN LG_" & Firma & "_BNCARD AS BNK1 ON BNK1.LOGICALREF = BNC1.BANKREF WHERE (ISNULL(CSC.AMOUNT, 0) <> 0)  AND  csc.doc=1 and csc.duedate>= '01.01.2015'  and CSc.CURRSTAT IN (1,2,4) and cst.statno=1  order by CSc.dueDATE"

Çevrimdışı ByBirol®

  • Logo Sistem Administrator
  • Logo Uzmanı
  • *****
  • Karma: 18
  • admin@artibilisim.com Logo Çözüm Ortağı
Ynt: Çek senet durumu
« Yanıtla #29 : 04.03.2015, 23:37 »
Seninki ile bunu karşılaştır garip gelen ifadeleri çıkar, ipucu seninki direk sql sorgusu bu ise sql sorgusunun excel ortamına adapte edilmiş vba hali .