AP Payment Upload Using API or Interface

Question

Hi ,
I had requirement to upload the AP payment information using API or Interface. I have the below code. But is showing some "Unexpected" error.
declare
p_num_printed_docs NUMBER;
p_payment_id NUMBER;
p_paper_doc_num NUMBER;
p_pmt_ref_num NUMBER;
p_return_status VARCHAR2(200);
p_error_ids_tab IBY_DISBURSE_SINGLE_PMT_PKG.trxnErrorIdsTab;
p_msg_count NUMBER;
p_msg_data VARCHAR2(200);
begin
MO_GLOBAL.SET_POLICY_CONTEXT('S',84); --- Apps intialize
fnd_global.apps_initialize(1823,20639,200); --- Apps intialize
IBY_DISBURSE_SINGLE_PMT_PKG.SUBMIT_SINGLE_PAYMENT(
p_api_version => 1.0,
p_init_msg_list => fnd_api.g_false,
p_calling_app_id => 200,
p_calling_app_payreq_cd => '13011',
p_is_manual_payment_flag => 'Y',
p_payment_function => 'PAYABLES_DISB',
p_internal_bank_account_id => 10000, -----12001,
p_pay_process_profile_id => 161,
p_payment_method_cd => 'CLEARING',
p_legal_entity_id => 23324,
p_organization_id => 84,
p_organization_type => '',
p_payment_date => sysdate,
p_payment_amount => 111,
p_payment_currency => 'USD',
p_payee_party_id => 91678,
p_payee_party_site_id => 45272,
p_supplier_site_id => '',
p_payee_bank_account_id => '',
p_override_pmt_complete_pt => 'N',
p_bill_payable_flag => 'N',
p_anticipated_value_date => '',
P_MATURITY_DATE => '',
p_payment_document_id => 1,
p_paper_document_number => '',
p_printer_name => '',
p_print_immediate_flag => '',
p_transmit_immediate_flag => '',
x_num_printed_docs => p_num_printed_docs,
x_payment_id => p_payment_id,
x_paper_doc_num => p_paper_doc_num,
x_pmt_ref_num => p_pmt_ref_num,
x_return_status => p_return_status,
x_error_ids_tab => p_error_ids_tab,
x_msg_count => p_msg_count,
x_msg_data => p_msg_data
commit;
DBMS_OUTPUT.put_line ( p_return_status || '---''---' || p_msg_data || '--''--' || p_msg_count );
IF p_msg_count = 1 THEN
DBMS_OUTPUT.put_line ( p_return_status || '---''---' || p_msg_data || '--''--' || p_msg_count );
ELSIF p_msg_count > 1 THEN
FOR i IN 1..p_msg_count LOOP
DBMS_OUTPUT.put_line ( i||'. ' || fnd_msg_pub.get (p_encoded => fnd_api.g_false) );
END LOOP;
ELSE
DBMS_OUTPUT.put_line (p_return_status);
END IF;
end;
If anyone knows the solution please respond quickly. This is quite urgent requirement. If I am not using right API then please suggest as well. This requirement for Oracle Apps R12
Regards,
Prakash

Answer 1

Hi,
Can you please advise if you had a response for your message.
Regards,
Sunil