Muhasebe.OzetIslemRaporu

Tip: INLINE TABLE FUNCTION · Şema: Muhasebe · Modül: MOD-FATURA · Temizlik sınıfı: ACTIVE (kategori A, güven 0) · Kapsam: ERPGOLD_CORE / ALL

BASE künyesi ve kullanım haritası (v1.5 · 13.09.2026)

Kullanım haritası

Bkz. ERPGOLD BASE · Uzlaştırma · Database Usage Map · Kullanım Haritası Direct · Hata Bilgi Bankası. BASE Status: CANDIDATE_CANONICAL · Runtime Certification: PENDING · Hiçbir DB değişikliği yapılmadı; SAFETY > CLEANUP.

Temizlik kanıtı

Gerekçe: REPORT (DB içi rapor/tasarım SQL'i)

KB-v1 gövdesi (2026-09-10 · kısmi kod kapsamı — kaynağı kadar güvenilir)

Tür: FUNCTION (IF) · Modül: MOD-FATURA · Uzunluk: 86 satır

Özet

[GAP] Kaynakta açıklama yorumu yok; davranış aşağıdaki SQL tanımından ve ilişkilerden okunur.

Parametreler

Bağımlılıklar (bu nesne → hedef)

SQL tanımı (AS-IMPLEMENTED, örnek DB)

CREATE Function [Muhasebe].[OzetIslemRaporu](@SubeId as int,@BasTarih as Date,@SonTarih as Date)
returns Table
as
return

Select top 100000  SS.Unvan+' '+SS.Kodu as Unvan, R.SiraNo,R.Isl,R.Stok,R.Aciklama,R.Adet,R.Miktar,R.Fiyat,R.TutarTL,R.TutarUSD,R.MalFiyat,R.Maliyet,R.Net
--,R.Pozisyon
 from 
(
    Select  
    -1 as SiraNo, Case When I.Yon='S' Then 'A' Else 'S' End as Isl,'TL' as Stok,'TURK LIRASI' as Aciklama,Count(*) as Adet,Sum(TLTutar) as Miktar,1 as Fiyat,Sum(TLTutar-BSMV) as TutarTL,
    Sum(USDTutar) as TutarUSD,0 as MalFiyat,0.00 as Maliyet,0.00 AS Net
    --Case When I.Yon='S' Then (select Sum(Case When Yon='S' Then TLTutar end)-Sum(Case When Yon='A' Then TLTutar end) from Muhasebe.Islemler(@SubeId,@BasTarih,@SonTarih)) Else 0 end as Pozisyon --POZİSYON İÇİN EKLEDİM (MUNUR - 2022.11.24)
    from Muhasebe.Islemler(@SubeId,@BasTarih,@SonTarih) I 
    where IslemTipi<>12
    group by I.Yon
    UNION ALL
    Select  
    Case When B.IsMetal='True' Then 0 Else B.SiraNo End as SiraNo, 
    I.Yon,B.Kodu,B.Aciklama, I.Adet,I.Miktar,I.Fiyat,I.TLTutar,I.USDTutar,
    Case When I.Yon='S' Then IsNull(M.Fiyat,I.Fiyat) End as MalFiyati,
    Convert(Decimal(18,2), I.XMiktar * Case When I.Yon='S' Then IsNull(M.Fiyat,I.Fiyat) End) As Maliyet, 
    Convert(Decimal(18,2), (I.TLTutar-Convert(Decimal(18,2), I.XMiktar * Case When I.Yon='S' Then IsNull(M.Fiyat,I.Fiyat) End))) as Net
    --Case When I.Yon='S' Then Pozisyon else 0 end as Pozisyon  --POZİSYON İÇİN EKLEDİM (MUNUR - 2022.11.24)
    from Sistem.Birimler b
    Left Join
    (
            Select  Yon,
                    B.Id as AnaBirimId,
                    Count(*) as Adet,
                    Sum(Convert(Decimal(18,2),Miktar * Milyem)) as Miktar,
                    Sum(Convert(Decimal(18,2),Miktar)) as XMiktar,
                    Fn.Bol((Sum(TLTutar)-Sum(BSMV)),Sum(Miktar)) as Fiyat,
                    (Sum(TLTutar)-Sum(BSMV)) as TLTutar,
                    Sum(USDTutar) as USDTutar ,
                    Sum(BSMV) as BSMV

            from Muhasebe.Islemler(@SubeId,@BasTarih,@SonTarih) I 
            Left Join Sistem.AnaBirimler B on B.Kodu=I.Kodu
            where I.Kodu <> I.Birim and IslemTipi<>12
            group by Yon,B.Id
    ) I  on B.Id=I.AnaBirimId 
    Left Join 
    (
            Select  Yon,
                    B.Id as AnaBirimId ,

                    Count(*) as Adet,
                Sum(Convert(Decimal(18,2),Miktar * Milyem)) as Miktar,
                    Fn.Bol((Sum(TLTutar)-Sum(BSMV)),Sum(Miktar)) as Fiyat,
                    (Sum(TLTutar)-Sum(BSMV)) as TLTutar,
                    Sum(USDTutar) as USDTutar ,Sum(BSMV) as BSMV

            from Muhasebe.Islemler(@SubeId,@BasTarih,@SonTarih) I  
            Left Join Sistem.AnaBirimler B on B.Kodu=I.Kodu
            Where Yon='A' and ISlemTipi<>12
            group by Yon,B.Id
    ) M on M.AnaBirimId=I.AnaBirimId And I.Yon='S'

--POZİSYON İÇİN EKLEDİM (MUNUR - 2022.11.24)

    Left Join 
    (
        select 
            B.Id as AnaBirimId, 
            Sum(Case When Yon='A' Then Miktar end)-Sum(Case When Yon='S' Then Miktar end) as Pozisyon 
        from Muhasebe.Islemler(@SubeId,@BasTarih,@SonTarih) I
        Left Join Sistem.AnaBirimler B on B.Kodu=I.Kodu
        where IslemTipi<>12
        Group By B.Id
    )X on X.AnaBirimId=I.AnaBirimId



    Where I.Yon Is not null 

) R 

left join sistem.subeler SS on SS.Id=@SubeId
Order by  SiraNo

Kaynaklar

• SRC-DB-MODULES — sys.sql_modules tanımı (salt okunur); gizli sabitler [REDACTED_SECRET] ile değiştirildi.

Bilinmeyenler

• Hangi sürümde eklendiği: created DB tarihi bir kurulumun tarihidir, ürün sürümü değil (GAP-VERSION-02).