The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_update_allowed VARCHAR2(1) :='N';
SELECT 'Y'
INTO l_tmpl_change
FROM dual
WHERE NOT exists
(SELECT 'Y'
FROM okc_template_usages
WHERE DOCUMENT_TYPE = p_doc_type
AND DOCUMENT_ID = p_doc_id )
AND 0 = (SELECT Count(1)
FROM okc_deliverables
WHERE business_DOCUMENT_TYPE = p_doc_type
AND business_DOCUMENT_ID = p_doc_id
);
SELECT 'D'
INTO l_tmpl_change
FROM dual
WHERE NOT exists
(SELECT 'Y'
FROM okc_template_usages
WHERE DOCUMENT_TYPE = p_doc_type
AND DOCUMENT_ID = p_doc_id )
AND 1 = (SELECT Count(1)
FROM okc_deliverables
WHERE business_DOCUMENT_TYPE = p_doc_type
AND business_DOCUMENT_ID = p_doc_id
);
PO_CONTERMS_UTL_GRP.is_po_update_allowed(
p_api_version => l_api_version,
p_init_msg_list => FND_API.G_FALSE,
p_doc_type => p_doc_type ,
p_header_id => p_doc_id,
p_callout_string => p_validation_string,
p_lock_flag => 'N',
x_update_allowed => l_update_allowed,
x_return_status => x_return_status,
x_msg_data => x_msg_data,
x_msg_count => x_msg_count);
x_update_allowed => l_update_allowed,
x_return_status => x_return_status,
x_msg_data => x_msg_data,
x_msg_count => x_msg_count);
IF l_update_allowed='Y' THEN
return FND_API.G_TRUE;