费用采购订单导入和接收.docx

1、费用采购订单导入和接收费用采购订单创建和接收文档作者: 孙令朝创建日期: 2017-08-27更新日期: 2017-08-27当前版本: 1.0文档控制更改记录日期作者版本更改参考2017-08-27孙令朝1.0审阅姓名职位签字分布编码姓名地点和位置目录文档控制 1更改记录 1审阅 1分布 1目录 11 文档简介 11.1 项目背景 11.2 范围 11.3 相关文档 12 费用采购介绍 22.1 费用物料介绍 22.2费用采购类型 23 采购订单的导入 44 采购订单的接收 75 未解决的问题 115.1 未解决的问题 11文档简介1.1 项目背景费用采购在企业中也有部分存在，本稳定对于费用

2、采购的创建和接收进行了验证。1.2 范围本文档适用于涉及到费用采购订单的创建本文档是基于R11.5.9版本的EBS作以总结。1.3 相关文档无费用采购介绍1 费用采购是采购订单的一种，与标准采购订单不同的是费用采购订单所采购的物料为费用物料。2.1 费用物料介绍2 费用采购的使用业务场景：3 企业存在着低值易损耗，服务性质的采购。针对这种采购，不需要创建过多的物料编码，只有财务管理财务信息的需求，对于库存没有管理的必要。4 费用物料主要体现在物料的属性上面。2.2费用采购类型费用物料有三种类型，分别适用于不同的业务场景：5 1.存在着物料编码，但是仅记账6 物料属性中的库存物料、库存资产、计算

3、成本不勾选，同时需要设置费用账户7 2.存在物料编码，记账的同时还要体现库存8 物料属性中库存资产、计算成本不勾选；库存物料和费用账户需要设置9 3.不存在物料编码，常为服务类的采购10 采购订单行的单价不能修改为固定值，只能修改数量。11 本文档这次测试的是第一种情况，对应的物料属性设置如下图所示12 13 14 15 3 采购订单的导入对费用物料创建采购订单时和通常的物料创采购订单没有区别需要注意的是必须给采购订单行上面的借记账户赋值测试SQL（已在R11上测试通过）Declarel_Iface_RecPo.Po_Headers_Interface%Rowtype;l_Iface_Line

4、s_RecPo.Po_Lines_Interface%Rowtype;l_Iface_Dis_RecPo.Po_Distributions_Interface%Rowtype;g_User_IdNumber :=Fnd_Global.User_Id;l_Iface_Header_IdNumber;l_Iface_Line_IdNumber;g_Session_IdNumber :=Userenv(SESSIONID);l_Line_NumNumber;l_Variance_Account_Id Number;BeginFnd_Global.Apps_Initialize(User_Id= 20

5、40,Resp_Id=50352,Resp_Appl_Id = 201);Select Po_Headers_Interface_s.Nextval Intol_Iface_Header_Id From Dual;l_Iface_Rec:= Null;l_Iface_Rec.Creation_Date:= Sysdate;l_Iface_Rec.Last_Update_Date := Sysdate;l_Iface_Rec.Created_By:= g_User_Id;l_Iface_Rec.Last_Updated_By:= g_User_Id;l_Iface_Rec.Interface_H

6、eader_Id:=l_Iface_Header_Id;l_Iface_Rec.Org_Id:= 82;l_Iface_Rec.Process_Code:= PENDING;l_Iface_Rec.Action:= ORIGINAL;l_Iface_Rec.Document_Type_Code:= STANDARD;l_Iface_Rec.Document_Num:= Null;l_Iface_Rec.Approval_Status:= APPROVED;l_Iface_Rec.Agent_Id:= 4088; -周康l_Iface_Rec.Vendor_Num:= 04015005;l_If

