The following lines contain the word 'select', 'insert', 'update' or 'delete':
IF p_operation In (OE_GLOBALS.G_OPR_CREATE, OE_GLOBALS.G_OPR_UPDATE) THEN
IF G_line_index_Tbl.exists(l_mod_line_id) THEN
l_line_index := G_line_index_tbl(l_mod_line_id).line_index; -- Replaced p_line_id with l_mod_line_id 8656395
ELSIF p_operation = OE_GLOBALS.G_OPR_DELETE THEN
IF G_line_index_tbl.exists(l_mod_line_id) THEN
IF l_debug_level > 0 THEN
oe_debug_pub.add('Line Index value is ' || l_line_index ); -- Replaced p_line_id with l_mod_line_id 8656395
G_line_index_tbl.delete(l_mod_line_id);
PROCEDURE Delete_Changed_Lines_Tbl IS
BEGIN
G_line_index_tbl.delete;
G_line_id_tbl.delete;
G_header_id_tbl.delete;
G_line_type_id_tbl.delete;
G_sold_to_org_id_tbl.delete;
G_invoice_to_org_id_tbl.delete;
G_inventory_item_id_tbl.delete;
G_org_id_tbl.delete;
G_accounting_rule_id_tbl.delete;
G_batch_source_id_tbl.delete;
G_cust_trx_type_id_tbl.delete;
G_invoice_to_customer_tbl.delete;
G_invoice_to_site_tbl.delete;
G_shippable_flag_tbl.delete;
G_accounting_rule_id_tbl.delete;
G_ship_to_customer_tbl.delete;
G_ship_to_org_id_tbl.delete;
G_ship_to_site_tbl.delete;
END Delete_Changed_Lines_Tbl;
SELECT batch_source_id,
name
INTO g_batch_source_id,
g_batch_source_name
FROM ra_batch_sources
WHERE name = p_batch_source_name;
l_inserted_lines NUMBER;
SELECT id, contingency_id, revrec_event_code, expiration_days
FROM fun_rule_bulk_result_gt gt,
ar_deferral_reasons dr
WHERE gt.result_value = dr.contingency_id
AND revrec_event_code in ('INVOICING', 'CUSTOMER_ACCEPTANCE')
ORDER BY id, revrec_event_code DESC, expiration_days, creation_date DESC;
SELECT acct_site.cust_account_id, site.cust_acct_site_id
INTO g_invoice_to_customer_tbl(i),
g_invoice_to_site_tbl(i)
FROM hz_cust_acct_sites_all acct_site,
hz_cust_site_uses_all site
WHERE SITE.SITE_USE_CODE = 'BILL_TO'
AND SITE.CUST_ACCT_SITE_ID = ACCT_SITE.CUST_ACCT_SITE_ID
AND SITE.SITE_USE_ID = g_invoice_to_org_id_tbl(i);
SELECT acct_site.cust_account_id, site.cust_acct_site_id
INTO g_ship_to_customer_tbl(i),
g_ship_to_site_tbl(i)
FROM hz_cust_acct_sites_all acct_site,
hz_cust_site_uses_all site
WHERE SITE.SITE_USE_CODE = 'SHIP_TO'
AND SITE.CUST_ACCT_SITE_ID = ACCT_SITE.CUST_ACCT_SITE_ID
AND SITE.SITE_USE_ID = g_ship_to_org_id_tbl(i);
oe_debug_pub.add('Inserting records in AR_RDR_PARAMETERS_GT ' );
INSERT INTO ar_rdr_parameters_gt
(source_line_id,
batch_source_id,
-- profile_class_id,
cust_account_id,
cust_acct_site_id,
cust_trx_type_id,
-- item_category_id,
inventory_item_id,
org_id,
accounting_rule_id,
-- memo_line_id
ship_to_cust_acct_id,
ship_to_site_use_id
)
SELECT g_line_id_tbl(i),
DECODE(g_batch_source_id_tbl(i),-99, NULL, g_batch_source_id_tbl(i)),
-- profile_class_id,
DECODE(g_invoice_to_customer_tbl(i), -99, NULL, g_invoice_to_customer_tbl(i)) ,
-- DECODE(G_invoice_to_site_tbl(i),-99, NULL, G_invoice_to_site_tbl(i)),
DECODE(g_invoice_to_org_id_tbl(i),-99,NULL,g_invoice_to_org_id_tbl(i)), -- for Bug#8262992
DECODE(g_cust_trx_type_id_tbl(i), -99, NULL, g_cust_trx_type_id_tbl(i)),
-- item_category_id,
DECODE(g_inventory_item_id_tbl(i), -99, NULL, g_inventory_item_id_tbl(i)),
DECODE(g_org_id_tbl(i), -99, NULL, g_org_id_tbl(i)),
DECODE(G_accounting_rule_id_tbl(i), -99, NULL, G_accounting_rule_id_tbl(i)),
-- memo_line_id
--For Bug#8262992
DECODE(g_ship_to_customer_tbl(i), -99, NULL, g_ship_to_customer_tbl(i)) ,
DECODE(g_ship_to_org_id_tbl(i),-99,NULL,g_ship_to_org_id_tbl(i))
FROM dual
WHERE g_line_id_tbl(i) <> -99;
oe_debug_pub.add('done inserting records' );
l_inserted_lines := SQL%ROWCOUNT;
oe_debug_pub.add( 'INSERTED '||l_inserted_lines||' records' , 3 ) ;
IF l_inserted_lines > 0 THEN
--Call AR API
IF l_debug_level > 0 THEN
oe_debug_pub.add('Entering AR_DEFERRAL_REASONS_GRP.default_reasons ' );
UPDATE OE_ORDER_LINES_ALL
SET contingency_id = default_contingencies_rec.contingency_id,
revrec_event_code = default_contingencies_rec.revrec_event_code,
revrec_expiration_days = default_contingencies_rec.expiration_days
WHERE line_id = default_contingencies_rec.id;
Delete_Changed_Lines_Tbl;
SELECT accepted_quantity
,Revrec_signature
,Revrec_signature_date
,Revrec_reference_document
,Revrec_comments
,Revrec_implicit_flag
,accepted_by
,item_type_code
,top_model_line_id
INTO l_accepted_quantity
, l_revrec_signature
, l_revrec_signature_date
, l_revrec_reference_document
, l_revrec_comments
, l_revrec_implicit_flag
, l_accepted_by
, l_item_type_code
, l_top_model_line_id
FROM oe_order_lines_all
WHERE line_id = l_service_reference_line_id;
SELECT Accepted_quantity
,Revrec_signature
,Revrec_signature_date
,Revrec_reference_document
,Revrec_comments
,Revrec_implicit_flag
,accepted_by
,item_type_code
,top_model_line_id
INTO
l_accepted_quantity
, l_revrec_signature
, l_revrec_signature_date
, l_revrec_reference_document
, l_revrec_comments
, l_revrec_implicit_flag
,l_accepted_by
, l_item_type_code
, l_top_model_line_id
FROM oe_order_lines_all
WHERE line_id= l_top_model_line_id;
SELECT contingency_id, revrec_event_code, revrec_expiration_days
INTO x_contingency_id, x_revrec_event_code,x_revrec_expiration_days
FROM oe_order_lines_all
WHERE line_id = p_line_rec.top_model_line_id;
SELECT contingency_id,revrec_event_code,revrec_expiration_days,item_type_code,top_model_line_id
INTO x_contingency_id,x_revrec_event_code,x_revrec_expiration_days,l_item_type_code,l_top_model_line_id
FROM oe_order_lines_all
WHERE line_id= l_service_reference_line_id;
SELECT contingency_id, revrec_event_code, revrec_expiration_days
INTO x_contingency_id, x_revrec_event_code, x_revrec_expiration_days
FROM oe_order_lines_all
WHERE line_id=l_top_model_line_id;
SELECT contingency_id, revrec_event_code
INTO l_contingency_id, l_revrec_event_code
FROM oe_order_lines_all
WHERE line_id = p_line_rec.top_model_line_id;
SELECT contingency_id, revrec_event_code,item_type_code, top_model_line_id
INTO l_contingency_id, l_revrec_event_code,l_item_type_code, l_top_model_line_id
FROM oe_order_lines_all
WHERE line_id= l_service_reference_line_id;
SELECT contingency_id, revrec_event_code
INTO l_contingency_id, l_revrec_event_code
FROM oe_order_lines_all
WHERE line_id=l_top_model_line_id;
SELECT contingency_id, revrec_event_code
INTO l_contingency_id, l_revrec_event_code
FROM oe_order_lines_all
WHERE line_id = p_line_rec.top_model_line_id;
SELECT contingency_id, revrec_event_code,item_type_code, top_model_line_id
INTO l_contingency_id, l_revrec_event_code,l_item_type_code, l_top_model_line_id
FROM oe_order_lines_all
WHERE line_id= l_service_reference_line_id;
SELECT contingency_id, revrec_event_code
INTO l_contingency_id, l_revrec_event_code
FROM oe_order_lines_all
WHERE line_id=l_top_model_line_id;
SELECT count(*)
INTO l_count
FROM oe_order_lines_all
WHERE header_id = p_line_rec.header_id
AND top_model_line_id = p_line_rec.line_id
AND flow_status_code NOT IN ('PRE-BILLING_ACCEPTANCE', 'POST-BILLING_ACCEPTANCE')
AND nvl(open_flag, 'Y') = 'Y';
SELECT accepted_quantity, open_flag
INTO l_accepted_quantity, l_open_flag
FROM oe_order_lines_all
WHERE line_id = p_line_id;