ITPub博客

首页 > 应用开发 > IT综合 > PO 接收 API

PO 接收 API

IT综合 作者:cuntian375 时间:2019-03-29 17:53:19 0 删除 编辑

-- Created on 2013-5-8 by ADMINISTRATOR 
declare 
  -- Local variables here
  i integer;
  l_iface_rcv_header_rec rcv_headers_interface%rowtype;
  l_iface_rcv_transaction_rec rcv_transactions_interface%rowtype;
begin
  -- Test statements here
  mo_global.init('INV');
  mo_global.set_policy_context('S',204);
  fnd_global.APPS_INITIALIZE(user_id => 1068,resp_id => 53394,resp_appl_id => 385);
  
  select po.rcv_transactions_interface_s.nextval
    into l_iface_rcv_transaction_rec.interface_transaction_id
  from dual;
  select po.rcv_interface_groups_s.nextval
  into   l_iface_rcv_transaction_rec.group_id 
  from dual;
  dbms_output.put_line('group id:'||l_iface_rcv_transaction_rec.group_id);
  
  l_iface_rcv_transaction_rec.processing_status_code := 'PENDING';
  l_iface_rcv_transaction_rec.transaction_status_code := 'PENDING';
  l_iface_rcv_transaction_rec.processing_mode_code := 'BATCH';
  l_iface_rcv_transaction_rec.validation_flag := 'Y';
  l_iface_rcv_transaction_rec.receipt_source_code := 'VENDOR';
  l_iface_rcv_transaction_rec.vendor_id := 600;
  l_iface_rcv_transaction_rec.vendor_site_id := 1414;
  l_iface_rcv_transaction_rec.source_document_code := 'PO';
  l_iface_rcv_transaction_rec.po_header_id := 121311;
  l_iface_rcv_transaction_rec.po_line_id := 184238;
  l_iface_rcv_transaction_rec.po_line_location_id := 275383;
  l_iface_rcv_transaction_rec.po_release_id := null;
  l_iface_rcv_transaction_rec.transaction_type := 'DELIVER';
  l_iface_rcv_transaction_rec.auto_transact_code := null;
  l_iface_rcv_transaction_rec.destination_type_code := 'INVENTORY';
  l_iface_rcv_transaction_rec.shipment_header_id := 4820908;
  l_iface_rcv_transaction_rec.parent_transaction_id := 4901363;
  l_iface_rcv_transaction_rec.item_id := 6068;
  l_iface_rcv_transaction_rec.transaction_date := sysdate;
  l_iface_rcv_transaction_rec.quantity := 5;
  l_iface_rcv_transaction_rec.unit_of_measure := 'Each';
  l_iface_rcv_transaction_rec.to_organization_id := 207;
  l_iface_rcv_transaction_rec.ship_to_location_id := 207;
  l_iface_rcv_transaction_rec.location_id := null;
  l_iface_rcv_transaction_rec.subinventory := 'FGI';
  l_iface_rcv_transaction_rec.interface_source_code := 'RANBO TEST';
  l_iface_rcv_transaction_rec.interface_source_line_id := 2013050901;
  l_iface_rcv_transaction_rec.last_update_date := sysdate;
  l_iface_rcv_transaction_rec.last_updated_by := -1;
  l_iface_rcv_transaction_rec.creation_date := sysdate;
  l_iface_rcv_transaction_rec.created_by := -1;
  insert into rcv_transactions_interface values l_iface_rcv_transaction_rec;
 -- rcv_roi_preprocessor.Preprocessor(x_request_id => 1,x_group_id => l_iface_rcv_header_rec.group_id);  
end;

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/24023385/viewspace-2639785/,如需转载,请注明出处,否则将追究法律责任。

上一篇: EBS 常用函数
下一篇: 没有了~
请登录后发表评论 登录
全部评论

注册时间:2011-02-12

  • 博文量
    5
  • 访问量
    5854