The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_p(
p_rec_rec IN ra_recur_interim%rowtype,
p_batch_source_id IN ra_batch_sources.batch_source_id%type,
p_trx_number OUT NOCOPY ra_recur_interim.trx_number%type
) IS
l_trx_num_cursor integer;
arp_util.debug('arp_process_recur.insert_p()+');
SELECT MIN(org_id)
INTO l_org_id
FROM ar_system_parameters;
l_trx_str := 'select ra_trx_number_' ||
REPLACE(p_batch_source_id, '-', 'N') ||
l_org_str||
'_s.nextval trx_number ' ||
'from ra_batch_sources ' ||
'where batch_source_id = ' ||
p_batch_source_id ||
' and auto_trx_numbering_flag = ''Y''';
'select ra_trx_number_' ||
REPLACE(p_batch_source_id, '-', 'N') ||
l_org_str||
'_s.nextval trx_number ' ||
'from ra_batch_sources ' ||
'where batch_source_id = ' ||
p_batch_source_id ||
' and auto_trx_numbering_flag = ''Y''',
dbms_sql.v7);
INSERT INTO ra_recur_interim
(
customer_trx_id,
trx_number,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login,
trx_date,
billing_date,
term_due_date,
gl_date,
term_discount_date,
request_id,
doc_sequence_value,
new_customer_trx_id)
VALUES
(
p_rec_rec.customer_trx_id,
l_trx_number,
pg_user_id,
sysdate,
pg_user_id,
sysdate,
nvl(pg_conc_login_id,
pg_login_id),
p_rec_rec.trx_date,
p_rec_rec.billing_date,
p_rec_rec.term_due_date,
p_rec_rec.gl_date,
p_rec_rec.term_discount_date ,
p_rec_rec.request_id,
p_rec_rec.doc_sequence_value,
p_rec_rec.new_customer_trx_id);
arp_util.debug('arp_process_recur.insert_p()-');
arp_util.debug('EXCEPTION: arp_process_recur.insert_p()');