From 2080babf6f0685636b66a08c82dcbcffe0404ccc Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?U=C4=9Fur=20=C3=96zp=C4=B1nar?= Date: Thu, 29 Mar 2018 10:39:13 +0300 Subject: [PATCH] Update Borclar_Yaslandirma.sql MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Ocak ayı dışında Açılış ayı eklendi --- Borc Yaslandirma/Borclar_Yaslandirma.sql | 44 +++++++++++++----------- 1 file changed, 24 insertions(+), 20 deletions(-) diff --git a/Borc Yaslandirma/Borclar_Yaslandirma.sql b/Borc Yaslandirma/Borclar_Yaslandirma.sql index 7b3c34f..6ffd413 100644 --- a/Borc Yaslandirma/Borclar_Yaslandirma.sql +++ b/Borc Yaslandirma/Borclar_Yaslandirma.sql @@ -10,6 +10,7 @@ create table #tempresults [ACCOUNTCODE] [varchar](101) NULL, [INVOICENO] [varchar](17) NULL, [CLOSED] [smallint] NULL, + [ACILIS] [float] NULL, [OCAK] [float] NULL, [SUBAT] [float] NULL, [MART] [float] NULL, @@ -25,7 +26,7 @@ create table #tempresults [ACCOUNTNAME] [varchar](200) NULL ) --- Tahsilatlar Temp Tablo Baþlangýç +-- Tahsilatlar Temp Tablo Ba�lang�� create table #tempdebits ( [DEBIT] [float] NULL, @@ -34,10 +35,10 @@ create table #tempdebits ) Insert Into #tempdebits select SUM(DEBIT) as DEBIT,ACCOUNTCODE,SUM(DEBIT) as REMAINING -from LG_141_01_EMFLINE +from LG_060_01_EMFLINE WHERE CANCELLED<>1 AND [SIGN]=0 --AND ACCOUNTCODE='120.01.G01' GROUP BY ACCOUNTCODE --- Tahsilatlar Temp Tablo Bitiþ +-- Tahsilatlar Temp Tablo Biti� DECLARE @_sign smallint; @@ -48,6 +49,7 @@ DECLARE @_lineexp varchar(251); DECLARE @_accountcode varchar(101); DECLARE @_invoiceno varchar(17); DECLARE @_month smallint; +DECLARE @_trcode smallint; DECLARE @_recid int; DECLARE @_accountname varchar(200); SET @_recid=0; @@ -55,9 +57,9 @@ SET @_recid=0; DECLARE MY_CURSOR CURSOR LOCAL STATIC READ_ONLY FORWARD_ONLY FOR -select [SIGN],DEBIT,CREDIT,DATE_ ,LINEEXP,ACCOUNTCODE,INVOICENO,MONTH_,ca.DEFINITION_ -from LG_141_01_EMFLINE el -left join LG_141_EMUHACC ca ON ca.LOGICALREF=el.ACCOUNTREF +select [SIGN],DEBIT,CREDIT,DATE_ ,LINEEXP,ACCOUNTCODE,INVOICENO,MONTH_,ca.DEFINITION_,el.TRCODE +from LG_060_01_EMFLINE el +left join LG_060_EMUHACC ca ON ca.LOGICALREF=el.ACCOUNTREF WHERE el.CANCELLED<>1 AND el.ACCOUNTCODE LIKE '32%' --AND ACCOUNTCODE='320.01.I09' @@ -66,7 +68,7 @@ AND el.ACCOUNTCODE LIKE '32%' ORDER BY DATE_ ASC OPEN MY_CURSOR -FETCH NEXT FROM MY_CURSOR INTO @_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,@_month,@_accountname +FETCH NEXT FROM MY_CURSOR INTO @_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,@_month,@_accountname,@_trcode WHILE @@FETCH_STATUS = 0 BEGIN SET @_recid = @_recid + 1; @@ -79,7 +81,7 @@ BEGIN SET @_splitted=0 IF @_remaining=0 OR @_remaining IS NULL - INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,0,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) + INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,0,0,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) ELSE BEGIN @@ -87,26 +89,26 @@ BEGIN BEGIN --PRINT @_remaining-@_debit UPDATE #tempdebits SET REMAINING=REMAINING-@_credit WHERE ACCOUNTCODE=@_accountcode - INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,1,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) + INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,1,0,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) END IF @_remaining-@_credit<0 AND @_sign=1 AND @_remaining<>0 BEGIN UPDATE #tempdebits SET REMAINING=0 WHERE ACCOUNTCODE=@_accountcode SET @_splitted=1 - INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_remaining,@_date,@_lineexp,@_accountcode,@_invoiceno,1,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) + INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_remaining,@_date,@_lineexp,@_accountcode,@_invoiceno,1,0,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) SET @_recid = @_recid+1; - INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_credit-@_remaining,@_date,'PARÇALANDI : '+@_lineexp,@_accountcode,@_invoiceno,0,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) + INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_credit-@_remaining,@_date,'PAR�ALANDI : '+@_lineexp,@_accountcode,@_invoiceno,0,0,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) END IF @_remaining=0 AND @_sign<>0 BEGIN - INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,0,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) + INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,0,0,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) END - IF @_sign=0 --debit iþlemi. deðiþtirmeden geç + IF @_sign=0 --debit i�lemi. de�i�tirmeden ge� BEGIN - INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,1,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) + INSERT INTO #tempresults VALUES(@_recid,@_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,1,0,0,0,0,0,0,0,0,0,0,0,0,0,@_accountname) END END @@ -115,7 +117,8 @@ BEGIN BEGIN UPDATE #tempresults SET - OCAK = CASE WHEN @_month=1 THEN @_credit-@_remaining ELSE 0 END, + ACILIS = CASE WHEN @_trcode=1 THEN @_credit-@_remaining ELSE 0 END, + OCAK = CASE WHEN @_month=1 and @_trcode<>1 THEN @_credit-@_remaining ELSE 0 END, SUBAT = CASE WHEN @_month=2 THEN @_credit-@_remaining ELSE 0 END, MART = CASE WHEN @_month=3 THEN @_credit-@_remaining ELSE 0 END, NISAN = CASE WHEN @_month=4 THEN @_credit-@_remaining ELSE 0 END, @@ -130,18 +133,19 @@ BEGIN WHERE RECID=@_recid END - FETCH NEXT FROM MY_CURSOR INTO @_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,@_month,@_accountname + FETCH NEXT FROM MY_CURSOR INTO @_sign,@_debit,@_credit,@_date,@_lineexp,@_accountcode,@_invoiceno,@_month,@_accountname,@_trcode END CLOSE MY_CURSOR DEALLOCATE MY_CURSOR --- ÖZET +-- �ZET SELECT ACCOUNTCODE,ACCOUNTNAME -,SUM(DEBIT) AS BORÇ +,SUM(DEBIT) AS BORÇ ,SUM(CREDIT) AS ALACAK ,SUM(DEBIT)-SUM(CREDIT) AS BAKIYE +,SUM(ACILIS) as Acilis ,SUM(OCAK) as Ocak ,SUM(SUBAT) as Subat ,SUM(MART) as Mart @@ -154,7 +158,7 @@ SELECT ACCOUNTCODE,ACCOUNTNAME ,SUM(EKIM) as Ekim ,SUM(KASIM) as Kasim ,SUM(ARALIK) as Aralik -,((SUM(CREDIT)-SUM(DEBIT))-SUM(OCAK)-SUM(SUBAT)-SUM(MART)-SUM(NISAN)-SUM(MAYIS)-SUM(HAZIRAN)-SUM(TEMMUZ)-SUM(AGUSTOS) +,((SUM(CREDIT)-SUM(DEBIT))-SUM(ACILIS)-SUM(OCAK)-SUM(SUBAT)-SUM(MART)-SUM(NISAN)-SUM(MAYIS)-SUM(HAZIRAN)-SUM(TEMMUZ)-SUM(AGUSTOS) -SUM(EYLUL)-SUM(EKIM)-SUM(KASIM)-SUM(ARALIK)) AS SAGLAMA from #tempresults GROUP BY ACCOUNTCODE,ACCOUNTNAME @@ -184,4 +188,4 @@ End If(OBJECT_ID('tempdb..#tempresults') Is Not Null) Begin Drop Table #tempresults -End \ No newline at end of file +End