191 ve 391 tarih aralikli veri çekme

Merhaba,

SQL üzerinden tarih aralı belirterek (01/07/2017-31/07/2017) aşağıdaki rakamları çekmek istiyorum.

Nasıl bir kod yazmalı teşekkürler.

Devir Kdv

İndirilecek KDV

Hesaplanan KDV

Ödenecek KDV

Devir KDV

çalıştırdığımda yapamadım.

görmek istediğim

Bir önceki ayın kdv devri / tarih aralığının indiirlecek kdv ve hesaplanan kdv si sonuca göre devir yada çıkacak kdv miktarını görmek istiyorum.

tşk.

Devir Kdv

İndirilecek KDV

Hesaplanan KDV

Ödenecek KDV

Devir KDV

konuyla ilgili fikri olan varmı?

teşekkürler.

bir kaç sorguyu UNION ile birleştirmelisiniz.

Devir KDV iligli tarih aralığında olmaz. vs..

Netsisden vazgeçemiyorum. Beni engelliyor..

SQL den dönen sorgu nerede kullanılacak, daha farklı veya mantıklı çözümler gelebilir.

Netsisden vazgeçemiyorum. Beni engelliyor..

Excele ne ile çekeceksiniz VBA, Extend, dış veri al??

Netsisden vazgeçemiyorum. Beni engelliyor..

VBA ile çekecekseniz Hesap kodları sabit, Ay kodunu SQL e excel hücrelerinden birinden parametre ile gönderin, veya nasıl bir taslak oluşturdunuz paylaşın, onun üstünden gidelim, SQL cümleleri basit.

Netsisden vazgeçemiyorum. Beni engelliyor..

ben aşağıdaki View'ı oluşturup dış veri ile Özet Tablo yapıyorum

Özet Tablo için AY Filtre'ye, FT satırlara, BA sütunlara, MATRAH,KDV ve TUTAR değerler'e konuyor.

CREATE VIEW [dbo].[MY_KDV] AS

--ALIS/SATIS FT.IADE ALIS/IADE SATIS FT

SELECT CONVERT(VARCHAR(5),TARIH,2) AY,CASE WHEN TIPI <> 4 THEN

CASE FTIRSIP

WHEN '1' THEN CASE WHEN C.STOK_KODU NOT LIKE 'HIZ%' THEN 'SFT' ELSE 'SF2' END

WHEN '2' THEN CASE WHEN C.STOK_KODU NOT LIKE 'HIZ%' THEN 'AFT' ELSE 'AF2' END

WHEN '3' THEN 'SIR'

WHEN '4' THEN 'AIR'

ELSE FTIRSIP END

ELSE CASE FTIRSIP

WHEN '1' THEN 'A-FT'

WHEN '2' THEN 'S-FT'

WHEN '3' THEN 'A-IR'

WHEN '4' THEN 'S-IR'

ELSE FTIRSIP END

END FT,

CASE WHEN FTIRSIP LIKE '[24]' THEN 'B' ELSE 'A' END BA,

--(GENELTOPLAM - KDV) MATRAH,KDV,CASE WHEN FTIRSIP LIKE '[24]' THEN KDV ELSE -KDV END KDV1,GENELTOPLAM TUTAR,

SUM(ROUND(ABS(STHAR_NF) * (CASE WHEN STHAR_GCMIK=0 THEN 1 ELSE STHAR_GCMIK END),2)) MATRAH,

SUM(ROUND(ABS(STHAR_NF) * STHAR_KDV/100 * (CASE WHEN STHAR_GCMIK=0 THEN 1 ELSE STHAR_GCMIK END),2)) KDV,

CASE WHEN FTIRSIP LIKE '[24]' THEN SUM(ROUND(ABS(STHAR_NF) * STHAR_KDV/100 * (CASE WHEN STHAR_GCMIK=0 THEN 1 ELSE STHAR_GCMIK END),2))

ELSE SUM(-1 * ROUND(ABS(STHAR_NF) * STHAR_KDV/100 * (CASE WHEN STHAR_GCMIK=0 THEN 1 ELSE STHAR_GCMIK END),2)) END KDV1,

SUM(ROUND(ABS(STHAR_NF) * (1+STHAR_KDV/100) * (CASE WHEN STHAR_GCMIK=0 THEN 1 ELSE STHAR_GCMIK END),2)) TUTAR,

TARIH,FATIRS_NO,CARI_ISIM

FROM TBLFATUIRS A

JOIN TBLCASABIT B ON A.CARI_KODU=B.CARI_KOD

JOIN TBLSTHAR C ON A.FTIRSIP=C.STHAR_FTIRSIP AND A.FATIRS_NO=C.FISNO AND A.CARI_KODU=C.STHAR_ACIKLAMA

