AP*供应商更新
DECLARE
v_Vendor_Rec Ap_Vendor_Pub_Pkg.r_Vendor_Rec_Type;
v_Return_Status VARCHAR2(50);
v_Msg_Count NUMBER;
v_Msg_Data VARCHAR2(3000);
v_Party_Id NUMBER;
BEGIN
v_Vendor_Rec.Vendor_Id := p_Vendor_Id;
v_Vendor_Rec.Parent_Vendor_Id := p_Parent_Vendor_Id;
v_Vendor_Rec.Attribute10 := p_Vendor_Dept;
v_Vendor_Rec.Attribute12 := p_Attribute12;
v_Vendor_Rec.Vendor_Type_Lookup_Code := p_Vendor_Type_Code;
v_Vendor_Rec.End_Date_Active := p_Active_Date;
v_Vendor_Rec.Vendor_Name_Alt := p_Vendor_Name_Alt;
Ap_Vendor_Pub_Pkg.Update_Vendor(p_Api_Version => 1
,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 => v_Return_Status
,x_Msg_Count => v_Msg_Count
,x_Msg_Data => v_Msg_Data
,p_Vendor_Rec => v_Vendor_Rec
,p_Vendor_Id => p_Vendor_Id);
END;