The following lines contain the word 'select', 'insert', 'update' or 'delete':
G_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_DELETED;
G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
SELECT OKC_TERMS_TEMPLATES_ALL_S.NEXTVAL FROM DUAL;
x_last_updated_by OUT NOCOPY NUMBER,
x_last_update_login OUT NOCOPY NUMBER,
x_last_update_date OUT NOCOPY DATE,
x_translated_from_tmpl_id OUT NOCOPY NUMBER,
x_language OUT NOCOPY VARCHAR2
) RETURN VARCHAR2 IS
l_api_name CONSTANT VARCHAR2(30) := 'get_rec';
SELECT
TEMPLATE_NAME,
WORKING_COPY_FLAG,
INTENT,
STATUS_CODE,
START_DATE,
END_DATE,
GLOBAL_FLAG,
PARENT_TEMPLATE_ID,
PRINT_TEMPLATE_ID,
CONTRACT_EXPERT_ENABLED,
XPRT_CLAUSE_MANDATORY_FLAG, -- Added for 11.5.10+ : Contract Expert Changes
XPRT_SCN_CODE, -- Added for 11..510+ : Contract Expert Changes
TEMPLATE_MODEL_ID,
INSTRUCTION_TEXT,
TMPL_NUMBERING_SCHEME,
DESCRIPTION,
APPROVAL_WF_KEY,
CZ_EXPORT_WF_KEY,
ORIG_SYSTEM_REFERENCE_CODE,
ORIG_SYSTEM_REFERENCE_ID1,
ORIG_SYSTEM_REFERENCE_ID2,
ORG_ID,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
--MLS for templates
TRANSLATED_FROM_TMPL_ID,
LANGUAGE
FROM OKC_TERMS_TEMPLATES_ALL t
WHERE t.TEMPLATE_ID = cp_template_id;
x_last_updated_by,
x_last_update_login,
x_last_update_date,
--MLS for templates
x_translated_from_tmpl_id,
x_language ;
l_last_updated_by OKC_TERMS_TEMPLATES_ALL.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_TERMS_TEMPLATES_ALL.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_TERMS_TEMPLATES_ALL.LAST_UPDATE_DATE%TYPE;
x_last_updated_by => l_last_updated_by,
x_last_update_login => l_last_update_login,
x_last_update_date => l_last_update_date,
x_translated_from_tmpl_id => x_translated_from_tmpl_id,
x_language => x_language );
SELECT oracle_username
FROM fnd_oracle_userid
WHERE read_only_flag = 'U';
SELECT 1
FROM all_views
WHERE view_name like 'XDO_TEMPLATES_VL'
AND owner = pc_user;
SELECT '!'
FROM okc_terms_templates_all
WHERE TEMPLATE_ID = p_parent_template_id;
SELECT '!'
FROM xdo_templates_b
WHERE TEMPLATE_ID = p_print_template_id;
/************* Removed as Expert will validate and update templates
CURSOR l_template_model_id_csr is
SELECT '!'
FROM cz_ps_nodes
WHERE PS_NODE_ID = p_template_model_id;
SELECT '!'
FROM hr_operating_units
WHERE ORGANIZATION_ID = p_org_id;
SELECT status_code
FROM OKC_TERMS_TEMPLATES_ALL
WHERE template_id = pc_template_id;
l_sql_stmt := 'SELECT template_id,start_date,end_date FROM xdo_templates_b WHERE template_id = :1';
/****************Removed as COntracts Expert will validate and update template
IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2200: - attribute TEMPLATE_MODEL_ID ');
/****************Removed as COntracts Expert will validate and update template
IF l_template_model_id_csr%ISOPEN THEN
CLOSE l_template_model_id_csr;
SELECT '!'
FROM okc_terms_templates_all
WHERE template_name = p_template_name
AND nvl(working_copy_flag,'N') = nvl(p_working_copy_flag,'N')
AND ((p_template_id IS NULL) OR (p_template_id <> template_id))
AND ORG_ID = mo_global.get_current_org_id();
SELECT '!'
FROM okc_terms_templates_all
WHERE translated_from_tmpl_id = p_template_id
UNION ALL
SELECT '!'
FROM okc_terms_templates_all
WHERE translated_from_tmpl_id = p_parent_template_id ;
SELECT '!', template_name
FROM okc_terms_templates_all
WHERE translated_from_tmpl_id= p_parent_template_id
AND language = p_language;
SELECT '!', template_name
FROM okc_terms_templates_all
WHERE translated_from_tmpl_id= p_template_id
AND language = p_language;
SELECT '!', tta.template_name
FROM okc_terms_templates_all tta
WHERE tta.template_id = p_translated_from_tmpl_id
AND language = p_language
UNION ALL
SELECT '!', tta.template_name
FROM okc_terms_templates_all tta
WHERE tta.parent_template_id = p_translated_from_tmpl_id
AND language = p_language
UNION ALL
SELECT '!', tta.template_name
FROM okc_terms_templates_all tta
WHERE tta.translated_from_tmpl_id = p_translated_from_tmpl_id
AND tta.language = p_language
AND tta.template_id <> p_template_id
AND tta.template_id <> nvl(p_parent_template_id,0)
AND not exists
(SELECT 1
FROM okc_terms_templates_all tta3
WHERE tta3.template_id = tta.template_id
AND tta3.parent_template_id = p_template_id) ;
l_last_updated_by OKC_TERMS_TEMPLATES_ALL.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_TERMS_TEMPLATES_ALL.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_TERMS_TEMPLATES_ALL.LAST_UPDATE_DATE%TYPE;
FUNCTION Insert_Row(
p_template_name IN VARCHAR2,
p_template_id IN NUMBER,
p_working_copy_flag IN VARCHAR2,
p_intent IN VARCHAR2,
p_status_code IN VARCHAR2,
p_start_date IN DATE,
p_end_date IN DATE,
p_global_flag IN VARCHAR2,
p_parent_template_id IN NUMBER,
p_print_template_id IN NUMBER,
p_contract_expert_enabled IN VARCHAR2,
p_xprt_clause_mandatory_flag IN VARCHAR2, -- Added for 11.5.10+: Contract Expert Changes
p_xprt_scn_code IN VARCHAR2, -- Added for 11.5.10+: Contract Expert Changes
p_template_model_id IN NUMBER,
p_instruction_text IN VARCHAR2,
p_tmpl_numbering_scheme IN NUMBER,
p_description IN VARCHAR2,
p_approval_wf_key IN VARCHAR2,
p_cz_export_wf_key IN VARCHAR2,
p_orig_system_reference_code IN VARCHAR2,
p_orig_system_reference_id1 IN NUMBER,
p_orig_system_reference_id2 IN NUMBER,
p_org_id IN NUMBER,
p_attribute_category IN VARCHAR2,
p_attribute1 IN VARCHAR2,
p_attribute2 IN VARCHAR2,
p_attribute3 IN VARCHAR2,
p_attribute4 IN VARCHAR2,
p_attribute5 IN VARCHAR2,
p_attribute6 IN VARCHAR2,
p_attribute7 IN VARCHAR2,
p_attribute8 IN VARCHAR2,
p_attribute9 IN VARCHAR2,
p_attribute10 IN VARCHAR2,
p_attribute11 IN VARCHAR2,
p_attribute12 IN VARCHAR2,
p_attribute13 IN VARCHAR2,
p_attribute14 IN VARCHAR2,
p_attribute15 IN VARCHAR2,
p_object_version_number IN NUMBER,
p_created_by IN NUMBER,
p_creation_date IN DATE,
p_last_updated_by IN NUMBER,
p_last_update_login IN NUMBER,
p_last_update_date IN DATE,
p_translated_from_tmpl_id IN NUMBER,
p_language IN VARCHAR2
) RETURN VARCHAR2 IS
l_api_name CONSTANT VARCHAR2(30) := 'insert_row';
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3600: Entered Insert_Row function');
INSERT INTO OKC_TERMS_TEMPLATES_ALL(
TEMPLATE_NAME,
TEMPLATE_ID,
WORKING_COPY_FLAG,
INTENT,
STATUS_CODE,
START_DATE,
END_DATE,
GLOBAL_FLAG,
PARENT_TEMPLATE_ID,
PRINT_TEMPLATE_ID,
CONTRACT_EXPERT_ENABLED,
XPRT_CLAUSE_MANDATORY_FLAG, -- Added for 11.5.10+: Contract Expert Changes
XPRT_SCN_CODE, -- Added for 11.5.10+: Contract Expert Changes
TEMPLATE_MODEL_ID,
INSTRUCTION_TEXT,
TMPL_NUMBERING_SCHEME,
DESCRIPTION,
APPROVAL_WF_KEY,
CZ_EXPORT_WF_KEY,
ORIG_SYSTEM_REFERENCE_CODE,
ORIG_SYSTEM_REFERENCE_ID1,
ORIG_SYSTEM_REFERENCE_ID2,
ORG_ID,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
--MLS for templates
TRANSLATED_FROM_TMPL_ID,
LANGUAGE )
VALUES (
p_template_name,
p_template_id,
nvl(p_working_copy_flag,'N'),
p_intent,
p_status_code,
TRUNC(p_start_date),
TRUNC(p_end_date),
nvl(p_global_flag,'N'),
p_parent_template_id,
p_print_template_id,
nvl(p_contract_expert_enabled,'N'),
nvl(p_xprt_clause_mandatory_flag,'N'), -- Added for 11.5.10+ : Contract Expert Changes
p_xprt_scn_code, -- Added for 11.5.10+: Contract Expert Changes
p_template_model_id,
p_instruction_text,
p_tmpl_numbering_scheme,
p_description,
p_approval_wf_key,
p_cz_export_wf_key,
p_orig_system_reference_code,
p_orig_system_reference_id1,
p_orig_system_reference_id2,
p_org_id,
p_attribute_category,
p_attribute1,
p_attribute2,
p_attribute3,
p_attribute4,
p_attribute5,
p_attribute6,
p_attribute7,
p_attribute8,
p_attribute9,
p_attribute10,
p_attribute11,
p_attribute12,
p_attribute13,
p_attribute14,
p_attribute15,
p_object_version_number,
p_created_by,
p_creation_date,
p_last_updated_by,
p_last_update_login,
p_last_update_date,
--MLS for templates
p_translated_from_tmpl_id,
p_language );
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3700: Leaving Insert_Row');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3800: Leaving Insert_Row:OTHERS Exception');
END Insert_Row;
PROCEDURE Insert_Row(
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
p_template_name IN VARCHAR2,
p_template_id IN NUMBER,
p_working_copy_flag IN VARCHAR2,
p_intent IN VARCHAR2,
p_status_code IN VARCHAR2,
p_start_date IN DATE,
p_end_date IN DATE,
p_global_flag IN VARCHAR2,
p_parent_template_id IN NUMBER,
p_print_template_id IN NUMBER,
p_contract_expert_enabled IN VARCHAR2,
p_xprt_clause_mandatory_flag IN VARCHAR2, -- Added for 11.5.10+ : Contract Expert Changes
p_xprt_scn_code IN VARCHAR2, -- Added for 11.5.10+ : Contract Expert Changes
p_template_model_id IN NUMBER,
p_instruction_text IN VARCHAR2,
p_tmpl_numbering_scheme IN NUMBER,
p_description IN VARCHAR2,
p_approval_wf_key IN VARCHAR2 := NULL,
p_cz_export_wf_key IN VARCHAR2 := NULL,
p_orig_system_reference_code IN VARCHAR2,
p_orig_system_reference_id1 IN NUMBER,
p_orig_system_reference_id2 IN NUMBER,
p_org_id IN NUMBER,
p_attribute_category IN VARCHAR2 := NULL,
p_attribute1 IN VARCHAR2 := NULL,
p_attribute2 IN VARCHAR2 := NULL,
p_attribute3 IN VARCHAR2 := NULL,
p_attribute4 IN VARCHAR2 := NULL,
p_attribute5 IN VARCHAR2 := NULL,
p_attribute6 IN VARCHAR2 := NULL,
p_attribute7 IN VARCHAR2 := NULL,
p_attribute8 IN VARCHAR2 := NULL,
p_attribute9 IN VARCHAR2 := NULL,
p_attribute10 IN VARCHAR2 := NULL,
p_attribute11 IN VARCHAR2 := NULL,
p_attribute12 IN VARCHAR2 := NULL,
p_attribute13 IN VARCHAR2 := NULL,
p_attribute14 IN VARCHAR2 := NULL,
p_attribute15 IN VARCHAR2 := NULL,
p_translated_from_tmpl_id IN NUMBER,
p_language IN VARCHAR2,
x_template_id OUT NOCOPY NUMBER
) IS
l_api_name CONSTANT VARCHAR2(30) := 'insert_row';
l_last_updated_by OKC_TERMS_TEMPLATES_ALL.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_TERMS_TEMPLATES_ALL.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_TERMS_TEMPLATES_ALL.LAST_UPDATE_DATE%TYPE;
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4200: Entered Insert_Row');
l_last_update_date := l_creation_date;
l_last_updated_by := l_created_by;
l_last_update_login := Fnd_Global.Login_Id;
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4300: Call the internal Insert_Row for Base Table');
x_return_status := Insert_Row(
p_template_id => x_template_id,
p_template_name => p_template_name,
p_working_copy_flag => p_working_copy_flag,
p_intent => p_intent,
p_status_code => p_status_code,
p_start_date => p_start_date,
p_end_date => p_end_date,
p_global_flag => p_global_flag,
p_parent_template_id => p_parent_template_id,
p_print_template_id => p_print_template_id,
p_contract_expert_enabled => p_contract_expert_enabled,
p_xprt_clause_mandatory_flag => p_xprt_clause_mandatory_flag, -- Added for 11.5.10+ : Changes
p_xprt_scn_code => p_xprt_scn_code, -- Added for 11.5.10+ : Changes
p_template_model_id => p_template_model_id,
p_instruction_text => p_instruction_text,
p_tmpl_numbering_scheme => p_tmpl_numbering_scheme,
p_description => p_description,
p_approval_wf_key => p_approval_wf_key,
p_cz_export_wf_key => p_cz_export_wf_key,
p_orig_system_reference_code => p_orig_system_reference_code,
p_orig_system_reference_id1 => p_orig_system_reference_id1,
p_orig_system_reference_id2 => p_orig_system_reference_id2,
p_org_id => p_org_id,
p_attribute_category => p_attribute_category,
p_attribute1 => p_attribute1,
p_attribute2 => p_attribute2,
p_attribute3 => p_attribute3,
p_attribute4 => p_attribute4,
p_attribute5 => p_attribute5,
p_attribute6 => p_attribute6,
p_attribute7 => p_attribute7,
p_attribute8 => p_attribute8,
p_attribute9 => p_attribute9,
p_attribute10 => p_attribute10,
p_attribute11 => p_attribute11,
p_attribute12 => p_attribute12,
p_attribute13 => p_attribute13,
p_attribute14 => p_attribute14,
p_attribute15 => p_attribute15,
p_object_version_number => l_object_version_number,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_last_update_login => l_last_update_login,
p_last_update_date => l_last_update_date,
p_translated_from_tmpl_id => p_translated_from_tmpl_id,
p_language => p_language
);
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4500: Leaving Insert_Row');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4800: Leaving Insert_Row because of EXCEPTION: '||sqlerrm);
END Insert_Row;
SELECT object_version_number
FROM OKC_TERMS_TEMPLATES_ALL
WHERE TEMPLATE_ID = cp_template_id
AND ( object_version_number = cp_object_version_number
OR cp_object_version_number IS NULL)
FOR UPDATE OF object_version_number NOWAIT;
SELECT object_version_number
FROM OKC_TERMS_TEMPLATES_ALL
WHERE TEMPLATE_ID = cp_template_id;
Okc_Api.Set_Message(G_FND_APP,G_RECORD_DELETED);
Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
FUNCTION Update_Row(
p_template_name IN VARCHAR2,
p_template_id IN NUMBER,
p_working_copy_flag IN VARCHAR2,
p_intent IN VARCHAR2,
p_status_code IN VARCHAR2,
p_start_date IN DATE,
p_end_date IN DATE,
p_global_flag IN VARCHAR2,
p_parent_template_id IN NUMBER,
p_print_template_id IN NUMBER,
p_contract_expert_enabled IN VARCHAR2,
p_xprt_clause_mandatory_flag IN VARCHAR2, -- Added for 11.5.10+: Contract Expert Changes
p_xprt_scn_code IN VARCHAR2, -- Added for 11.5.10+: Contract Expert Changes
p_template_model_id IN NUMBER,
p_instruction_text IN VARCHAR2,
p_tmpl_numbering_scheme IN NUMBER,
p_description IN VARCHAR2,
p_approval_wf_key IN VARCHAR2,
p_cz_export_wf_key IN VARCHAR2,
p_orig_system_reference_code IN VARCHAR2,
p_orig_system_reference_id1 IN NUMBER,
p_orig_system_reference_id2 IN NUMBER,
p_org_id IN NUMBER,
p_attribute_category IN VARCHAR2,
p_attribute1 IN VARCHAR2,
p_attribute2 IN VARCHAR2,
p_attribute3 IN VARCHAR2,
p_attribute4 IN VARCHAR2,
p_attribute5 IN VARCHAR2,
p_attribute6 IN VARCHAR2,
p_attribute7 IN VARCHAR2,
p_attribute8 IN VARCHAR2,
p_attribute9 IN VARCHAR2,
p_attribute10 IN VARCHAR2,
p_attribute11 IN VARCHAR2,
p_attribute12 IN VARCHAR2,
p_attribute13 IN VARCHAR2,
p_attribute14 IN VARCHAR2,
p_attribute15 IN VARCHAR2,
p_object_version_number IN NUMBER,
p_created_by IN NUMBER,
p_creation_date IN DATE,
p_last_updated_by IN NUMBER,
p_last_update_login IN NUMBER,
p_last_update_date IN DATE,
p_translated_from_tmpl_id IN NUMBER,
p_language IN VARCHAR2
) RETURN VARCHAR2 IS
l_api_name CONSTANT VARCHAR2(30) := 'update_row';
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6400: Entered Update_Row');
UPDATE OKC_TERMS_TEMPLATES_ALL
SET TEMPLATE_NAME = p_template_name,
WORKING_COPY_FLAG = NVL(p_working_copy_flag,'N'),
INTENT = p_intent,
STATUS_CODE = p_status_code,
START_DATE = TRUNC(p_start_date),
END_DATE = TRUNC(p_end_date),
GLOBAL_FLAG = NVL(p_global_flag,'N'),
PARENT_TEMPLATE_ID = p_parent_template_id,
PRINT_TEMPLATE_ID = p_print_template_id,
CONTRACT_EXPERT_ENABLED = NVL(p_contract_expert_enabled,'N'),
XPRT_CLAUSE_MANDATORY_FLAG = NVL(p_xprt_clause_mandatory_flag,'N'), -- Added for 11.5.10+: Contract Expert Changes
XPRT_SCN_CODE = p_xprt_scn_code, -- Added for 11.5.10+: Contract Expert Changes
TEMPLATE_MODEL_ID = p_template_model_id,
INSTRUCTION_TEXT = p_instruction_text,
TMPL_NUMBERING_SCHEME = p_tmpl_numbering_scheme,
DESCRIPTION = p_description,
APPROVAL_WF_KEY = p_approval_wf_key,
CZ_EXPORT_WF_KEY = p_cz_export_wf_key,
ORIG_SYSTEM_REFERENCE_CODE = p_orig_system_reference_code,
ORIG_SYSTEM_REFERENCE_ID1 = p_orig_system_reference_id1,
ORIG_SYSTEM_REFERENCE_ID2 = p_orig_system_reference_id2,
ORG_ID = p_org_id,
ATTRIBUTE_CATEGORY = p_attribute_category,
ATTRIBUTE1 = p_attribute1,
ATTRIBUTE2 = p_attribute2,
ATTRIBUTE3 = p_attribute3,
ATTRIBUTE4 = p_attribute4,
ATTRIBUTE5 = p_attribute5,
ATTRIBUTE6 = p_attribute6,
ATTRIBUTE7 = p_attribute7,
ATTRIBUTE8 = p_attribute8,
ATTRIBUTE9 = p_attribute9,
ATTRIBUTE10 = p_attribute10,
ATTRIBUTE11 = p_attribute11,
ATTRIBUTE12 = p_attribute12,
ATTRIBUTE13 = p_attribute13,
ATTRIBUTE14 = p_attribute14,
ATTRIBUTE15 = p_attribute15,
OBJECT_VERSION_NUMBER = p_object_version_number,
LAST_UPDATED_BY = p_last_updated_by,
LAST_UPDATE_LOGIN = p_last_update_login,
LAST_UPDATE_DATE = p_last_update_date,
--MLS for templates
TRANSLATED_FROM_TMPL_ID = p_translated_from_tmpl_id,
LANGUAGE = p_language
WHERE TEMPLATE_ID = p_template_id;
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6500: Leaving Update_Row');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6600: Leaving Update_Row because of EXCEPTION: '||sqlerrm);
END Update_Row;
PROCEDURE Update_Row(
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
p_template_name IN VARCHAR2,
p_template_id IN NUMBER,
p_working_copy_flag IN VARCHAR2,
p_intent IN VARCHAR2,
p_status_code IN VARCHAR2,
p_start_date IN DATE,
p_end_date IN DATE,
p_global_flag IN VARCHAR2,
p_parent_template_id IN NUMBER,
p_print_template_id IN NUMBER,
p_contract_expert_enabled IN VARCHAR2,
p_xprt_clause_mandatory_flag IN VARCHAR2, -- Added for 11.5.10+: Contract Expert Changes
p_xprt_scn_code IN VARCHAR2, -- Added for 11.5.10+: Contract Expert Changes
p_template_model_id IN NUMBER,
p_instruction_text IN VARCHAR2,
p_tmpl_numbering_scheme IN NUMBER,
p_description IN VARCHAR2,
p_approval_wf_key IN VARCHAR2 := NULL,
p_cz_export_wf_key IN VARCHAR2 := NULL,
p_orig_system_reference_code IN VARCHAR2,
p_orig_system_reference_id1 IN NUMBER,
p_orig_system_reference_id2 IN NUMBER,
p_org_id IN NUMBER := NULL,
p_attribute_category IN VARCHAR2 := NULL,
p_attribute1 IN VARCHAR2 := NULL,
p_attribute2 IN VARCHAR2 := NULL,
p_attribute3 IN VARCHAR2 := NULL,
p_attribute4 IN VARCHAR2 := NULL,
p_attribute5 IN VARCHAR2 := NULL,
p_attribute6 IN VARCHAR2 := NULL,
p_attribute7 IN VARCHAR2 := NULL,
p_attribute8 IN VARCHAR2 := NULL,
p_attribute9 IN VARCHAR2 := NULL,
p_attribute10 IN VARCHAR2 := NULL,
p_attribute11 IN VARCHAR2 := NULL,
p_attribute12 IN VARCHAR2 := NULL,
p_attribute13 IN VARCHAR2 := NULL,
p_attribute14 IN VARCHAR2 := NULL,
p_attribute15 IN VARCHAR2 := NULL,
p_translated_from_tmpl_id IN NUMBER,
p_language IN VARCHAR2,
p_object_version_number IN NUMBER
) IS
l_api_name CONSTANT VARCHAR2(30) := 'update_row';
l_last_updated_by OKC_TERMS_TEMPLATES_ALL.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_TERMS_TEMPLATES_ALL.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_TERMS_TEMPLATES_ALL.LAST_UPDATE_DATE%TYPE;
SELECT contract_expert_enabled
FROM OKC_TERMS_TEMPLATES_ALL
WHERE template_id = p_template_id;
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7000: Entered Update_Row');
OKC_XPRT_TMPL_RULE_ASSNS_PVT.delete_template_rule_assns
(
p_api_version => 1.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_template_id => p_template_id,
x_return_status => x_return_status,
x_msg_data => l_msg_data,
x_msg_count => l_msg_count
) ;
l_last_update_date := SYSDATE;
l_last_updated_by := FND_GLOBAL.USER_ID;
l_last_update_login := FND_GLOBAL.LOGIN_ID;
x_return_status := Update_Row(
p_template_id => p_template_id,
p_template_name => l_template_name,
p_working_copy_flag => l_working_copy_flag,
p_intent => l_intent,
p_status_code => l_status_code,
p_start_date => l_start_date,
p_end_date => l_end_date,
p_global_flag => l_global_flag,
p_parent_template_id => l_parent_template_id,
p_print_template_id => l_print_template_id,
p_contract_expert_enabled => l_contract_expert_enabled,
p_xprt_clause_mandatory_flag => l_xprt_clause_mandatory_flag, -- Added for 11.5.10+: Contract Expert Changes
p_xprt_scn_code => l_xprt_scn_code, -- Added for 11.5.10+: Contract Expert Changes
p_template_model_id => l_template_model_id,
p_instruction_text => l_instruction_text,
p_tmpl_numbering_scheme => l_tmpl_numbering_scheme,
p_description => l_description,
p_approval_wf_key => l_approval_wf_key,
p_cz_export_wf_key => l_cz_export_wf_key,
p_orig_system_reference_code => l_orig_system_reference_code,
p_orig_system_reference_id1 => l_orig_system_reference_id1,
p_orig_system_reference_id2 => l_orig_system_reference_id2,
p_org_id => l_org_id,
p_attribute_category => l_attribute_category,
p_attribute1 => l_attribute1,
p_attribute2 => l_attribute2,
p_attribute3 => l_attribute3,
p_attribute4 => l_attribute4,
p_attribute5 => l_attribute5,
p_attribute6 => l_attribute6,
p_attribute7 => l_attribute7,
p_attribute8 => l_attribute8,
p_attribute9 => l_attribute9,
p_attribute10 => l_attribute10,
p_attribute11 => l_attribute11,
p_attribute12 => l_attribute12,
p_attribute13 => l_attribute13,
p_attribute14 => l_attribute14,
p_attribute15 => l_attribute15,
p_object_version_number => l_object_version_number,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_last_update_login => l_last_update_login,
p_last_update_date => l_last_update_date,
p_translated_from_tmpl_id => l_translated_from_tmpl_id,
p_language => l_language
);
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7800: Leaving Update_Row');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8100: Leaving Update_Row because of EXCEPTION: '||sqlerrm);
END Update_Row;
FUNCTION Delete_Row(
p_template_id IN NUMBER
) RETURN VARCHAR2 IS
l_api_name CONSTANT VARCHAR2(30) := 'delete_row';
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8200: Entered Delete_Row');
DELETE FROM OKC_TERMS_TEMPLATES_ALL WHERE TEMPLATE_ID = p_TEMPLATE_ID;
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8300: Leaving Delete_Row');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8400: Leaving Delete_Row because of EXCEPTION: '||sqlerrm);
END Delete_Row;
PROCEDURE Delete_Row(
x_return_status OUT NOCOPY VARCHAR2,
p_template_id IN NUMBER,
p_object_version_number IN NUMBER,
p_delete_parent_yn IN VARCHAR2 := 'N' --If set to 'Y', delete template without checking for translated templates.
) IS
l_api_name CONSTANT VARCHAR2(30) := 'B_Delete_Row';
SELECT template_model_id, status_code
FROM OKC_TERMS_TEMPLATES_ALL
WHERE template_id = p_template_id;
SELECT orig_sys_ref
FROM cz_src_devl_projects_v
WHERE product_key='510:'||p_template_id ;
SELECT '!' , parent.template_name
FROM okc_terms_templates_all translated,
okc_terms_templates_all parent
WHERE translated.translated_from_tmpl_id = p_template_id
AND parent.template_id = translated.translated_from_tmpl_id;
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8800: Entered Delete_Row');
IF (l_dummy_var = '!' AND p_delete_parent_yn = 'N') THEN
IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8910: - Error:Template has translated references and cannot be deleted');
x_return_status := Delete_Row( p_template_id => p_template_id );
/* OKC_XPRT_CZ_INT_PVT.delete_model
(p_api_version => 1.0,
p_model_id => l_template_model_id,
p_orig_sys_ref => l_orig_sys_ref,
x_return_status => x_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data); */
END IF; -- delete model successful
/* DELETE FROM okc_exprt_import_refs
WHERE object_type_code = 'TEMPLATEMODEL'
AND model_id = l_template_model_id ; */
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'9300: Leaving Delete_Row');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9600: Leaving Delete_Row because of EXCEPTION: '||sqlerrm);
END Delete_Row;
PROCEDURE Update_Template_Id(
x_return_status OUT NOCOPY VARCHAR2,
p_old_template_id IN NUMBER,
p_new_template_id IN NUMBER
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Template_Id';
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'9700: Entered Update_Template_Id');
UPDATE OKC_TERMS_TEMPLATES_ALL
SET TEMPLATE_ID = p_new_template_id,
WORKING_COPY_FLAG = 'N',
PARENT_TEMPLATE_ID = NULL,
STATUS_CODE = 'APPROVED',
OBJECT_VERSION_NUMBER = OBJECT_VERSION_NUMBER+1,
LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID,
LAST_UPDATE_DATE = Sysdate
WHERE template_id= p_old_template_id;
FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'9910: Leaving Update_Template_Id');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9920: Leaving Update_Template_Id: G_EXCEPTION_UNEXPECTED_ERROR Exception');
FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9930: Leaving Update_Template_Id because of EXCEPTION: '||sqlerrm);
END Update_Template_Id;