建立供應商API

2021-09-24 10:31:57 字數 3101 閱讀 6726

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 分別意為插...