DECLARE

   l_rec_profile_t  hz_customer_profile_v2pub.customer_profile_rec_type;

   l_rec_profile    hz_customer_profile_v2pub.cust_profile_amt_rec_type;

   l_profile_amt_id NUMBER;

   l_profile_id     NUMBER;

   l_return_status1 VARCHAR2(30);

   l_msg_count1     NUMBER;

   l_msg_data1      VARCHAR2(2000);

   l_return_status2 VARCHAR2(30);

   l_msg_count2     NUMBER;

   l_msg_data2      VARCHAR2(2000);

BEGIN

   mo_global.init('AR');

   fnd_global.apps_initialize(user_id => 10177,

                              resp_id => 52991,

                              resp_appl_id => 222);

   l_rec_profile_t.cust_account_profile_id   := NULL;

   l_rec_profile_t.cust_account_id           := 487194; --CXY-TEST002

   l_rec_profile_t.status                    := 'A';

   l_rec_profile_t.collector_id              := NULL;

   l_rec_profile_t.credit_analyst_id         := NULL;

   l_rec_profile_t.credit_checking           := NULL;

   l_rec_profile_t.next_credit_review_date   := NULL;

   l_rec_profile_t.tolerance                 := NULL;

   l_rec_profile_t.discount_terms            := NULL;

   l_rec_profile_t.dunning_letters           := NULL;

   l_rec_profile_t.interest_charges          := NULL;

   l_rec_profile_t.send_statements           := NULL;

   l_rec_profile_t.credit_balance_statements := NULL;

   l_rec_profile_t.credit_hold               := NULL;

   l_rec_profile_t.profile_class_id          := NULL;

   l_rec_profile_t.site_use_id               := 420072; --BILL_TO

   l_rec_profile_t.credit_rating             := NULL;

   l_rec_profile_t.risk_code                 := NULL;

   l_rec_profile_t.standard_terms            := NULL;

   l_rec_profile_t.override_terms            := NULL;

   l_rec_profile_t.dunning_letter_set_id     := NULL;

   l_rec_profile_t.interest_period_days      := NULL;

   l_rec_profile_t.payment_grace_days        := NULL;

   l_rec_profile_t.discount_grace_days       := NULL;

   l_rec_profile_t.statement_cycle_id        := NULL;

   l_rec_profile_t.account_status            := NULL;

   l_rec_profile_t.percent_collectable       := NULL;

   l_rec_profile_t.autocash_hierarchy_id     := NULL;

   l_rec_profile_t.auto_rec_incl_disputed_flag   := NULL;

   l_rec_profile_t.tax_printing_option           := NULL;

   l_rec_profile_t.charge_on_finance_charge_flag := NULL;

   l_rec_profile_t.grouping_rule_id              := NULL;

   l_rec_profile_t.clearing_days                 := NULL;

   l_rec_profile_t.cons_inv_flag                 := NULL;

   l_rec_profile_t.cons_inv_type                 := NULL;

   l_rec_profile_t.autocash_hierarchy_id_for_adr := NULL;

   l_rec_profile_t.lockbox_matching_option       := NULL;

   l_rec_profile_t.created_by_module             := 'BLC';

   l_rec_profile_t.application_id                := NULL;

   l_rec_profile_t.review_cycle                  := NULL;

   l_rec_profile_t.last_credit_review_date       := NULL;

   l_rec_profile_t.party_id                      := NULL;

   l_rec_profile_t.credit_classification         := NULL;

   l_rec_profile_t.cons_bill_level               := NULL;

   l_rec_profile_t.late_charge_calculation_trx   := NULL;

   l_rec_profile_t.credit_items_flag             := NULL;

   l_rec_profile_t.disputed_transactions_flag    := NULL;

   l_rec_profile_t.late_charge_type              := NULL;

   l_rec_profile_t.late_charge_term_id           := NULL;

   l_rec_profile_t.interest_calculation_period   := NULL;

   l_rec_profile_t.hold_charged_invoices_flag    := NULL;

   l_rec_profile_t.message_text_id               := NULL;

   l_rec_profile_t.multiple_interest_rates_flag  := NULL;

   l_rec_profile_t.charge_begin_date             := NULL;

   l_rec_profile_t.automatch_set_id              := NULL;

   hz_customer_profile_v2pub.create_customer_profile(p_init_msg_list           => fnd_api.g_false,

                                                     p_customer_profile_rec    => l_rec_profile_t,

                                                     p_create_profile_amt      => fnd_api.g_true,

                                                     x_cust_account_profile_id => l_profile_id,

                                                     x_return_status           => l_return_status2,

                                                     x_msg_count               => l_msg_count2,

                                                     x_msg_data                => l_msg_data2);

   FOR i IN 1 .. l_msg_count2 LOOP

      l_msg_data2 := fnd_msg_pub.get(p_msg_index => i, p_encoded => 'F');

   END LOOP; --FOR i IN 1 .. x_msg_count LOOP

   dbms_output.put_line('x_return_status2:' || l_return_status2);

   dbms_output.put_line('l_msg_count2:' || l_msg_count2);

   dbms_output.put_line('l_msg_data2:' || l_msg_data2);

    dbms_output.put_line('l_profile_id:' || l_profile_id);

   --======================================================

   l_rec_profile.cust_acct_profile_amt_id    := NULL;

   l_rec_profile.cust_account_profile_id     := l_profile_id;

   l_rec_profile.currency_code               := 'USD';

   l_rec_profile.trx_credit_limit            := 100;

   l_rec_profile.overall_credit_limit        := 100;

   l_rec_profile.min_dunning_amount          := NULL;

   l_rec_profile.min_dunning_invoice_amount  := NULL;

   l_rec_profile.max_interest_charge         := NULL;

   l_rec_profile.min_statement_amount        := NULL;

   l_rec_profile.auto_rec_min_receipt_amount := NULL;

   l_rec_profile.min_fc_balance_amount := NULL;

   l_rec_profile.min_fc_invoice_amount := NULL;

   l_rec_profile.cust_account_id       := 487194; --CXY-TEST002

   l_rec_profile.site_use_id           := 420072; --BILL_TO

   l_rec_profile.expiration_date       := NULL;

   l_rec_profile.created_by_module           := 'BLC';

   l_rec_profile.application_id              := NULL;

   l_rec_profile.exchange_rate_type          := NULL;

   l_rec_profile.min_fc_invoice_overdue_type := NULL;

   l_rec_profile.min_fc_invoice_percent      := NULL;

   l_rec_profile.min_fc_balance_overdue_type := NULL;

   l_rec_profile.min_fc_balance_percent      := NULL;

   l_rec_profile.interest_type               := NULL;

   l_rec_profile.interest_fixed_amount       := NULL;

   l_rec_profile.interest_schedule_id        := NULL;

   l_rec_profile.penalty_type                := NULL;

   l_rec_profile.penalty_rate                := NULL;

   l_rec_profile.min_interest_charge         := NULL;

   l_rec_profile.penalty_fixed_amount        := NULL;

   l_rec_profile.penalty_schedule_id         := NULL;

   hz_customer_profile_v2pub.create_cust_profile_amt(p_init_msg_list            => fnd_api.g_false,

                                                     p_check_foreign_key        => fnd_api.g_true,

                                                     p_cust_profile_amt_rec     => l_rec_profile,

                                                     x_cust_acct_profile_amt_id => l_profile_amt_id,

                                                     x_return_status            => l_return_status1,

                                                     x_msg_count                => l_msg_count1,

                                                     x_msg_data                 => l_msg_data1);

   FOR i IN 1 .. l_msg_count1 LOOP

      l_msg_data1 := fnd_msg_pub.get(p_msg_index => i, p_encoded => 'F');

   END LOOP; --FOR i IN 1 .. x_msg_count LOOP

   dbms_output.put_line('x_return_status1:' || l_return_status1);

   dbms_output.put_line('l_msg_count1:' || l_msg_count1);

   dbms_output.put_line('l_msg_data1:' || l_msg_data1);

   dbms_output.put_line('l_profile_amt_id:' || l_profile_amt_id);

