Takoz.RaporYaz — ERPGOLD Wiki

Tip: STORED PROCEDURE · Şema: Takoz · Modül: MOD-DIGER · Temizlik sınıfı: ACTIVE (kategori A, güven 0) · Kapsam: ERPGOLD_CORE / ALL

Kullanım haritası (13.09.2026)

Kategori	A — ERPGOLD CORE · `A-APP_CODE`
Güven	100
Derinlik / kök	0 · bu nesne (Seviye-0)
DependencyPath	ERPGOLD → Cari.Islem → Takoz.RaporYaz
Uygulama kullanımı	APP_CODE · Cari.Islem, Stok.Takoz, FrmTakozRaporGirisi

Bkz. Database Usage Map · Direct Application Objects. Hiçbir DB değişikliği yapılmadı; SAFETY > CLEANUP.

Temizlik kanıtı

Kontrol	Sonuç
app	YES
report	NO
config	NO
dynamic	NO
db_in	NO
db_out	YES
trigger	NO
fk	NO
computed	NO
crossdb	NO
runtime	UNKNOWN
external	NO

Gerekçe: APP

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

Tür: PROCEDURE (P) · Modül: MOD-STOK · Uzunluk: 32 satır

Özet

Bir takozun (StokId) rapor/işçilik/maliyet/milyem bilgilerini, ona bağlı TAKOZ işlem satırına (Cari.Islemler) geri yazar. TAKOZ+GİRİŞ kaydında çalıştırılır.

Parametreler

#	Parametre	Tip	Çıktı
1	@TakozId	int

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

İlişki	Hedef	Tip
WRITES	Cari.Islemler	TABLE
CALLS	FN.Bol	FUNCTION
READS	Stok.Takoz	TABLE

İlgili iş kuralları

Stok.Takoz'dan milyem/rapor bilgilerini alıp Cari.Islemler'de IslemKodu=0, StokId=@TakozId satırının Maliyet/Iscilik/Fiyat/Tutar/Birim alanlarını günceller (Takoz.RaporYaz.md)
İşçilik = FN.Bol((MiktarAgMilyemGumIscGumIscBirimKur)+(MiktarAuMilyemHasIscHasIscBirimKur), IscilikBirimKur) (Takoz.RaporYaz.md)
TAKOZ+GİRİŞ işlemi kaydedilince uygulama tarafından çağrılır (Cari.Islem.vb:989)

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

CREATE Proc [Takoz].[RaporYaz](@TakozId int)
AS
Declare @AyarEviId int
Declare @RaporNo Nvarchar(Max)
Declare @Rapor bit
Declare @Extra Bit
Declare @Miktar as Decimal(18,5)
Declare @AuMilyem Decimal(18,5)
Declare @AgMilyem Decimal(18,5)
Declare @PltMilyem Decimal(18,5)
Declare @PldMilyem Decimal(18,5)
Declare @AuKur Decimal(18,5)
Declare @AgKur Decimal(18,5)
Declare @PldKur Decimal(18,5)
Declare @PltKur Decimal(18,5)



            ---((Miktar * @AuMilyem) * HasKur) + ((Miktar * @AgMilyem ) * GumKur)  + ((Miktar * @PltMilyem ) * PltKur) + ((Miktar * @PldMilyem) * PldKur)+
            Select @AyarEviId=AyarEviId,@RaporNo=RaporNo ,@Rapor=IsRapor ,@Extra=IsExtra,@Miktar=Miktar,@AuMilyem=AuMilyem,@AgMilyem=AgMilyem,@PldMilyem=PldMilyem,@PltMilyem=PltMilyem  From Stok.Takoz Where Id=@TakozId  


            Update Cari.Islemler Set Miktar=@Miktar, AyarEviId=@AyarEviId,RaporNo=@RaporNo,IsRapor=@Rapor,IsExtra=@Extra,AuMilyem=@AuMilyem,AgMilyem=@AgMilyem,PldMilyem=@PldMilyem,PltMilyem=@PltMilyem ,
                Maliyet=Fn.Bol( ((Miktar * @AgMilyem ) * GumIsc) * GumIscBirimKur   + ((Miktar * @AuMilyem) * HasIsc) * HasIscBirimKur ,IscilikBirimKur) * IscilikBirimKur   ,
                Satis=0,--Case When IslemTuru=1 Then Fn.Bol( ((Miktar * @AgMilyem ) * GumIsc) * GumIscBirimKur   + ((Miktar * @AuMilyem) * HasIsc) * HasIscBirimKur ,IscilikBirimKur) * FN.GetKur (IscilikBirimId) Else 0 End ,
                Iscilik=Fn.Bol( ((Miktar * @AgMilyem ) * GumIsc) * GumIscBirimKur   + ((Miktar * @AuMilyem) * HasIsc) * HasIscBirimKur ,IscilikBirimKur) ,
                Fiyat=HasIsc * 1000,
                Tutar=Fn.Bol( ((Miktar * @AgMilyem ) * GumIsc) * GumIscBirimKur   + ((Miktar * @AuMilyem) * HasIsc) * HasIscBirimKur ,IscilikBirimKur) ,
                Birim=IscilikBirim,
                BirimId=IscilikBirimId
            Where IslemKodu=0 And StokId=@TakozId and StokId <>0

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).