Thursday, May 19, 2011

IBY_EXT_BANKACCT_PUB.CREATE_EXT_BANK_ACCT – R12 – API to Create External Bank Account


Test Instance: R12.1.1
Script:
SET SERVEROUTPUT ON;
DECLARE

   p_api_version         NUMBER               := 1.0;
   p_init_msg_list       VARCHAR2(1)          := 'F';
   x_return_status       VARCHAR2(2000);
   x_msg_count           NUMBER(5);
   x_msg_data            VARCHAR2(2000);
   x_response            iby_fndcpt_common_pub.result_rec_type;
   p_ext_bank_acct_rec   iby_ext_bankacct_pub.extbankacct_rec_type;
   v_supplier_party_id   NUMBER := 55816;  -- EXISTING SUPPLIERS/CUSTOMER      
                                              PARTY_ID
   v_bank_id             NUMBER := 208587; -- EXISTING BANK PARTY ID
   v_bank_branch_id      NUMBER := 278411; -- EXISTING BRANCH PARTY ID
   x_acct_id             NUMBER;
   p_count               NUMBER;
BEGIN

   p_ext_bank_acct_rec.object_version_number    := 1.0;
   p_ext_bank_acct_rec.acct_owner_party_id      := v_supplier_party_id;
   p_ext_bank_acct_rec.bank_account_name        := 'XXTEST BANK ACCNT';
   p_ext_bank_acct_rec.bank_account_num         := 14278596531;
   p_ext_bank_acct_rec.alternate_acct_name      := 'XXTEST BANK ACCNT ALT';
   p_ext_bank_acct_rec.bank_id                  := v_bank_id;
   p_ext_bank_acct_rec.branch_id                := v_bank_branch_id;
   p_ext_bank_acct_rec.start_date               := SYSDATE;
   p_ext_bank_acct_rec.country_code             := 'US';
   p_ext_bank_acct_rec.currency                 := 'USD';
   p_ext_bank_acct_rec.foreign_payment_use_flag := 'Y';
   p_ext_bank_acct_rec.payment_factor_flag      := 'N';
   IBY_EXT_BANKACCT_PUB.CREATE_EXT_BANK_ACCT
                (p_api_version            => p_api_version,
                 p_init_msg_list          => p_init_msg_list,
                 p_ext_bank_acct_rec      => p_ext_bank_acct_rec,
                 x_acct_id                => x_acct_id,
                 x_return_status          => x_return_status,
                 x_msg_count              => x_msg_count,
                 x_msg_data               => x_msg_data,
                 x_response               => x_response
                );
 
   DBMS_OUTPUT.put_line ('x_return_status = ' || x_return_status);
   DBMS_OUTPUT.put_line ('x_msg_count = ' || x_msg_count);
   DBMS_OUTPUT.put_line ('x_msg_data = ' || x_msg_data);
   DBMS_OUTPUT.put_line ('x_acct_id = ' || x_acct_id);
   DBMS_OUTPUT.put_line ('x_response.Result_Code = ' || x_response.result_code);
   DBMS_OUTPUT.put_line (   'x_response.Result_Category = '
                         || x_response.result_category
                        );
   DBMS_OUTPUT.put_line (   'x_response.Result_Message = '
                         || x_response.result_message
                        );

   IF x_msg_count = 1
   THEN
      DBMS_OUTPUT.put_line ('x_msg_data ' || x_msg_data);
   ELSIF x_msg_count > 1
   THEN
      LOOP
         p_count := p_count + 1;
         x_msg_data := fnd_msg_pub.get (fnd_msg_pub.g_next, fnd_api.g_false);

         IF x_msg_data IS NULL
         THEN
            EXIT;
         END IF;

         DBMS_OUTPUT.put_line ('Message' || p_count || ' ---' || x_msg_data);
      END LOOP;
   END IF;
END;

1 Responses to “IBY_EXT_BANKACCT_PUB.CREATE_EXT_BANK_ACCT – R12 – API to Create External Bank Account”

Anonymous said...
August 1, 2012 at 2:50 PM

Hi,
where can i assign a receipts method to customer and which API can assign receipt method.

Thanks,
venky


Post a Comment

Disclaimer

The ideas, thoughts and concepts expressed here are my own. They, in no way reflect those of my employer or any other organization/client that I am associated. The articles presented doesn't imply to any particular organization or client and are meant only for knowledge Sharing purpose. The articles can't be reproduced or copied without the Owner's knowledge or permission.