EXCEPTION

   WHEN OTHERS THEN

      dbms_output.put_line('x_return_status:' || SQLERRM);

END;

详解ebs接口之客户配置文件导入（一）的更多相关文章

  1. 详解ebs接口之客户配置文件导入（二）

    ------------------------------------ -- 1a. Setup the Org_id ------------------------------------ ex ...

  2. 供应商API补充（详解EBS接口开发之供应商导入）(转)

    原文地址  供应商导入的API补充(详解EBS接口开发之供应商导入) --供应商 --创建 AP_VENDOR_PUB_PKG.Create_Vendor ( p_api_version IN NUM ...

  3. 详解EBS接口开发之供应商导入

    (一)供应商常用标准表简介 1.1   常用标准表 如下表中列出了与供应商相关的表和说明: 表名 说明 其他信息 ap_suppliers 供应商头表 供应商的头信息如:供应商名.供应商编码.税号等 ...

  4. 供应商导入的API补充（详解EBS接口开发之供应商导入）

    --供应商 --创建 AP_VENDOR_PUB_PKG.Create_Vendor ( p_api_version IN NUMBER, p_init_msg_list IN VARCHAR2 := ...

  5. 详解EBS接口开发之供应商导入（补充）--错误信息处理

    check reject details on records of AP_SUPPLIER_INT SELECT s.parent_table,s.reject_lookup_code,S.LAST ...

  6. 详解EBS接口开发之供应商导入补充-供应商地点增加实例

    DECLARE --v_org_id number; v_vendor_interface_id NUMBER; v_vendor_site_interface_id NUMBER; --接口表的id ...

  7. 详解EBS接口开发之供应商导入（补充）--供应商银行账户更新

    CREATE OR REPLACE PACKAGE BODY update_vendor_account IS PROCEDURE main(errbuf OUT VARCHAR2, retcode ...

  8. 详解EBS接口开发之物料导入API

    create_item inv_item_grp.create_item(p_commit => fnd_api.g_true, -- p_item_rec => l_item_rec, ...

  9. 具体解释ebs接口之客户配置文件导入（二）

    ------------------------------------ -- 1a. Setup the Org_id ------------------------------------ ex ...

随机推荐

  1. ELK学习记录一 ：初识ELK

    ELK是elastic公司提供的一套完整的收集日志并分析展示的产品,分别表示Elasticsearch.Logstash和kibana. (官网截个图) 先来一段个人粗浅的认识: Elasticsea ...

  2. lua 序列化函数

    local function f( ... ) print('hello') end local x = string.dump(f, true) loadstring(x)()

  3. 计算机网络之域名系统DNS

    域名系统DNS 域名系统DNS(Domai NameSystem)是因特网使用的命名系统,用于把便于人们使用的机器名字转换为IP地址. 许多应用层软件经常直接使用域名系统,但计算机的用户只是间接而不是 ...

  4. Dynamics CRM2011 导入解决方案报根组件插入错误的解决方法

    今天在还原一个老版本的解决方案,在导入时报根组件插入问题"Cannot add a Root Component 38974590-9322-e311-b365-00155d810a00 o ...

  5. markdown绘图插件----mermaid简介

    作者:黄永刚 mermaid简介 当撰写文档的时候,对于流程图的生成大多使用Visio等繁重的工具,没有一种轻便的工具能够画图从而简化文档的编写,就像markdown那样. mermaid解决这个痛点 ...

  6. Compass 更智能的搜索引擎（3）--高亮，排序，过滤以及各种搜索

    要想使得一个搜索系统更加的完美,查询精确度和页面显示算是其中比较重要的两个方面.今天,我们就来谈谈怎么使得我们的搜索系统更加的完美. 关于分词 下载地址 配置 关于高亮 关于排序 原理 冗余字段 使用 ...

  7. ROS新闻 Towards ROS-native drones 无人机支持方案

    PX4/Firmware:https://github.com/PX4/Firmware PXFmini An open autopilot daughter-board for the Raspbe ...

  8. SpriteKit中节点的z-position

    大熊猫猪·侯佩原创或翻译作品.欢迎转载,转载请注明出处. 如果觉得写的不好请多提意见,如果觉得不错请多多支持点赞.谢谢! hopy ;) 免责申明:本博客提供的所有翻译文章原稿均来自互联网,仅供学习交 ...

  9. 剑指Offer——完美+今日头条笔试题+知识点总结

    剑指Offer--完美+今日头条笔试题+知识点总结 情景回顾 时间:2016.9.28 16:00-18:00 19:00-21:00 地点:山东省网络环境智能计算技术重点实验室 事件:完美世界笔试 ...

  10. FFmpeg在Linux下安装编译过程

    转载请把头部出处链接和尾部二维码一起转载,本文出自:http://blog.csdn.net/hejjunlin/article/details/52402759 今天介绍下FFmpeg在Linux下 ...