WHERE FTIRSIP LIKE '[1-4]' AND /*KDV > 0 and*/ ISNULL(A.ACIKLAMA,'') <> '-KDV' AND C.STHAR_HTUR<>'N'

GROUP BY A.FTIRSIP,CONVERT(VARCHAR(5),TARIH,2),CASE WHEN TIPI <> 4 THEN

CASE FTIRSIP

WHEN '1' THEN CASE WHEN C.STOK_KODU NOT LIKE 'HIZ%' THEN 'SFT' ELSE 'SF2' END

WHEN '2' THEN CASE WHEN C.STOK_KODU NOT LIKE 'HIZ%' THEN 'AFT' ELSE 'AF2' END

WHEN '3' THEN 'SIR'

WHEN '4' THEN 'AIR'

ELSE FTIRSIP END

ELSE CASE FTIRSIP

WHEN '1' THEN 'A-FT'

WHEN '2' THEN 'S-FT'

WHEN '3' THEN 'A-IR'

WHEN '4' THEN 'S-IR'

ELSE FTIRSIP END

END,

CASE WHEN FTIRSIP LIKE '[24]' THEN 'B' ELSE 'A' END,TARIH,FATIRS_NO,CARI_ISIM

--ALISTA FAT_ALTM1 <> 0 OLANLAR

UNION ALL

SELECT CONVERT(VARCHAR(5),TARIH,2) AY,CASE WHEN TIPI <> 4 THEN

CASE FTIRSIP

WHEN 1 THEN 'SFT'

WHEN 2 THEN 'AFT'

WHEN 3 THEN 'SIR'

WHEN 4 THEN 'AIR'

ELSE '' END

ELSE CASE FTIRSIP

WHEN 1 THEN 'A-FT'

WHEN 2 THEN 'S-FT'

WHEN 3 THEN 'A-IR'

WHEN 4 THEN 'S-IR'

ELSE '' END

END FT,

CASE WHEN FTIRSIP LIKE '[24]' THEN 'B' ELSE 'A' END BA,

--(GENELTOPLAM - KDV) MATRAH,KDV,CASE WHEN FTIRSIP LIKE '[24]' THEN KDV ELSE -KDV END KDV1,GENELTOPLAM TUTAR,

FAT_ALTM1 MATRAH, ROUND(FAT_ALTM1*0.18,2) KDV, CASE WHEN FTIRSIP LIKE '[24]' THEN ROUND(FAT_ALTM1*0.18,2) ELSE -ROUND(FAT_ALTM1*0.18,2) END KDV1, FAT_ALTM1 + ROUND(FAT_ALTM1*0.18,2) TUTAR,

TARIH,FATIRS_NO,CARI_ISIM

FROM TBLFATUIRS A

JOIN TBLCASABIT B ON A.CARI_KODU=B.CARI_KOD

WHERE FTIRSIP='2' AND KDV > 0 and ISNULL(A.ACIKLAMA,'') <> '-KDV' AND FAT_ALTM1 <> 0

--DEKONTLAR

UNION ALL

SELECT CONVERT(VARCHAR(5),TARIH,2),'MAS','B',

CASE WHEN YEDEK3 > 0 THEN TUTAR ELSE ROUND(TUTAR/(KDV_ORAN)*100,2) END, --MATRAH

CASE WHEN YEDEK3 > 0 THEN YEDEK3 ELSE TUTAR END, CASE WHEN YEDEK3 > 0 THEN YEDEK3 ELSE TUTAR END, --KDV

(CASE WHEN YEDEK3 > 0 THEN TUTAR ELSE ROUND(TUTAR/(KDV_ORAN)*100,2) END) + (CASE WHEN YEDEK3 > 0 THEN YEDEK3 ELSE TUTAR END),

--TUTAR,YEDEK3,YEDEK3,TUTAR + YEDEK3,

TARIH,FISNO,SERI_NO+'-'+CONVERT(VARCHAR(10),DEKONT_NO) + ' '+ COALESCE(SUBSTRING(ACIKLAMA2,5,50),SUBSTRING(ACIKLAMA1,LEN(SERI_NO+'/'+CAST(DEKONT_NO AS VARCHAR))+2,50))

FROM TBLDEKOTRA

WHERE KDV_ORAN > 0 and B_A='B' AND SERI_NO<>'FT' AND ISNULL(GENEL_KDV,'')<>'G'

UNION ALL

SELECT CONVERT(VARCHAR(5),TARIH,2),'MAS','B',

CASE WHEN YEDEK3 > 0 THEN TUTAR ELSE ROUND(TUTAR/(KDV_ORAN)*100,2) END, --MATRAH

