declare
cursor c is
select mm.manufacturer_id
,mm.manufacturer_name
,mm.description
,mm.attribute5 --曾用名
,mm.attribute4
,mm.attribute6
,mm.attribute7
,mm.attribute9
-- ,mm.created_by
-- ,mm.creation_date
,mm.attribute3
,mm.attribute1
from mtl_manufacturers mm
where not exists (select 1
from ap.ap_suppliers ap
where mm.description = ap.vendor_name); --1246
l_vendor_rec ap_vendor_pub_pkg.r_vendor_rec_type;
j number := 0;
l_segment1 varchar2(240);
x_return_status varchar2(240);
x_msg_count number;
x_msg_message varchar2(4000);
l_vendor_id number;
l_party_id number;
begin
for i in c loop
l_segment1 := cux_hap_comm_data_pkg.get_max_segment1;
j := j + 1;
-- 建立**商
l_vendor_rec := null;
l_vendor_rec.segment1 := l_segment1;
l_vendor_rec.vendor_name := i.description;
l_vendor_rec.vendor_type_lookup_code := 'vendor';
l_vendor_rec.attribute_category := null;
l_vendor_rec.attribute2 := '系統外';
l_vendor_rec.attribute4 := i.attribute4;
l_vendor_rec.attribute5 := 'vendor';
--modify by fengzuo@20190501
--pim在處理時,供方檔案密級不儲存單據表頭密級,預設儲存為「內部(**)
l_vendor_rec.attribute6 := 'vc9f3mbc4g6i6na'; --i.security_level;
--end modify
l_vendor_rec.attribute7 := i.attribute6;
l_vendor_rec.attribute8 := i.attribute7;
l_vendor_rec.attribute9 := i.attribute9;
l_vendor_rec.attribute10 := 'only_manufacturer';
l_vendor_rec.start_date_active := sysdate; --insert by lj@20181202
if i.attribute3 = 'y' then
l_vendor_rec.end_date_active := sysdate - 1;
else
l_vendor_rec.end_date_active := null;
end if;
--insert by lj@20181202
l_vendor_rec.vendor_name_alt := i.attribute1; --add by lj@20190117
l_vendor_rec.attribute11 := i.manufacturer_name;
l_vendor_rec.attribute12 := i.manufacturer_id;
l_vendor_rec.attribute13 := i.description; --add by fengzuo@20190524 製造商名稱(與**商名稱一致)
l_vendor_rec.attribute14 := i.attribute5; --add by fengzuo@20190524
l_vendor_rec.attribute15 := 'intranet'; --add by fengzuo@20190524
l_vendor_rec.attribute1 := null; --add by fengzuo@20190524
ap_vendor_pub_pkg.create_vendor(p_api_version => 1.0
,p_init_msg_list => fnd_api.g_false
,p_commit => fnd_api.g_false
,p_validation_level => fnd_api.g_valid_level_full
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_message
,p_vendor_rec => l_vendor_rec
,x_vendor_id => l_vendor_id
,x_party_id => l_party_id);
end loop;
dbms_output.put_line(j);
end;
優質供應商選擇標準 優秀供應商評選標準
優秀 商評選標準 評選 商標準主要有 合適的商品質量。採購商品的質量合乎採購單位的要求是採 購單位進行商品採購時首先要考慮的條件。對於質量差 偏低的 商品,雖然採購成本低,但會導致企業的總成本增加。因為質量不合 格的產品在企業投入使用的過程中,往往會影響生產的連續性和產成 品的質量,這些最終都會反映...
InfiniBand OS 供應商支援
mellanox infiniband 驅動程式 協議軟體和工具由其各自的主要作業系統 商和分布式系統收件箱提供支援,或在另有說明的情況下由 mellanox 提供支援。mellanox 還可支援所有主要處理器架構。mellanox infiniband 驅動程式和 ulp 均已經過測試和驗證,可支...
統計供應商個數
統計 商個數 create trigger dbo t supplyentry luyu 自定義觸發器的名稱 on dbo t supplyentry 商供貨明細表,觸發器的表名,意為在哪個表建立觸發 for update,delete 觸發型別 insert update delete 分別意為插...