[Home] [Help]
1: PACKAGE BODY OKC_TERMS_COPY_PVT AS
2: /* $Header: OKCVDCPB.pls 120.4.12000000.2 2007/07/17 17:53:04 rvohra ship $ */
3:
4:
5: ---------------------------------------------------------------------------
8: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
9: ---------------------------------------------------------------------------
10: -- GLOBAL VARIABLES
11: ---------------------------------------------------------------------------
12: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_TERMS_COPY_PVT';
13: G_MODULE CONSTANT VARCHAR2(200) := 'okc.plsql.'||G_PKG_NAME||'.';
14: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
15: G_TEMPLATE_DOC_TYPE CONSTANT okc_bus_doc_types_b.document_type%TYPE := OKC_TERMS_UTIL_GRP.G_TMPL_DOC_TYPE;
16: G_ATTACHED_CONTRACT_SOURCE CONSTANT okc_template_usages.contract_source_code%TYPE := 'ATTACHED';
265:
266: x_return_status := G_RET_STS_SUCCESS;
267:
268: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
269: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Inside OKC_TERMS_COPY_PVT.copy_article_variables');
270: END IF;
271: IF p_get_from_library='Y' THEN
272: -- Bulk collecting
273: OPEN l_get_lib_variables_csr;
715:
716: x_return_status := G_RET_STS_SUCCESS;
717:
718: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
719: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Inside OKC_TERMS_COPY_PVT.copy_articles');
720: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Parameters ');
721: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_target_doc_type : '||p_target_doc_type);
722: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_target_doc_id : '||p_target_doc_id);
723: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_source_doc_type : '||p_source_doc_type);
1469:
1470: x_return_status := G_RET_STS_SUCCESS;
1471:
1472: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1473: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Inside OKC_TERMS_COPY_PVT.copy_sections');
1474: END IF;
1475:
1476: IF p_copy_from_archive ='Y' THEN
1477:
1757:
1758: x_return_status := G_RET_STS_SUCCESS;
1759:
1760: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1761: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Inside OKC_TERMS_COPY_PVT.remove_template_based_articles');
1762: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Parameter List ');
1763: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_doc_type : '||p_doc_type);
1764: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_doc_id : '||p_doc_id);
1765: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_retain_deliverable : '||p_retain_deliverable);
2106:
2107: BEGIN
2108:
2109: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2110: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Entering OKC_TERMS_COPY_PVT.copy_tc ');
2111: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Parameter List ');
2112: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_api_version : '||p_api_version);
2113: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_init_msg_list : '||p_init_msg_list);
2114: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_commit : '||p_commit);
3048:
3049: BEGIN
3050:
3051: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3052: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Entering OKC_TERMS_COPY_PVT.copy_archived_doc ');
3053: END IF;
3054:
3055: -- Standard Start of API savepoint
3056: SAVEPOINT g_copy_archived_doc_pvt;
3315: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3316:
3317: END copy_archived_doc;
3318:
3319: END OKC_TERMS_COPY_PVT;