Mikro Muhasebe Faturadaki Stok Maliyet Karşılaştırması
Mikro Muhasebe Faturadaki Stok Maliyet Karşılaştırması
Kesmiş olduğunuz faturaların son giriş fiyatları ile satış fiyatlarınızı günlük z raporu gibi dökerek karşılaştırma yapabileceğiniz sorgular aşağıdadır ekleyerek günlük raporlarınızı alıp karşılaştırma yapabilirsiniz.
Son giriş fiyatı için function çalışmış olduğunuz veritabanında execute ediniz.
CREATE FUNCTION [dbo].[fn_StokSonGirisFiyati] (@StokKodu nvarchar(30)) RETURNS float AS BEGIN RETURN (select TOP(1) case sth_har_doviz_cinsi when 0 then sth_tutar/sth_miktar when 1 then (sth_tutar/sth_miktar)*sth_har_doviz_kuru when 2 then (sth_tutar/sth_miktar)*sth_har_doviz_kuru end from STOK_HAREKETLERI where sth_stok_kod=@StokKodu and sth_tip=0 and sth_normal_iade=0 and sth_evraktip!=12 and sth_cins in (0,1,12) order by sth_tarih desc) END
Aşağıdaki kodları not defterinde açarak sql olarak kaydediniz daha sonra supervisor olarak görüntü sorgusu bağla diyerek kaydetmiş olduğunuz sql dosyanızı gösteriniz.
SELECT cha_evrakno_seri as [Evrak Seri], cha_evrakno_sira as [Evrak No], cha_kod as [Cari Kodu], (select cari_unvan1 from CARI_HESAPLAR where cari_kod=sth_cari_kodu) as [Cari Ismi], sth_stok_kod as [Stok Kodu], (select sto_isim from STOKLAR where sto_kod=sth_stok_kod) as [Stok Ismi], sth_tutar/sth_miktar as [Birim Fiyatı], dbo.fn_StokSonGirisFiyati(sth_stok_kod) as [Son Giriş Fiyatı], sth_tutar/sth_miktar-dbo.fn_StokSonGirisFiyati(sth_stok_kod) as [Satış Tutarı - Son Giriş Fiyatı] FROM STOK_HAREKETLERI S INNER JOIN CARI_HESAP_HAREKETLERI C ON S.sth_fat_recid_recno=C.cha_RECid_RECno where sth_tip=1 and sth_normal_iade=0 and sth_evraktip in (1,4) and sth_fat_recid_recno!=0 and cha_tarihi=CONVERT(DATE, GETDATE())
Seri 9000 kullanıyorsanız Menü sorgu yönetimi açık olduğundan dolayı aşağıdaki gibi de tarih parametreli şekilde de ekleyip tarihi dinamik şekilde verebilirsiniz.
[< <@H;GünlükRapor> <@P1;NAME=Tarihi Seçiniz,10;TYPE=T> >] SELECT cha_evrakno_seri as [Evrak Seri], cha_evrakno_sira as [Evrak No], cha_kod as [Cari Kodu], (select cari_unvan1 from CARI_HESAPLAR where cari_kod=sth_cari_kodu) as [Cari Ismi], sth_stok_kod as [Stok Kodu], (select sto_isim from STOKLAR where sto_kod=sth_stok_kod) as [Stok Ismi], sth_tutar/sth_miktar as [Birim Fiyatı], dbo.fn_StokSonGirisFiyati(sth_stok_kod) as [Son Giriş Fiyatı], sth_tutar/sth_miktar-dbo.fn_StokSonGirisFiyati(sth_stok_kod) as [Satış Tutarı - Son Giriş Fiyatı] FROM STOK_HAREKETLERI S INNER JOIN CARI_HESAP_HAREKETLERI C ON S.sth_fat_recid_recno=C.cha_RECid_RECno where sth_tip=1 and sth_normal_iade=0 and sth_evraktip in (1,4) and sth_fat_recid_recno!=0 and cha_tarihi=@P1
Sorguyu ekledim ve çalıştırdım. Çok faydalı bi çalışma olmuş. Ellerinize sağlık.
Rica ederim Hasan bey iyi çalışmalar dilerim.