Kaynak: KB-v1 08_SupportPlaybooks/Processes/PROC-177.md ← Surecler/*.doc (destek süreç dokümanı; parola/IP/terminal maskelenmiş). Gerçeklik: DOCUMENTED — kodla doğrulanmış değil.

ERP Maden Stok Hareketlerinde Transfer kayıtlarının yanlış gelmesi V.1

Kimlik: PROC-177 · Ürün: ERPGOLDV2 · Kategori: Tanımlama (şube, kasa, kullanıcı, birim, stok, hesap) · Katalog: ERP Maden Stok Hareketlerinde Transfer kayıtlarının yanlış gelmesi

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.

Aşağıda bulunan query'i alter yapmanız sorunu çözecektir.

ALTER Function [Stok].[GetStokHareketleri] (@SubeId int,@KasaId int,@StokTipi int,@StokId int,@VaryantId int,@Tarih Date)

returns Table

return

Select top 100000 * from

(

select @StokTipi as StokTipi,dateadd(day,-1,@Tarih) as Tarih,'DEVIR' as HesapAdi,'' as Islem,'' as Kodu,'' as Varyant, Sum(Adet) as Adet,Sum(Miktar) as Miktar, null as Milyem,null as Has,null as Fiyat,null as Tutar,null Birim,Sum(Adet) as SAdet,Sum(Miktar) as SMiktar from Stok.StokHaraketleri H Left Join Stok.Varyant V on V.SubeId=@SubeId and V.Id=H.VaryantId Where H.SubeId=@SubeId And H.KasaId =@KasaId And H.StokId =@StokId And StokTipi=@StokTipi And (H.Tarih<@Tarih) And (VaryantId=@VaryantId or @VaryantId=0) Group by V.Kodu

UNION ALL

Select H.StokTipi,IsNull(I.InsertDate ,H.Tarih) as Tarih , Case When Bolum =0 Then F.HesapAdi When Bolum =1 Then 'URETIM' When Bolum=2 Then 'TRANSFER' End as HesapAdi, Case When Bolum=0 Then Sistem.GetIslemKodu (I.IslemKodu,I.IslemTuru,I.IslemTipi) Else Case When H.IslemTuru =0 Then 'GIRIS' Else 'CIKIS' End end as Islem, IsNull(m.Kodu,N.Kodu) as Kodu,V.Kodu as Varyant,ABS(H.Adet) AS Adet,abs(H.Miktar) as Miktar,H.Milyem as Milyem,abs(H.Miktar) * H.Milyem as Has,Fiyat,Tutar,Birim,H.Adet as SAdet,H.Miktar as SMiktar from

Stok.StokHaraketleri H

Left Join Cari.Islemler I on H.IslemId =I.Id and Bolum =0

Left Join Cari.Hesaplar F on F.Id =I.HesapId

Left Join Stok.Varyant V on V.SubeId=@SubeId and V.Id=H.VaryantId

Left Join Stok.Maden M on M.Id =H.StokId And @StokTipi =1

Left Join Stok.Nakit N on N.Id =H.StokId And @StokTipi =2

Where H.SubeId=@SubeId And H.KasaId =@KasaId And H.StokId =@StokId And StokTipi=@StokTipi And (H.Tarih>=@Tarih or @Tarih is null) And (H.VaryantId=@VaryantId or @VaryantId=0)

) X

Order by Tarih Desc

(görsel — süreç kitabında)

Kaynaklar

SRC-PROC-DOC — süreç dokümanı #177