Miscellaneous receipts API oracle

l_return_status VARCHAR2(10);
l_global_attribute_rec ar_receipt_api_pub.global_attribute_rec_type
DEFAULT ar_receipt_api_pub.global_attribute_rec_const;
l_issuer_name VARCHAR2 (75) DEFAULT NULL;
l_issue_date DATE DEFAULT NULL;
l_issuer_bank_branch_id NUMBER DEFAULT NULL;
l_attribute_rec ar_receipt_api_pub.attribute_rec_type
DEFAULT ar_receipt_api_pub.attribute_rec_const;
l_msg_count NUMBER DEFAULT NULL;
l_msg_index_out NUMBER;
l_msg_data1 VARCHAR2 (2000) DEFAULT NULL;
l_msg_count1 NUMBER DEFAULT NULL;
l_msg_index_out1 NUMBER;
v_receipt_id NUMBER;
l_commit VARCHAR2 (15) := fnd_api.g_false;
l_msg_data VARCHAR2 (2000) DEFAULT NULL;
l_cr_id NUMBER;
l_receipt_number VARCHAR2 (15);
BEGIN
l_receipt_number :='ADI';
begin
ar_receipt_api_pub.create_misc
(p_api_version => 1.0,
p_init_msg_list => fnd_api.g_true,
p_commit => fnd_api.g_true,
p_validation_level => fnd_api.g_valid_level_full,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_currency_code => 'GBP',
p_amount => 500,
p_receipt_date => SYSDATE,
p_gl_date => SYSDATE,
p_receipt_method_id => 2496,
p_activity => 'Miscellaneous Cash',
p_misc_receipt_id => l_cr_id ,
p_receipt_number => l_receipt_number,
p_receivables_trx_id => 2219
);
EXCEPTION WHEN OTHERS
THEN
fnd_file.put_line(fnd_file.log,'RECEIPT API FAILED @ WHEN OTHERS - 'substr(SQLERRM,1,90));
END;
fnd_file.put_line(fnd_file.log,'l_return_status 'l_return_status);
fnd_file.put_line(fnd_file.log,'RECEIPT ID 'l_cr_id);
IF l_cr_id IS NULL THEN
FOR j IN 1 .. fnd_msg_pub.count_msg
LOOP
BEGIN
fnd_msg_pub.get (p_msg_index => j,
p_encoded => 'F',
p_data => l_msg_data,
p_msg_index_out => l_msg_index_out
);
l_msg_data := l_msg_data '-' SUBSTR(l_msg_data,1,2000);
EXCEPTION WHEN OTHERS THEN
NULL;
END;
END LOOP;
fnd_file.put_line(fnd_file.log,'l_msg_data'l_msg_data);
END IF;

---------------------------------------------

Derive the values from below Quries

SELECT NAME FROM AR_RECEIVABLES_TRX_ALL WHERE RECEIVABLES_TRX_ID=2219

---Receivable Activity p_receivables_trx_id

SELECT NAME FROM AR_RECEIPT_METHODS WHERE RECEIPT_METHOD_ID=2496

---Receipt Method p_receipt_method_id