7、ace_Rec.Vendor_Id:= 4233;l_Iface_Rec.Ship_To_Location_Id:= 8666; -专用车部l_Iface_Rec.Bill_To_Location_Id:= 141; -陕重汽东厂l_Iface_Rec.Comments:= Null;l_Iface_Rec.Currency_Code:= CNY;l_Iface_Rec.Interface_Source_Code :=DMSWG_IMPORT;l_Iface_Rec.Attribute3:= 041; -业务部门：销售_专用车部-l_Iface_Rec.Attribute15:= DMSWG_

8、|l_Po_Inference_Id;l_Iface_Rec.Note_To_Receiver := 销司专用车部;l_Iface_Rec.Batch_Id:= g_Session_Id;Insert Into Po.Po_Headers_Interface Valuesl_Iface_Rec;l_Line_Num := 1;Select Po.Po_Lines_Interface_s.Nextval Intol_Iface_Line_Id From Dual;l_Iface_Lines_Rec:= Null;l_Iface_Lines_Rec.Creation_Date:= Sysdate;

9、l_Iface_Lines_Rec.Last_Update_Date := Sysdate;l_Iface_Lines_Rec.Created_By:= g_User_Id;l_Iface_Lines_Rec.Last_Updated_By:= g_User_Id;l_Iface_Lines_Rec.Interface_Line_Id:=l_Iface_Line_Id;l_Iface_Lines_Rec.Interface_Header_Id :=l_Iface_Header_Id;l_Iface_Lines_Rec.Process_Code:=PENDING;l_Iface_Lines_Re

10、c.Action:=ORIGINAL;l_Iface_Lines_Rec.Line_Num:=l_Line_Num;l_Iface_Lines_Rec.Item:=WGDX0000000000002;l_Iface_Lines_Rec.Vendor_Product_Num:=2400*3200;l_Iface_Lines_Rec.Uom_Code:= Pcs;l_Iface_Lines_Rec.Note_To_Vendor:=CK-2017;l_Iface_Lines_Rec.Promised_Date:=Sysdate;l_Iface_Lines_Rec.Need_By_Date:=Sysd

11、ate;l_Iface_Lines_Rec.Shipment_Num:= 1;l_Iface_Lines_Rec.Quantity:= 2;l_Iface_Lines_Rec.Unit_Price:=1000;l_Iface_Lines_Rec.Ship_To_Organization_Id := 85;l_Iface_Lines_Rec.Taxable_Flag:=Y;l_Iface_Lines_Rec.Tax_Name:=VAT17;Insert Into Po_Lines_Interface Valuesl_Iface_Lines_Rec;l_Iface_Dis_Rec := Null;

12、l_Iface_Dis_Rec.Creation_Date:= Sysdate;l_Iface_Dis_Rec.Last_Update_Date := Sysdate;l_Iface_Dis_Rec.Created_By:= g_User_Id;l_Iface_Dis_Rec.Last_Updated_By:= g_User_Id;Select Po.Po_Distributions_Interface_s.NextvalInto l_Iface_Dis_Rec.Interface_Distribution_IdFrom Dual;BeginSelect Msi.Expense_Account

13、Into l_Variance_Account_Id -费用账户idFrom Mtl_System_Items_b MsiWhere Msi.Segment1 = WGDX0000000000002 And Msi.Organization_Id= 85;ExceptionWhen Others ThenNull;End;l_Iface_Dis_Rec.Interface_Header_Id :=l_Iface_Header_Id;l_Iface_Dis_Rec.Interface_Line_Id:=l_Iface_Line_Id;l_Iface_Dis_Rec.Quantity_Ordere

14、d:=l_Iface_Lines_Rec.Quantity;l_Iface_Dis_Rec.Distribution_Num:= 1;l_Iface_Dis_Rec.Quantity_Delivered:= 0;l_Iface_Dis_Rec.Quantity_Billed:= 0;l_Iface_Dis_Rec.Quantity_Cancelled:= 0; -MustBe 0-L_Iface_Dis_Rec.Charge_Account_Id:= 40693;-L_Iface_Dis_Rec.Accrual_Account_Id:= 1121;l_Iface_Dis_Rec.Charge_

