The following lines contain the word 'select', 'insert', 'update' or 'delete':
FUNCTION Delete_Created_Records
RETURN VARCHAR2
IS
i NUMBER;
oe_debug_pub.add('Entering Delete_Created_Records ',1);
DELETE FROM OE_ORDER_LINES_HISTORY
WHERE line_id = l_temp_table(i);
l_temp_table.DELETE;
DELETE FROM OE_PRICE_ADJS_HISTORY
WHERE price_adjustment_id = l_temp_table(i);
l_temp_table.DELETE;
DELETE FROM OE_SALES_CREDIT_HISTORY
WHERE sales_credit_id = l_temp_table(i);
l_temp_table.DELETE;
oe_debug_pub.add('Exiting Delete_Created_Records ',1);
, 'Delete_Created_Records'
);
END Delete_Created_Records;
select version_number into l_version_number from oe_order_headers_all where header_id = p_header_id;
select version_number into l_version_number from oe_order_headers_all where header_id = p_header_id;
SELECT LOCK_CONTROL, VERSION_NUMBER
INTO l_lock_control, l_version_number
FROM OE_BLANKET_HEADERS_ALL
WHERE HEADER_ID = p_header_id;
UPDATE OE_BLANKET_HEADERS_ALL
SET VERSION_NUMBER = l_version_number + 1,
LOCK_CONTROL = l_lock_control + 1
WHERE HEADER_ID = p_header_id;
UPDATE OE_BLANKET_HEADERS_HIST
SET REASON_ID = l_reason_id
WHERE phase_change_flag = l_phase_change_flag
AND version_flag = l_version_flag
AND version_number = OE_Blanket_Util.g_old_header_hist_rec.version_number;
l_return_status := Delete_Created_Records;
UPDATE OE_ORDER_HEADER_HISTORY
SET REASON_ID = l_reason_id
WHERE HEADER_ID = p_header_id
AND phase_change_flag = l_phase_change_flag
AND version_flag = l_version_flag
AND version_number = l_version_number;
SELECT LOCK_CONTROL
INTO l_lock_control
FROM OE_ORDER_HEADERS_ALL
WHERE HEADER_ID = p_header_id;
UPDATE OE_ORDER_HEADERS_ALL
SET VERSION_NUMBER = l_version_number + 1,
LOCK_CONTROL = l_lock_control + 1
WHERE HEADER_ID = p_header_id;
/* update the order cache so that the header can be updated without requery
after creating a new version from line, bug 4523686*/
IF l_debug_level > 0 THEN
oe_debug_pub.add(' Updating oe_order_cache.g_header_rec with version number, lock control ',1);
select version_number into l_version_number from oe_order_headers_all where header_id = l_header_id;
oe_debug_pub.add('Inserting Header History Caused Error ',1);
OR (l_hist_type_code IN ('CANCELLATION','QUANTITY UPDATE')
and OE_ORDER_UTIL.g_line_tbl(i).change_reason is not null
and OE_ORDER_UTIL.g_line_tbl(i).change_reason <> fnd_api.g_miss_char
)
) then
--Apply Reason for audit
OE_Reasons_Util.Apply_Reason(
p_entity_code => 'LINE',
p_entity_id => oe_order_util.g_old_line_tbl(i).line_id,
p_header_id => oe_order_util.g_old_line_tbl(i).header_id,
p_version_number => l_version_number,
p_reason_type => 'CANCEL_CODE',
p_reason_code => OE_ORDER_UTIL.g_line_tbl(i).change_reason,
p_reason_comments => OE_ORDER_UTIL.g_line_tbl(i).change_comments,
x_reason_id => l_reason_id,
x_return_status => l_return_status);
oe_debug_pub.add('Inserting Line Audit History error',1);
oe_debug_pub.add('Inserting Line Audit History error',1);
oe_debug_pub.add('Inserting Line Audit History error',1);
oe_debug_pub.add('Inserting Line Audit History error',1);
oe_debug_pub.add('Inserting Line Audit History error',1);
G_Audit_Line_ID_Tbl.DELETE;
G_Audit_Header_Adj_ID_Tbl.DELETE;
G_Audit_Line_Adj_ID_Tbl.DELETE;
G_Audit_Header_Scredit_ID_Tbl.DELETE;
G_Audit_Line_Scredit_ID_Tbl.DELETE;
G_Audit_Header_Hist_Code := 'UPDATE';