Kaynak: KB-v1
08_SupportPlaybooks/Processes/PROC-133.md←Surecler/*.doc(destek süreç dokümanı; parola/IP/terminal maskelenmiş). Gerçeklik: DOCUMENTED — kodla doğrulanmış değil.
ERP Fatura Kontrol Raporu (QUERY)
Kimlik: PROC-133 · Ürün: SQL Server · Kategori: Veritabanı bakımı (SQL) · Katalog: ERP Fatura Kontrol Raporu (QUERY)
Kaynak: AifaSoft destek süreç dokümanı (Word). Şifre, kullanıcı adı, terminal no ve IP bilgileri kaynak aşamasında maskelenmiştir; görseller resimli süreç kitabındadır.
FATURA KONTROL RAPORU
FATURA KONTROL RAPORU - QUERY
------------------------------------------------------------------------------------------------------------------------
USE [ERPGOLDV2]
GO
/****** Object: UserDefinedFunction [Reports].[ResmiIslemRaporu] Script Date: 22.10.2021 18:12:17 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER Function [Reports].[ResmiIslemRaporu] (@SubeId int,@HesapId int,@BasTarih as Date,@SonTarih as Date)
returns Table
as
return
Select
I.Id,
I.Tarih,
IsNull(D.FaturaUnvan,H.HesapAdi) as HesapAdi,
Sistem.GetIslemKodu (I.IslemKodu,I.IslemTuru,I.IslemTipi ) as Islem,
IslemTipi ,Case When I.Yon='+' Then 'A' Else 'S' End as Yon ,
Left(I.Kodu,3) as Kodu,
I.Adet,
I.Miktar,
AuMilyem as Milyem,
I.Miktar * AuMilyem as Has,
I.Fiyat,
Case When I.FiyatTipi =0 Then 'A' When I.FiyatTipi=1 Then 'M' When I.FiyatTipi=2 Then 'O' When I.FiyatTipi=3 Then 'H' End as F,
I.Tutar as NetTutar,
I.Birim,
AgMilyem,
D.SiraNo,
[FN].[GetIstatistikKodu] (H.HesapTuru , I.IslemKodu ,I.IslemTuru ,I.IslemTipi ,0 ) as Istatistik,
Miktar * AgMilyem as AgHas,
I.Vade ,
I.Aciklama,
I.InsertDate as Kayıt,
S.Kodu as Sube,
K.Kodu as Kasa,
Isnull(D.FaturaVergiDairesi, Case When H.VergiNo \<>'' Then H.VergiDairesi When TCNo \<>'' Then '' When PassaportNo \<>'' Then '' End) as VergiDairesi,
IsNull(D.FaturaVergiNo ,Case When H.VergiNo <>'' Then H.VergiNo When TCNo <>'' Then H.TCNo When PassaportNo <>'' Then H.PassaportNo End) as VergiNo,
Case When D.KimlikTipi = 0 Then D.KimlikNo When D.KimlikTipi = 1 Then D.KimlikNo end as 'TCNo',
U.UserName as Kullanıcı,
D.RefNo, IsNull(D.FaturaSeri ,'') + '-' + convert(nvarchar(max), D.FaturaNo) as FaturaNo,
D.FaturaNo as FNo,
Case When (H.HesapTuru in (0,3) and Isnull(H.Kategori,'')='') and I.Yon='-' and IslemKodu<>2 Then (Sistem.BsmvHesapla(I.Tarih ,I.TLTutar)*-1)+I.Tutar Else I.Tutar end as BSMVsiz,
Case When (H.HesapTuru in (0,3) and Isnull(H.Kategori,'')='') and I.Yon='-' and IslemKodu<>2 Then Sistem.BsmvHesapla(I.Tarih ,I.TLTutar ) Else 0 end as BSMV,
I.TLTutar,
I.UsdTutar
from Cari.IslemDetaylari D
Left Join Cari.Islemler I on D.IslemId =I.Id
Left Join Cari.Hesaplar H on H.Id =I.HesapId
Left Join Sistem.Users U on U.Id =I.UserId
Left Join Sistem.Subeler S on S.Id =I.SubeId
Left Join Sistem.Kasalar K on K.Id =I.KasaId
Where (I.SubeId =@SubeId And I.IsDeleted ='False') and
(I.Tarih>=@BasTarih And I.Tarih<=@SonTarih) and
I.SubeId=@SubeId And
(I.HesapId=@HesapId or @HesapId=0) And
(D.FaturaNo >0 or I.IslemTipi =12)
GO
Kaynaklar
- SRC-PROC-DOC — süreç dokümanı #133