The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE UPDATE_STATUS(
totalRows IN NUMBER,
txn_id_Tab IN JTF_VARCHAR2_TABLE_100,
req_type_Tab IN JTF_VARCHAR2_TABLE_100,
Status_Tab IN JTF_NUMBER_TABLE,
updatedt_Tab IN JTF_DATE_TABLE,
refcode_Tab IN JTF_VARCHAR2_TABLE_100,
o_status OUT NOCOPY VARCHAR2,
o_errcode OUT NOCOPY VARCHAR2,
o_errmsg OUT NOCOPY VARCHAR2,
o_statusindiv_Tab IN OUT NOCOPY JTF_VARCHAR2_TABLE_100
) AS
cnt number := 0;
fnd_file.put_line(FND_FILE.LOG,'AR_ECAPP_PKG.UPDATE_STATUS()+');
arp_standard.debug ('Inserting record into ar_settlement_errors_gt table');
insert into ar_settlement_errors_gt(
txn_id,
req_type,
Status,
updatedt,
refcode)
values(
txn_id_tab(i),
req_type_tab(i),
Status_tab(i),
updatedt_tab(i),
refcode_tab(i)
);
arp_standard.debug ('Number of rows inserted: ' ||sql%rowcount);
arp_standard.debug ('updatedt_Tab(' || cnt || ')' || updatedt_Tab(i)) ;
fnd_file.put_line(FND_FILE.LOG,'AR_ECAPP_PKG.UPDATE_STATUS()-');
fnd_file.put_line(FND_FILE.LOG,'AR_ECAPP_PKG.UPDATE_STATUS() - Exception');
SELECT cr.cash_receipt_id, cr.receipt_number, cr.org_id,
summ.bepcode, summ.bepmessage, summ.instrtype
FROM ar_cash_receipts_all cr, ar_cash_receipt_history_all crh ,
ar_settlement_errors_gt gt, iby_trxn_summaries_all summ,
iby_fndcpt_tx_operations op
WHERE gt.req_type in ('ORAPMTCAPTURE', 'ORAPMTRETURN', 'ORAPMTCREDIT', 'ORAPMTVOID', 'ORAPMTBATCHREQ')
AND summ.transactionid = gt.txn_id
AND summ.reqtype = gt.req_type
AND op.transactionid = summ.transactionid
and cr.payment_trxn_extension_id = op.trxn_extension_id
and cr.cash_receipt_id = crh.cash_receipt_id
and cr.org_id = crh.org_id
and crh.status = 'REMITTED'
and crh.current_record_flag = 'Y'
AND NOT EXISTS
(SELECT 1
FROM ar_settlement_errors_gt gt_in
WHERE gt_in.txn_id = gt.txn_id
AND gt_in.status = 0)
AND summ.rowid IN
(SELECT max(rowid)
FROM iby_trxn_summaries_all summ_in
WHERE summ.transactionid = summ_in.transactionid
AND summ_in.status not in (1, 0))
ORDER by cr.org_id, cr.cash_receipt_id;
SELECT DISTINCT cr.request_id , cr.org_id
BULK COLLECT INTO l_request_id, l_cc_org_id
FROM ar_cash_receipts_all cr,
ar_cash_receipt_history_all crh
WHERE cr.cash_receipt_id = crh.cash_receipt_id
AND cr.org_id = crh.org_id
AND cr.cc_error_flag = 'Y'
AND crh.status = 'CONFIRMED'
AND crh.current_record_flag = 'Y'
AND crh.request_id = fnd_global.conc_request_id;