Repair.StokRepair — ERPGOLD Wiki

Tip: STORED PROCEDURE · Şema: Repair · Modül: MOD-DIGER · Temizlik sınıfı: UNUSED_HIGH_CONFIDENCE (kategori E, güven 95) · Kapsam: ERPGOLD_CORE / ALL

Kullanım haritası (13.09.2026)

Kategori	F — MANUAL REVIEW · `F-POSSIBLE_JOB_OR_MANUAL_TOOL`
Güven	50
Gerekçe	Referanssız yordam: SQL Agent job / bakım aracı / kurulum betiği olabilir; msdb kontrol edilemedi (Express: Agent yok; üretim Standard). ERPGOLD kodunda, DB içi rapor/tasarım SQL'inde (V2 demo), dinamik SQL kalıplarında, tetikleyici/FK/computed/cross-db bağlarında ve gerekli nesnelerin bağımlılık grafında referans yok

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

Temizlik kanıtı

Kontrol	Sonuç
app	NO
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: Hiçbir kaynakta referans bulunamadı

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

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

Özet

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

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

İlişki	Hedef	Tip
READS	Cari.Islemler	TABLE
WRITES	Stok.StokHaraketleri	TABLE

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

CREATE Proc [Repair].[StokRepair]
 as
        Declare @IslemId int
        Declare @Tarih Date
        Declare @SubeId int
        Declare @KasaId int
        Declare @IslemKodu int
        Declare @IslemTuru int
        Declare @IslemTipi int
        Declare @StokId int
        Declare @VaryantId int
        Declare @Adet int
        Declare @Miktar Decimal(18,2)
        Declare @AuMilyem Decimal(18,5)
        Declare @Tutar Decimal(18,5)
        Declare @Birim Nvarchar(Max)
        Declare @BirimId int
        Declare @StokIsc Decimal(18,2)
        Declare @StokIscKur Decimal(18,5)
        Declare @StokIscBirimId int
        Truncate Table Stok.StokHaraketleri
        DECLARE IslemCursor CURSOR FOR Select Id,Tarih,SubeId,KasaId,IslemKodu,IslemTuru,IslemTipi,StokId,VaryantId,Adet,Miktar,AuMilyem,Tutar,Birim,BirimId,Iscilik,IscilikBirimId,IscilikBirimKur From Cari.Islemler Where IsDeleted='False'
        OPEN IslemCursor 
            FETCH NEXT FROM IslemCursor  INTO  @IslemId,@Tarih,@SubeId,@KasaId,@IslemKodu,@IslemTuru,@IslemTipi,@StokId,@VaryantId,@Adet,@Miktar,@AuMilyem,@Tutar,@Birim,@BirimId,@StokIsc,@StokIscBirimId,@StokIscKur 
            WHILE @@FETCH_STATUS =0
            BEGIN 



                /*****************************STOK HARAKET DOSYASINA KAYIT ET************************************************************************/
                if @IslemKodu=1 or @IslemKodu=2 --- MADEN İŞLEMİ İSE/
                BEGIN
                    Insert Into Stok.StokHaraketleri(IslemId,IslemTuru,Tarih,SubeId,KasaId,StokTipi,StokId,VaryantId,Adet,Miktar,Milyem,Has,Maliyet)
                    Values(@IslemId,@IslemTuru,@Tarih,@SubeId,@KasaId,1,@StokId,IsNull(@VaryantId,0),Case When @IslemTuru=0 Then @Adet When @IslemTuru=1 Then 0-@Adet End,Case When @IslemTuru=0 Then @Miktar When @IslemTuru=1 Then 0-@Miktar End,@AuMilyem,Case When @IslemTuru=0 Then (@AuMilyem * @Miktar) When @IslemTuru=1 Then 0-(@AuMilyem * @Miktar)  End ,Case When @IslemTuru=0 Then Convert(Decimal(18,2), @StokIsc * @StokIscKur ) Else 0 End)
                END
                if @IslemKodu=0  ---TAKOZ ISLEMI ISE
                BEGIN
                    Insert Into Stok.StokHaraketleri(IslemId,IslemTuru,Tarih,SubeId,KasaId,StokTipi,StokId,Adet,Miktar,Milyem,Has,Maliyet)
                    Values(@IslemId,@IslemTuru,@Tarih,@SubeId,@KasaId,3,@StokId,Case When @IslemTuru=0 Then 1 When @IslemTuru=1 Then -1 End,0,0,0,0)
                END
                if @IslemKodu=3  ---NAKİT İŞLEMİ İSE
                BEGIN
                    Insert Into Stok.StokHaraketleri(IslemId,IslemTuru,Tarih,SubeId,KasaId,StokTipi,StokId,Adet,Miktar,Milyem,Has,Maliyet)
                    Values(@IslemId,@IslemTuru,@Tarih,@SubeId,@KasaId,2,@StokId,0,Case When @IslemTuru=0 Then @Miktar When @IslemTuru=1 Then 0-@Miktar End,0,0,0)
                END
                if @IslemTipi=1 ---PEŞİN İŞLEM İSE
                BEGIN
                    Insert Into Stok.StokHaraketleri(IslemId,IslemTuru,Tarih,SubeId,KasaId,StokTipi,StokId,Adet,Miktar,Milyem,Has,Maliyet)
                    Values(@IslemId,@IslemTuru,@Tarih,@SubeId,@KasaId,2,@BirimId,0,Case When @IslemTuru=0 Then 0-@Tutar When @IslemTuru=1 Then @Tutar End,0,0,0)
                END
                ---////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////


        FETCH NEXT FROM IslemCursor  INTO  @IslemId,@Tarih,@SubeId,@KasaId,@IslemKodu,@IslemTuru,@IslemTipi,@StokId,@Adet,@Miktar,@AuMilyem,@Tutar,@Birim,@BirimId,@StokIsc,@StokIscBirimId,@StokIscKur 
    END
    CLOSE IslemCursor 
    DEALLOCATE IslemCursor

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