EBS开发_应收发票接口导入

--以下代码于20190625在Tony环境成功导入

--注意,需要按照https://blog.csdn.net/FangZ0615/article/details/38677085 预先进行弹性域的配置  应收账款-行事务处理弹性域

 

-- applies to:  r12 12.1.3
-- purpose:     AR invoice 多行导入
DECLARE
  l_ar_iface_row ra_interface_lines_all%ROWTYPE;
BEGIN
  mo_global.init('AR');
  mo_global.set_policy_context('S', 82);
  fnd_global.apps_initialize(user_id      => 1110,
                             resp_id      => 50597,
                             resp_appl_id => 20003);
  l_ar_iface_row := NULL;

  l_ar_iface_row.interface_line_context       := '5211'; -- 上下文
  l_ar_iface_row.interface_line_attribute1    := '100'; -- 分组规则
  l_ar_iface_row.interface_line_attribute2    := 'TEST1357'; -- 分组标识
  l_ar_iface_row.orig_system_bill_customer_id := 1042; -- 客户
  l_ar_iface_row.orig_system_bill_address_id  := 1042; -- 收单方地址
  l_ar_iface_row.term_id                      := 5; -- 收款条件
  l_ar_iface_row.batch_source_name            := 'TM导入'; -- 来源
  l_ar_iface_row.currency_code                := 'CNY'; -- 币种
  l_ar_iface_row.conversion_type              := 'Corporate'; -- 汇率类型
  l_ar_iface_row.conversion_rate              := NULL; -- 汇率
  l_ar_iface_row.cust_trx_type_id             := 1000; -- 发票分配 事务处理类型 id
  l_ar_iface_row.line_number                  := 1; -- 行号
  l_ar_iface_row.description                  := 'import test 01'; -- 行说明
  l_ar_iface_row.quantity                     := 10; -- 数量
  l_ar_iface_row.unit_selling_price           := 100; -- 销售单价
  l_ar_iface_row.line_type                    := 'LINE'; -- 行类型
  l_ar_iface_row.org_id                       := 82; -- OU
  l_ar_iface_row.amount                       := 1000; -- 金额

  INSERT INTO ra_interface_lines_all VALUES l_ar_iface_row;

  l_ar_iface_row.interface_line_context       := '5211';
  l_ar_iface_row.interface_line_attribute1    := '100';
  l_ar_iface_row.interface_line_attribute2    := 'TEST7531';
  l_ar_iface_row.orig_system_bill_customer_id := 1042;
  l_ar_iface_row.orig_system_bill_address_id  := 1042;
  l_ar_iface_row.term_id                      := 5;
  l_ar_iface_row.batch_source_name            := 'TM导入'; --
  l_ar_iface_row.currency_code                := 'CNY'; --
  l_ar_iface_row.conversion_type              := 'Corporate';
  l_ar_iface_row.conversion_rate              := NULL;
  l_ar_iface_row.cust_trx_type_id             := 1000;
  l_ar_iface_row.line_number                  := 2;
  l_ar_iface_row.description                  := 'import test 02';
  l_ar_iface_row.quantity                     := 10;
  l_ar_iface_row.unit_selling_price           := 90;
  l_ar_iface_row.line_type                    := 'LINE';
  l_ar_iface_row.org_id                       := 82;
  l_ar_iface_row.amount                       := 900;

  INSERT INTO ra_interface_lines_all VALUES l_ar_iface_row;
END;

将数据通过上述代码插入接口表后,运行“自动开票主程序”,选择所使用的来源,提交请求,请求会自动运行一个子程序“自动开票导入程序”导入AR发票

你可能感兴趣的:(EBS开发_应收发票接口导入)