The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT amount
INTO l_commitment_amount
FROM ra_cust_trx_line_gl_dist
WHERE customer_trx_id = p_commitment_trx_id
AND latest_rec_flag = 'Y'
AND account_class = 'REC';
select 1,
'AR_TW_BAD_CURR_LINE_AMT'
from dual
where rownum = 1
and exists
(select 'invalid precision'
from ra_customer_trx_lines line
where (( decode(l_min_acct_unit, null,
round(extended_amount, l_precision),
round(extended_amount / l_min_acct_unit)
* l_min_acct_unit) - extended_amount <> 0 )
or
( decode(l_min_acct_unit, null,
round(revenue_amount, l_precision),
round(revenue_amount / l_min_acct_unit)
* l_min_acct_unit) - revenue_amount <> 0 ))
and line.customer_trx_id = p_customer_trx_id)
UNION ALL
/* Currency references distribution amounts with invalid precision */
select 2,
'AR_TW_BAD_CURR_DIST_AMT'
from dual
where rownum = 1
and exists
(select 'invalid precision'
from ra_cust_trx_line_gl_dist
where ( decode(l_min_acct_unit, null,
round(amount, l_precision),
round(amount / l_min_acct_unit)
* l_min_acct_unit) - amount <> 0 )
and customer_trx_id = p_customer_trx_id
and (account_set_flag = 'N'
or account_class = 'REC') )
UNION ALL
/* Currency references salesrep amounts with invalid precision */
select 3,
'AR_TW_BAD_CURR_SREP_AMT'
from dual
where rownum = 1
and exists
(select 'invalid precision'
from ra_cust_trx_line_salesreps
where (( decode(l_min_acct_unit, null,
round(revenue_amount_split, l_precision),
round(revenue_amount_split / l_min_acct_unit)
* l_min_acct_unit) - revenue_amount_split <> 0 )
or
( decode(l_min_acct_unit, null,
round(non_revenue_amount_split, l_precision),
round(non_revenue_amount_split / l_min_acct_unit)
* l_min_acct_unit) - non_revenue_amount_split <> 0 ))
and customer_trx_id = p_customer_trx_id
and customer_trx_line_id is not null)
UNION ALL
/* Currency references installment amounts with invalid precision */
select 4,
'AR_TW_BAD_CURR_PS_AMT'
from dual
where rownum = 1
and exists
(select 'invalid precision'
from ar_payment_schedules
where (( decode(l_min_acct_unit, null,
round(amount_due_original, l_precision),
round(amount_due_original / l_min_acct_unit)
* l_min_acct_unit) - amount_due_original <> 0 )
or
( decode(l_min_acct_unit, null,
round(amount_line_items_original, l_precision),
round(amount_line_items_original / l_min_acct_unit)
* l_min_acct_unit) - amount_line_items_original <> 0 )
or
( decode(l_min_acct_unit, null,
round(freight_original, l_precision),
round(freight_original / l_min_acct_unit)
* l_min_acct_unit) - freight_original <> 0 )
or
( decode(l_min_acct_unit, null,
round(tax_original, l_precision),
round(tax_original / l_min_acct_unit)
* l_min_acct_unit) - tax_original <> 0 ))
and customer_trx_id = p_customer_trx_id)
ORDER BY 1;
SELECT arc.creation_method_code
FROM ar_receipt_methods arm,
ar_receipt_classes arc
WHERE arm.receipt_class_id = arc.receipt_class_id
AND arm.receipt_method_id = p_receipt_method_id;
SELECT 'invalid_payment method'
INTO l_temp
FROM ar_receipt_methods arm,
ar_receipt_classes arc
WHERE arm.receipt_method_id = p_receipt_method_id
AND arm.receipt_class_id = arc.receipt_class_id
AND p_trx_date BETWEEN NVL(arm.start_date,p_trx_date)
AND NVL(arm.end_date,p_trx_date)
AND rownum = 1;
SELECT 'invalid_payment method'
INTO l_temp
FROM ar_receipt_methods arm,
ar_receipt_method_accounts arma,
ce_bank_accounts cba,
ce_bank_acct_uses aba,
ar_receipt_classes arc,
ce_bank_branches_v bp
WHERE arm.receipt_method_id = arma.receipt_method_id
AND arm.receipt_class_id = arc.receipt_class_id
AND arma.remit_bank_acct_use_id = aba.bank_acct_use_id
AND aba.bank_account_id = cba.bank_account_id
/* New Condition added Begin*/
AND bp.branch_party_id = cba.bank_branch_id
AND p_trx_date <= NVL(bp.end_date,p_trx_date)
AND (cba.currency_code = p_currency_code or
cba.receipt_multi_currency_flag ='Y') /* New condition */
/* Removing the join condition based on currency code as part of bug fix 5346710
AND (arc.creation_method_code='MANUAL'
or (arc.creation_method_code='AUTOMATIC'
and ( (nvl(arm.payment_channel_code,'*') = 'CREDIT_CARD' )
or
(nvl(arm.payment_channel_code,'*') <> 'CREDIT_CARD'
AND p_currency_code in
(select currency_code from iby_fndcpt_payer_assgn_instr_v
where party_id in (l_pay_to_party_id,l_bill_to_party_id))))))*/
/* New Condition added Ends*/
-- AND aba.set_of_books_id = arp_global.set_of_books_id
AND arm.receipt_method_id = p_receipt_method_id
AND p_trx_date < NVL(cba.end_date,
TO_DATE('01/01/2200','DD/MM/YYYY') )
AND p_trx_date BETWEEN NVL(arm.start_date,
p_trx_date)
AND NVL(arm.end_date,
p_trx_date)
AND p_trx_date BETWEEN NVL(arma.start_date,
p_trx_date)
AND NVL(arma.end_date,
p_trx_date)
AND rownum = 1;