CASE WHEN YEDEK3 > 0 THEN YEDEK3 ELSE TUTAR END, CASE WHEN YEDEK3 > 0 THEN YEDEK3 ELSE TUTAR END, --KDV

(CASE WHEN YEDEK3 > 0 THEN TUTAR ELSE ROUND(TUTAR/(KDV_ORAN)*100,2) END) + (CASE WHEN YEDEK3 > 0 THEN YEDEK3 ELSE TUTAR END),

--TUTAR,YEDEK3,YEDEK3,TUTAR + YEDEK3,

TARIH,FISNO, SERI_NO+'-'+CONVERT(VARCHAR(10),DEKONT_NO)+' '+COALESCE(SUBSTRING(ACIKLAMA2,5,50),SUBSTRING(ACIKLAMA1,LEN(SERI_NO+'/'+CAST(DEKONT_NO AS VARCHAR))+2,50))

FROM TBLDEKOTRA

WHERE KDV_ORAN > 0 and B_A='B' AND SERI_NO='FT' AND GENEL_KDV='K'

--KASA

UNION ALL

SELECT CONVERT(VARCHAR(5),TARIH,2),'MAS',CASE WHEN IO='C' THEN 'B' ELSE 'A' END,

ROUND(YEDEK5/(KDV_ORAN)*100,2),YEDEK5,CASE WHEN IO='C' THEN YEDEK5 ELSE -YEDEK5 END,

ROUND(YEDEK5/(KDV_ORAN)*100,2)+YEDEK5,TARIH,FISNO,

'KS'+RIGHT(KSMAS_KOD,1)+'-'+FISNO +' '+ SUBSTRING(ACIKLAMA,PATINDEX('%/%',ACIKLAMA)+1,100)

FROM TBLKASA

WHERE YEDEK5>0

--MY_KDV ORDER BY AY,FT,BA DESC,FATIRS_NO,CARI_ISIM

GO

devir için bu view'ı sorguda kullanan başka bir dış veri al sayfası hazırlıyorum

;WITH CTE_T AS (

SELECT AY,SUM(CASE WHEN BA='A' THEN KDV ELSE -KDV END) TOPLAM

FROM MY_KDV

WHERE FT NOT LIKE '_IR'

GROUP BY AY

)

SELECT CONVERT(VARCHAR(5),CONVERT(NUMERIC(6,2),AY)+0.01) AY,TOPLAM

FROM CTE_T

-- Yorumlanan sorgu Muhasebe'den devir rakamını alır

--UNION ALL

--SELECT (SELECT RIGHT(SIRKETYILI,2) FROM NETSIS..SIRKETLER30 WHERE SIRKET=DB_NAME())+'.01' AS AY,BOAY_TUT1 AS TOPLAM

--from TBLMUPLANSUBE WHERE HESAP_KODU='190-01-001' AND SUBE_KODU=0

-- Manuel Devir girişi

UNION ALL

SELECT '17.01',0.0 --bu sayı geçen yıldan alacak devreden KDV'yi manuel yazdığım yer (-) negatif olarak

ORDER BY AY

Özet tablo sayfasında

Devreden . Formülü Devirler sayfasından düşeyara fonksiyonu yardımı ile Filtrelenen AY değeri ile

Aylık . Formülü =GETPIVOTDATA("Toplam KDV";$A$5;"BA";"A")-GETPIVOTDATA("Toplam KDV";$A$5;"BA";"B") (ingilizce office kulladığımdan türkçe fonksiyonunu bilmiyorum)

Sonuç (Devir/Ödenecek) . Formülü Devreden + Aylık

Bu kadar ....

yazdıklarım özetle, bir view yaratmak.

bu view ile özet tablo yapmak.

yeni bir sayfada; view'dan yararlanıp, dışveri al ile tablo oluştur. (aylık devir rakamlarını hesaplamak için.) bu Tabloda yürüyen toplam ile devir rakamlarını hesaplarsınız.

bu sütundaki veriyi düşeyara ile Özettablo sayfasında gösterdim.

Düzenleyen mbaykan - 09 Ağustos 2017 Saat 22:48

Mehmet Baykan

create ile başlayan, go ile biten

kısmı ben test ettim. SORUNSUZ çalıştı.

siz hata aldığınız satırlar KDV_ORAN isimli sütunu işaret ediyor. Bu şirket'te DBUPDATE yapın (TBLDEKOTRA tablosunda KDV_ORAN isimli kolon olmalı)

Düzenleyen mbaykan - 08 Ağustos 2017 Saat 22:05

Mehmet Baykan

biraz saygı,

Google da dışveri al ve özet tablo için küçük bir araştırma yap, dosyaya mosyaya gerek kalmaz

Armut'u pişirdim ama ağzına düşmeyecek.. Tongue

bekleme

Mehmet Baykan