Açılış miktarı Ocak ayından ayrı yazıldı

This commit is contained in:
Uğur Özpınar 2018-03-29 10:50:41 +03:00 committed by GitHub
parent 2080babf6f
commit a8fb3f2e4b
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -9,6 +9,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,
@ -24,7 +25,7 @@ create table #tempresults
[ACCOUNTNAME] [varchar](200) NULL
)
-- Tahsilatlar Temp Tablo Baþlangýç
-- Tahsilatlar Temp Tablo Baþlangýç
create table #tempcredits
(
[CREDIT] [float] NULL,
@ -33,10 +34,10 @@ create table #tempcredits
)
Insert Into #tempcredits
select SUM(CREDIT) as CREDIT,ACCOUNTCODE,SUM(CREDIT) as REMAINING
from LG_141_01_EMFLINE
from LG_060_01_EMFLINE
WHERE CANCELLED<>1 AND [SIGN]=1 --AND ACCOUNTCODE='120.01.G01'
GROUP BY ACCOUNTCODE
-- Tahsilatlar Temp Tablo Bitiþ
-- Tahsilatlar Temp Tablo Bitiþ
DECLARE @_sign smallint;
@ -47,6 +48,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;
@ -54,15 +56,15 @@ 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 '120.%'
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;
@ -75,7 +77,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
@ -83,26 +85,26 @@ BEGIN
BEGIN
--PRINT @_remaining-@_debit
UPDATE #tempcredits SET REMAINING=REMAINING-@_debit 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-@_debit<0 AND @_sign=0 AND @_remaining<>0
BEGIN
UPDATE #tempcredits SET REMAINING=0 WHERE ACCOUNTCODE=@_accountcode
SET @_splitted=1
INSERT INTO #tempresults VALUES(@_recid,@_sign,@_remaining,@_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,@_remaining,@_credit,@_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-@_remaining,@_credit,@_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-@_remaining,@_credit,@_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<>1
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=1 --credit iþlemi. deðiþtirmeden geç
IF @_sign=1 --credit 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
@ -111,7 +113,8 @@ BEGIN
BEGIN
UPDATE #tempresults
SET
OCAK = CASE WHEN @_month=1 THEN @_debit-@_remaining ELSE 0 END,
ACILIS = CASE WHEN @_trcode=1 THEN @_debit-@_remaining ELSE 0 END,
OCAK = CASE WHEN @_month=1 AND @_trcode<>1 THEN @_debit-@_remaining ELSE 0 END,
SUBAT = CASE WHEN @_month=2 THEN @_debit-@_remaining ELSE 0 END,
MART = CASE WHEN @_month=3 THEN @_debit-@_remaining ELSE 0 END,
NISAN = CASE WHEN @_month=4 THEN @_debit-@_remaining ELSE 0 END,
@ -126,18 +129,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
@ -150,7 +154,7 @@ SELECT ACCOUNTCODE,ACCOUNTNAME
,SUM(EKIM) as Ekim
,SUM(KASIM) as Kasim
,SUM(ARALIK) as Aralik
,((SUM(DEBIT)-SUM(CREDIT))-SUM(OCAK)-SUM(SUBAT)-SUM(MART)-SUM(NISAN)-SUM(MAYIS)-SUM(HAZIRAN)-SUM(TEMMUZ)-SUM(AGUSTOS)
,((SUM(DEBIT)-SUM(CREDIT))-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
@ -182,4 +186,4 @@ End
If(OBJECT_ID('tempdb..#tempresults') Is Not Null)
Begin
Drop Table #tempresults
End
End