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, [ACCOUNTCODE] [varchar](101) NULL,
[INVOICENO] [varchar](17) NULL, [INVOICENO] [varchar](17) NULL,
[CLOSED] [smallint] NULL, [CLOSED] [smallint] NULL,
[ACILIS] [float] NULL,
[OCAK] [float] NULL, [OCAK] [float] NULL,
[SUBAT] [float] NULL, [SUBAT] [float] NULL,
[MART] [float] NULL, [MART] [float] NULL,
@ -24,7 +25,7 @@ create table #tempresults
[ACCOUNTNAME] [varchar](200) NULL [ACCOUNTNAME] [varchar](200) NULL
) )
-- Tahsilatlar Temp Tablo Baþlangýç -- Tahsilatlar Temp Tablo Baþlangýç
create table #tempcredits create table #tempcredits
( (
[CREDIT] [float] NULL, [CREDIT] [float] NULL,
@ -33,10 +34,10 @@ create table #tempcredits
) )
Insert Into #tempcredits Insert Into #tempcredits
select SUM(CREDIT) as CREDIT,ACCOUNTCODE,SUM(CREDIT) as REMAINING 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' WHERE CANCELLED<>1 AND [SIGN]=1 --AND ACCOUNTCODE='120.01.G01'
GROUP BY ACCOUNTCODE GROUP BY ACCOUNTCODE
-- Tahsilatlar Temp Tablo Bitiþ -- Tahsilatlar Temp Tablo Bitiþ
DECLARE @_sign smallint; DECLARE @_sign smallint;
@ -47,6 +48,7 @@ DECLARE @_lineexp varchar(251);
DECLARE @_accountcode varchar(101); DECLARE @_accountcode varchar(101);
DECLARE @_invoiceno varchar(17); DECLARE @_invoiceno varchar(17);
DECLARE @_month smallint; DECLARE @_month smallint;
DECLARE @_trcode smallint;
DECLARE @_recid int; DECLARE @_recid int;
DECLARE @_accountname varchar(200); DECLARE @_accountname varchar(200);
SET @_recid=0; SET @_recid=0;
@ -54,15 +56,15 @@ SET @_recid=0;
DECLARE MY_CURSOR CURSOR DECLARE MY_CURSOR CURSOR
LOCAL STATIC READ_ONLY FORWARD_ONLY LOCAL STATIC READ_ONLY FORWARD_ONLY
FOR FOR
select [SIGN],DEBIT,CREDIT,DATE_ ,LINEEXP,ACCOUNTCODE,INVOICENO,MONTH_,ca.DEFINITION_ select [SIGN],DEBIT,CREDIT,DATE_ ,LINEEXP,ACCOUNTCODE,INVOICENO,MONTH_,ca.DEFINITION_,el.TRCODE
from LG_141_01_EMFLINE el from LG_060_01_EMFLINE el
left join LG_141_EMUHACC ca ON ca.LOGICALREF=el.ACCOUNTREF left join LG_060_EMUHACC ca ON ca.LOGICALREF=el.ACCOUNTREF
WHERE el.CANCELLED<>1 WHERE el.CANCELLED<>1
AND el.ACCOUNTCODE LIKE '120.%' AND el.ACCOUNTCODE LIKE '120.%'
ORDER BY DATE_ ASC ORDER BY DATE_ ASC
OPEN MY_CURSOR 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 WHILE @@FETCH_STATUS = 0
BEGIN BEGIN
SET @_recid = @_recid + 1; SET @_recid = @_recid + 1;
@ -75,7 +77,7 @@ BEGIN
SET @_splitted=0 SET @_splitted=0
IF @_remaining=0 OR @_remaining IS NULL 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 ELSE
BEGIN BEGIN
@ -83,26 +85,26 @@ BEGIN
BEGIN BEGIN
--PRINT @_remaining-@_debit --PRINT @_remaining-@_debit
UPDATE #tempcredits SET REMAINING=REMAINING-@_debit WHERE ACCOUNTCODE=@_accountcode 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 END
IF @_remaining-@_debit<0 AND @_sign=0 AND @_remaining<>0 IF @_remaining-@_debit<0 AND @_sign=0 AND @_remaining<>0
BEGIN BEGIN
UPDATE #tempcredits SET REMAINING=0 WHERE ACCOUNTCODE=@_accountcode UPDATE #tempcredits SET REMAINING=0 WHERE ACCOUNTCODE=@_accountcode
SET @_splitted=1 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; 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 END
IF @_remaining=0 AND @_sign<>1 IF @_remaining=0 AND @_sign<>1
BEGIN 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 END
IF @_sign=1 --credit iþlemi. deðiþtirmeden geç IF @_sign=1 --credit iþlemi. deðiþtirmeden geç
BEGIN 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
END END
@ -111,7 +113,8 @@ BEGIN
BEGIN BEGIN
UPDATE #tempresults UPDATE #tempresults
SET 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, SUBAT = CASE WHEN @_month=2 THEN @_debit-@_remaining ELSE 0 END,
MART = CASE WHEN @_month=3 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, NISAN = CASE WHEN @_month=4 THEN @_debit-@_remaining ELSE 0 END,
@ -126,18 +129,19 @@ BEGIN
WHERE RECID=@_recid WHERE RECID=@_recid
END 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 END
CLOSE MY_CURSOR CLOSE MY_CURSOR
DEALLOCATE MY_CURSOR DEALLOCATE MY_CURSOR
-- ÖZET -- ÖZET
SELECT ACCOUNTCODE,ACCOUNTNAME SELECT ACCOUNTCODE,ACCOUNTNAME
,SUM(DEBIT) AS BORÇ ,SUM(DEBIT) AS BORÇ
,SUM(CREDIT) AS ALACAK ,SUM(CREDIT) AS ALACAK
,SUM(DEBIT)-SUM(CREDIT) AS BAKIYE ,SUM(DEBIT)-SUM(CREDIT) AS BAKIYE
,SUM(ACILIS) as Acilis
,SUM(OCAK) as Ocak ,SUM(OCAK) as Ocak
,SUM(SUBAT) as Subat ,SUM(SUBAT) as Subat
,SUM(MART) as Mart ,SUM(MART) as Mart
@ -150,7 +154,7 @@ SELECT ACCOUNTCODE,ACCOUNTNAME
,SUM(EKIM) as Ekim ,SUM(EKIM) as Ekim
,SUM(KASIM) as Kasim ,SUM(KASIM) as Kasim
,SUM(ARALIK) as Aralik ,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 -SUM(EYLUL)-SUM(EKIM)-SUM(KASIM)-SUM(ARALIK)) AS SAGLAMA
from #tempresults from #tempresults
GROUP BY ACCOUNTCODE,ACCOUNTNAME GROUP BY ACCOUNTCODE,ACCOUNTNAME