The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT nvl(deferred_revenue_flag, 'N')
INTO l_deferred_flag
FROM ra_rules
WHERE rule_id = p_rule_id;
SELECT pl.customer_trx_line_id, pl.customer_trx_id,
NVL(pl.autorule_complete_flag,'Y') autorule_complete_flag,
pl.accounting_rule_id
FROM ra_customer_trx_lines pl
WHERE interface_line_context = p_order_line.interface_line_context
AND interface_line_attribute1 = p_order_line.interface_line_attribute1
AND interface_line_attribute2 = p_order_line.interface_line_attribute2
AND interface_line_attribute3 = p_order_line.interface_line_attribute3
AND interface_line_attribute4 = p_order_line.interface_line_attribute4
AND interface_line_attribute5 = p_order_line.interface_line_attribute5
AND interface_line_attribute6 = p_order_line.interface_line_attribute6;
SELECT child.customer_trx_line_id,
child.customer_trx_id,
NVL(cline.autorule_complete_flag,'Y') autorule_complete_flag,
cline.accounting_rule_id
FROM ra_customer_trx_lines pline,
ar_deferred_lines child,
ra_customer_trx_lines cline
WHERE pline.customer_trx_line_id = parent_trx_line_id
AND pline.interface_line_context = g_om_context
AND child.parent_line_id = to_number(pline.interface_line_attribute6)
AND child.customer_trx_id = cline.customer_trx_id
AND child.customer_trx_line_id = cline.customer_trx_line_id;
/* This updates parent or target lines */
IF l_target_in_ar = FALSE
THEN
UPDATE AR_INTERFACE_CONTS ic
SET COMPLETED_FLAG = 'Y',
EXPIRATION_DATE = TRUNC(NVL(p_order_line.acceptance_date,
sysdate))
WHERE ic.interface_line_context = g_om_context
AND interface_line_context = p_order_line.interface_line_context
AND interface_line_attribute1 = p_order_line.interface_line_attribute1
AND interface_line_attribute2 = p_order_line.interface_line_attribute2
AND interface_line_attribute3 = p_order_line.interface_line_attribute3
AND interface_line_attribute4 = p_order_line.interface_line_attribute4
AND interface_line_attribute5 = p_order_line.interface_line_attribute5
AND interface_line_attribute6 = p_order_line.interface_line_attribute6
AND EXISTS (SELECT 'acceptance contingency'
FROM ar_deferral_reasons dr
WHERE dr.contingency_id = ic.contingency_id
AND dr.revrec_event_code = 'CUSTOMER_ACCEPTANCE');
arp_debug.debug(' parent interface lines updated : ' || l_rows);
/* This updates any child lines in interface table */
UPDATE AR_INTERFACE_CONTS ic
SET COMPLETED_FLAG = 'Y',
EXPIRATION_DATE = NVL(p_order_line.acceptance_date,
TRUNC(sysdate))
WHERE interface_line_context = g_om_context
AND nvl(completed_flag, 'N') = 'N'
AND EXISTS (SELECT 'child exists'
FROM ra_interface_lines il
WHERE il.parent_line_id =
to_number(p_order_line.interface_line_attribute6)
AND il.interface_line_context = ic.interface_line_context
AND il.interface_line_attribute1 = ic.interface_line_attribute1
AND il.interface_line_attribute2 = ic.interface_line_attribute2
AND il.interface_line_attribute3 = ic.interface_line_attribute3
AND il.interface_line_attribute4 = ic.interface_line_attribute4
AND il.interface_line_attribute5 = ic.interface_line_attribute5
AND il.interface_line_attribute6 = ic.interface_line_attribute6)
AND EXISTS (SELECT 'acceptance contingency'
FROM ar_deferral_reasons dr
WHERE dr.contingency_id = ic.contingency_id
AND dr.revrec_event_code = 'CUSTOMER_ACCEPTANCE');
arp_debug.debug(' child interface lines updated : ' || l_rows);
SELECT wdd.source_line_id order_line_id
FROM wsh_delivery_details wdd,
wsh_delivery_assignments wda
WHERE wdd.delivery_detail_id = wda.delivery_detail_id
AND wda.delivery_id = p_delivery_id;
SELECT customer_trx_line_id, customer_trx_id
FROM ra_customer_trx_lines
WHERE interface_line_context = p_order_line.interface_line_context
AND interface_line_attribute1 = p_order_line.interface_line_attribute1
AND interface_line_attribute1 = p_order_line.interface_line_attribute2
AND interface_line_attribute1 = p_order_line.interface_line_attribute3
AND interface_line_attribute1 = p_order_line.interface_line_attribute4
AND interface_line_attribute1 = p_order_line.interface_line_attribute5
AND interface_line_attribute1 = p_order_line.interface_line_attribute6;