BA ve BS formlari raporu

çözüm ortagimizdan aldigimiz son dakika haberi :)

 

fusion std @6 4.0.10 versiyonunda  bsba formlari için yeni bir degisiklik yapilmis. 

 

 beyanres.dll ve MUHASEBE.DLL yi güncelleyince genel dekont kaydindan girilen faturalarida aliyor. gibi gibi tam inceleyemedim ama sizde farkli hareketleri deneyip sonuçlarini yazarsaniz emin oluruz insallah.

 

2007 yili Eylül ayina, 2008 ayliklar Kasim ayina uzatilabilir.

Asil istek, 2008 yine yillik verilsin,2009 üç aylik 2010 da ayliga geçilsin.

Bakalim ne olucak.

Sql Cümlesine bak, 15 tablo birlestirmisler belkide daha fazla saymadim. ,( T1.GENELTOPLAM - T1.KDV ) ile toplam yakalanmiyor.Tevkifat var. Bu isi askiya aldik ama bir kaç ay sonra yine basimiz agrimaya baslayacak.

 

SELECT  FTIRSIP,MAX( CARI_ISIM ) CARI_ISIM,MAX(ULKE_KODU) ULKE_KODU,BEYANULKEKODU,VERGI_NUMARASI,COUNT(*)SAYI,SUM(TUTAR) TUTAR, TCKIMLIKNO,CARI_KOD FROM (SELECT T1.FTIRSIP,T3.CARI_ISIM,T3.ULKE_KODU,T4.BEYANULKEKODU,CASE WHEN T3.ULKE_KODU = 'TR' OR  IsNull( T3.ULKE_KODU, '' ) =''  THEN T3.VERGI_NUMARASI ELSE CASE WHEN T1.FTIRSIP = '1' THEN '2222222222' ELSE '1111111111' END END VERGI_NUMARASI,( T1.GENELTOPLAM - T1.KDV ) TUTAR,T5.TCKIMLIKNO TCKIMLIKNO,T1.CARI_KODU CARI_KOD FROM TBLFATUIRS T1  JOIN TBLSUBELER T2 ON T1.SUBE_KODU = T2.SUBE_KODU JOIN CASABIT T3 ON T1.CARI_KODU = T3.CARI_KOD JOIN NETSIS..ULKESABIT T4 ON T3.ULKE_KODU = T4.ULKEKODU  JOIN CASABITEK T5 ON T5.CARI_KOD = T3.CARI_KOD  WHERE T3.CARI_KOD <> '000000000000000' AND (T1.FTIRSIP = '1' OR T1.FTIRSIP = '2' ) AND TARIH BETWEEN '06/01/2008' AND '06/30/2008' AND  IsNull( T1. FTIRSIP, '' ) <> 'Y' UNION ALL  SELECT '2', M3.CARI_ISIM, M3.ULKE_KODU, M4.BEYANULKEKODU, CASE WHEN M3.ULKE_KODU = 'TR' OR  IsNull( M3.ULKE_KODU, '' ) =''  THEN M3.VERGI_NUMARASI  ELSE'1111111111' END VERGI_NUMARASI,( M1.BRUTTUTAR-M1.FON-M1.STOPAJ-M1.BORSA-M1.AVANS-M1.MERA-M1.BAGKURNO ) TUTAR,M5.TCKIMLIKNO TCKIMLIKNO,M1.CARI_KODU CARI_KOD FROM TBLMUSTAHSI M1  JOIN TBLSUBELER M2 ON M1.SUBE_KODU = M2.SUBE_KODU JOIN CASABIT M3 ON M1.CARI_KODU = M3.CARI_KOD JOIN NETSIS..ULKESABIT M4 ON M3.ULKE_KODU = M4.ULKEKODU  JOIN CASABITEK M5 ON M5.CARI_KOD = M3.CARI_KOD  WHERE TARIH BETWEEN '06/01/2008' AND '06/30/2008' UNION ALL SELECT '2', T13.CARI_ISIM,T13.ULKE_KODU,T14.BEYANULKEKODU, CASE WHEN T13.ULKE_KODU = 'TR' OR  IsNull( T13.ULKE_KODU, '' ) =''  THEN T13.VERGI_NUMARASI   ELSE '1111111111' END VERGI_NUMARASI, SUM( T11.TUTAR - V1.TUTAR  ), T15.TCKIMLIKNO TCKIMLIKNO,T11.KOD CARI_KOD FROM DEKOTRA T11 JOIN TBLSUBELER T12 ON T11.SUBE_KODU = T12.SUBE_KODU JOIN CASABIT T13 ON T11.KOD = T13.CARI_KOD JOIN NETSIS..ULKESABIT T14 ON T13.ULKE_KODU = T14.ULKEKODU  JOIN CASABITEK T15 ON T15.CARI_KOD = T13.CARI_KOD  JOIN ( SELECT SUM(T21.TUTAR) TUTAR,T21.DEKONT_NO, T21.SERI_NO,T21.SUBE_KODU FROM DEKOTRA T21 JOIN TBLSUBELER T22 ON T21.SUBE_KODU = T22.SUBE_KODU  WHERE T21.SERI_NO IN ('FT','VR','FT','IT') AND T21.C_M <> 'C' AND ( T21.KOD LIKE '191%' OR T21.KOD LIKE '192%') AND T21.TARIH BETWEEN '06/01/2008' AND '06/30/2008' AND T21.YEDEK3 = 0  GROUP BY T21.SUBE_KODU, T21.DEKONT_NO,T21.SERI_NO ) V1 ON  ( T11.SUBE_KODU = V1.SUBE_KODU AND T11.SERI_NO = V1.SERI_NO AND T11.DEKONT_NO = V1.DEKONT_NO )  WHERE T11.SERI_NO IN ('FT','VR','FT','IT') AND ( T11.C_M = 'C' OR ( T11.SERI_NO='SM' AND T11.GENEL_KDV = 'S' ) ) AND T11.B_A='A' AND T11.TARIH BETWEEN '06/01/2008' AND '06/30/2008' AND T11.YEDEK3 = 0  GROUP BY T12.ISLETME_KODU, T11.DEKONT_NO ,VERGI_NUMARASI,T13.CARI_ISIM, T13.ULKE_KODU,T14.BEYANULKEKODU ,T15.TCKIMLIKNO,T11.KOD  UNION ALL  SELECT ( CASE WHEN IO='G' THEN '1' ELSE '2' END ),   C1.CARI_ISIM,C1.ULKE_KODU,U1.BEYANULKEKODU,   CASE WHEN C1.ULKE_KODU = 'TR' OR  IsNull( C1.ULKE_KODU,'') =''  THEN C1.VERGI_NUMARASI ELSE   CASE WHEN IO='G' THEN '2222222222' ELSE '1111111111' END END VERGI_NUMARASI,   ( TUTAR-K1.YEDEK5 ), C2.TCKIMLIKNO TCKIMLIKNO,K1.BFORMCARIKODU CARI_KOD   FROM TBLKASA K1   JOIN TBLSUBELER S1 ON S1.SUBE_KODU = K1.SUBE_KODU   JOIN CASABIT C1 ON C1.CARI_KOD = K1.BFORMCARIKODU   JOIN NETSIS..ULKESABIT U1 ON U1.ULKEKODU = C1.ULKE_KODU   JOIN CASABITEK C2 ON C2.CARI_KOD = C1.CARI_KOD   WHERE TIP='F' AND CARI_MUH<>'C' AND BFORMCARIKODU IS NOT NULL    AND TARIH BETWEEN '06/01/2008' AND '06/30/2008' UNION ALL  SELECT '2', D13.CARI_ISIM,D13.ULKE_KODU,D14.BEYANULKEKODU, CASE WHEN D13.ULKE_KODU = 'TR' OR  IsNull( D13.ULKE_KODU, '' ) =''  THEN D13.VERGI_NUMARASI   ELSE '1111111111' END VERGI_NUMARASI, SUM ( D11.TUTAR ), D15.TCKIMLIKNO TCKIMLIKNO,D11.KOD CARI_KOD FROM DEKOTRA D11 JOIN TBLSUBELER D12 ON D11.SUBE_KODU = D12.SUBE_KODU JOIN CASABIT D13 ON D11.KOD = D13.CARI_KOD JOIN NETSIS..ULKESABIT D14 ON D13.ULKE_KODU = D14.ULKEKODU  JOIN CASABITEK D15 ON D15.CARI_KOD = D13.CARI_KOD  WHERE D11.SERI_NO IN ('FT','VR','FT','IT') AND D11.C_M = 'C' AND D11.B_A='A' AND D11.TARIH BETWEEN '06/01/2008' AND '06/30/2008' AND D11.YEDEK3 <> 0  GROUP BY D12.ISLETME_KODU, D11.DEKONT_NO ,VERGI_NUMARASI,D13.CARI_ISIM, D13.ULKE_KODU,D14.BEYANULKEKODU ,D15.TCKIMLIKNO,D11.KOD ) V2 GROUP BY FTIRSIP,VERGI_NUMARASI,TCKIMLIKNO,(CASE WHEN ( ( ULKE_KODU <> 'TR') AND (  IsNull( ULKE_KODU, '' ) <> '' ) ) THEN CARI_ISIM END ),BEYANULKEKODU,CARI_KOD  HAVING SUM(TUTAR) >= 8000.0