需求

按上週溝通的，現在有很多采購零星退貨，電子磁電都有。主要是不良造成的額外附屬材料要供應商買單，走零星採購退貨，退貨時，系統不能帶出庫存的結存單價，所以，你這邊看一下，是否能做觸發器或和系統供應商探討一下，如何做？
還有，不良品退貨，採購退貨模塊沒法做批號自動拆分，這樣採購做單非常耗時，需手工一個去查，算。
以上，幫忙看一下是否有什麼快捷的辦法，磁電委外加工越來越多，材料的領用也越來越多。

分析

用戶因爲考慮退貨給不同供應商，不考慮供應商情況，手工查詢品號最近一次進貨價格。

方案

(1) 錄入採購退貨單時候，自動帶出單身品號信息最近一次價格。–PURTJ UDF51

(2) 自定義函數[dbo].[GetPurchasePrice]

– =============================================
– Author:
– Create date: <2020-01-02>
– Description: <取品號(不考慮供應商)最後一次單位進價>
– =============================================
ALTER Function [dbo].[GetPurchasePrice](
@item as nvarchar(30)
)returns decimal(18,6)
as
begin
declare @price as decimal(18,6);

WITH A as(
SELECT TG003 進貨日期,TH004 AS 品號,TH018 原幣單位進價
FROM PURTH LEFT JOIN PURTG ON TH001=TG001 AND TH002=TG002
WHERE TH004=Rtrim(@item)
),B AS(
select t.品號,t.原幣單位進價,rn 排名
from (
select A.品號,A.原幣單位進價,
ROW_NUMBER() over(partition by A.品號 order by A.進貨日期 desc ) rn
from A ) t
where rn=1)

SELECT @price=isnull(原幣單位進價,0) FROM B
return @price

end