EBS开发_工艺路线导入OPENAPI实现

--以下脚本于20171211在tony环境中实现

DECLARE

  l_rtg_header_rec   bom_rtg_pub.rtg_header_rec_type;
  l_operation_tbl    bom_rtg_pub.operation_tbl_type;
  l_op_resource_tbl  bom_rtg_pub.op_resource_tbl_type;
  x_rtg_header_rec   bom_rtg_pub.rtg_header_rec_type;
  x_rtg_revision_tbl bom_rtg_pub.rtg_revision_tbl_type;
  x_operation_tbl    bom_rtg_pub.operation_tbl_type;
  x_op_resource_tbl  bom_rtg_pub.op_resource_tbl_type;
  x_sub_resource_tbl bom_rtg_pub.sub_resource_tbl_type;
  x_op_network_tbl   bom_rtg_pub.op_network_tbl_type;


  x_return_status VARCHAR2(1);
  x_msg_count     NUMBER;
  x_message_list  error_handler.error_tbl_type;


  l_index NUMBER := 1;


  l_user_id          NUMBER := 1110; --User ID, Sysadmin here
  l_cur_mfg_org_code VARCHAR2(240) := 'XIU';


BEGIN


  -- Initialize first, o