15、Account_Id :=l_Variance_Account_Id;-l_Iface_Dis_Rec.Variance_Account_Id :=l_Variance_Account_Id;Insert Into Po.Po_Distributions_Interface Valuesl_Iface_Dis_Rec;l_Line_Num := l_Line_Num + 1; -End If;Commit; -call apiPo_Docs_Interface_Sv5.Process_Po_Headers_Interface(x_Selected_Batch_Id= g_Session_Id,

16、x_Buyer_Id= Null,x_Document_Type= STANDARD,x_Document_Subtype= Null,x_Create_Items= N,x_Create_Sourcing_Rules_Flag = Null,x_Rel_Gen_Method= Null,x_Approved_Status= APPROVED,x_Commit_Interval= 1,x_Process_Code= PENDING,x_Interface_Header_Id= Null,x_Org_Id_Param= Null,x_Ga_Flag= Null);End;4 采购订单的接收采购接

17、收有三种类型，不同的类型赋不同的值。1。直接入库的接收 rcv_transactions_interface.transaction_type:= RECEIVE;rcv_transactions_interface.auto_transact_code:= DELIVER;rcv_transactions_interface.destination_type_code:= INVENTORY;2. 只完成接收，不入库 rcv_transactions_interface.transaction_type:= RECEIVE;rcv_transactions_interface.auto_tr

18、ansact_code:= NULL;rcv_transactions_interface.destination_type_code:= RECEIVING ;3.|对于接收后需要入库 rcv_transactions_interface.transaction_type:= DELIVER; rcv_transactions_interface.auto_transact_code:= NULL; rcv_transactions_interface.destination_type_code:= INVENTORY;费用接收的时候不同的是对于 l_Iface_Rcv_Rec.Destin

19、ation_Type_Code :=EXPENSE; -接收至费用 因为是费用物料，设置的为库存物料没勾选，所以接收时不需要指定子库。Declarel_ProgressVarchar2(200);x_Header_RecordRcv_Shipment_Header_Sv.Headerrectype;l_Iface_Rcv_RecRcv_Transactions_Interface%Rowtype;x_Group_IdNumber;x_Shipment_Header_Id Number;l_Iface_Trxn_IdNumber;x_Request_IdNumber;l_Po_Header_Id

20、Number;l_Po_Line_IdNumber;l_Line_Location_IdNumber;l_Dis_IdNumber;l_Vendor_IdNumber;l_Item_IdNumber;l_Process_FlagVarchar2(32);l_Item_Uom_CodeVarchar2(32);l_StatusVarchar2(240);l_MessageVarchar2(2000);l_CntNumber;l_Transaction_TypeVarchar2(32);BeginSelect Po.Rcv_Interface_Groups_s.Nextval Intox_Grou

21、p_Id From Dual;x_Header_Record.Header_Record := Null;x_Header_Record.Error_Record:= Null;Select Po.Rcv_Headers_Interface_s.NextvalIntox_Header_Record.Header_Record.Header_Interface_IdFrom Dual;Select Vendor_IdInto l_Vendor_IdFrom Po_Vendors PvWhere Pv.Segment1 = 04015005;x_Header_Record.Header_Recor

22、d.Group_Id:= x_Group_Id;x_Header_Record.Header_Record.Processing_Status_Code := PENDING;x_Header_Record.Header_Record.Receipt_Source_Code:= VENDOR;x_Header_Record.Header_Record.Transaction_Type:= NEW;x_Header_Record.Header_Record.Auto_Transact_Code:= DELIVERY; -RECEIVE;x_Header_Record.Header_Record.

23、Vendor_Id:= l_Vendor_Id;-x_Header_Record.Header_Record.Vendor_Site_Id:= 11086;x_Header_Record.Header_Record.Expected_Receipt_Date:= Sysdate;x_Header_Record.Header_Record.Validation_Flag:= Y;x_Header_Record.Header_Record.Ship_To_Organization_Id := 85;x_Header_Record.Header_Record.Receipt_Num:= WGRCV- |