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. delphi 线程教学第五节：多个线程同时执行相同的任务

    第五节:多个线程同时执行相同的任务   1.锁   设,有一个房间 X ,X为全局变量,它有两个函数  X.Lock 与 X.UnLock; 有如下代码:   X.Lock;      访问资源 P; ...

  2. Codeforces Round #305 (Div. 2) A. Mike and Fax 暴力回文串

     A. Mike and Fax Time Limit: 20 Sec  Memory Limit: 256 MB 题目连接 http://codeforces.com/contest/548/pro ...

  3. NavigationView使用过程的问题解决

    NavigationView是android support design库提供的侧滑面板控件,通常与support v4库里的DrawerLayout侧滑控件搭配使用.以下是使用过程中遇到的问题及解 ...

  4. postgresql添加字段

    ALTER TABLE jiangan_config ADD COLUMN article text NOT NULL DEFAULT ''; pg_dump -s database_name -t ...

  5. linux下数据同步、回写机制分析

    一.前言在linux2.6.32之前,linux下数据同步是基于pdflush线程机制来实现的,在linux2.6.32以上的版本,内核彻底删掉了pdflush机制,改为了基于per-bdi线程来实现 ...

  6. 给定一数组，输出满足2a=b（a，b代表数组中的数）的数对，要求时间复杂度尽量低。

    //时间复杂度O(n),空间复杂度O(n) void findSequence(int* arr, int len) { int* hashtable = new int[RANGE]; memset ...

  7. FFmpeg的HEVC解码器源代码简单分析：环路滤波（Loop Filter）

    ===================================================== HEVC源代码分析文章列表: [解码 -libavcodec HEVC 解码器] FFmpe ...

  8. 深入浅出seesion和cookie

    session在计算机中,尤其是在网络应用中,称为"会话控制".session 对象存储特定用户会话所需的属性及配置信息.session跟踪是Web程序中常用的技术,用来跟踪用户的 ...

  9. 第一行代码阅读笔记---详解分析第一个Android程序

    以下是我根据作者的思路,创建的第一个Android应用程序,由于工具强大,代码都自动生成了,如下: package com.example.first_app; import android.os.B ...

  10. 剑指Offer——腾讯+360+搜狗校招笔试题+知识点总结

    剑指Offer--腾讯+360+搜狗校招笔试题+知识点总结 9.11晚7:00,腾讯笔试.选择题与编程.设计题单独计时. 栈是不是顺序存储的线性结构啊? 首先弄明白两个概念:存储结构和逻辑结构. 数据 ...