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;
Detailed introduction to import the customer configuration file of the EBS interface (1)