64: FROM okc_k_art_variables var
65: WHERE var.cat_id = p_cat_id
66: AND var.variable_code = p_variable_code;
67:
68: l_standard_flag VARCHAR2(1);
69: l_id1 VARCHAR2(2000);
70: l_var_value_id okc_k_art_variables.variable_value_id%TYPE := NULL;
71: l_var_value okc_k_art_variables.variable_value%TYPE := NULL;
72:
96: p_variable_code IN VARCHAR2)
97: RETURN VARCHAR2 IS
98: l_api_name CONSTANT VARCHAR2(30) := 'get_variable_value_id';
99: CURSOR csr_target_dtls IS
100: SELECT NVL(standard_yn,'N') standard_flag,
101: kart.article_version_id,
102: kart.ORIG_SYSTEM_REFERENCE_ID1
103: FROM okc_articles_all lib,
104: okc_k_articles_b kart
115: FROM OKC_K_ART_VARIABLES VAR
116: WHERE VAR.CAT_ID = p_cat_id
117: AND VAR.VARIABLE_CODE = p_variable_code;
118:
119: l_standard_flag VARCHAR2(1);
120: l_ORIG_SYSTEM_REFERENCE_ID1 VARCHAR2(1000);
121: l_target_article_version_id NUMBER;
122: l_source_article_version_id NUMBER;
123: l_source_value_id VARCHAR2(1000):= NULL;
123: l_source_value_id VARCHAR2(1000):= NULL;
124:
125: BEGIN
126: OPEN csr_target_dtls;
127: FETCH csr_target_dtls INTO l_standard_flag, l_target_article_version_id, l_ORIG_SYSTEM_REFERENCE_ID1;
128: CLOSE csr_target_dtls;
129:
130:
131: -- bug 3369336
129:
130:
131: -- bug 3369336
132: -- copy variable values if the variable exists in the target doc article
133: -- without comparing version or if it was non standard (bug 3397895 )
134:
135: OPEN csr_source_value_id(p_cat_id=>l_ORIG_SYSTEM_REFERENCE_ID1,p_variable_code=>p_variable_code);
136: FETCH csr_source_value_id INTO l_source_value_id;
137: CLOSE csr_source_value_id;
167: FROM okc_k_art_variables var
168: WHERE var.cat_id = p_cat_id
169: AND var.variable_code = p_variable_code;
170:
171: l_standard_flag VARCHAR2(1);
172: l_id1 VARCHAR2(2000);
173: l_var_value_id okc_k_art_variables.variable_value_id%TYPE := NULL;
174: l_var_value okc_k_art_variables.variable_value%TYPE := NULL;
175:
205: p_variable_code IN VARCHAR2)
206: RETURN VARCHAR2 IS
207: l_api_name CONSTANT VARCHAR2(30) := 'get_variable_value';
208: CURSOR csr_target_dtls IS
209: SELECT NVL(standard_yn,'N') standard_flag,
210: kart.article_version_id,
211: kart.ORIG_SYSTEM_REFERENCE_ID1
212: FROM okc_articles_all lib,
213: okc_k_articles_b kart
224: FROM OKC_K_ART_VARIABLES VAR
225: WHERE VAR.CAT_ID = p_cat_id
226: AND VAR.VARIABLE_CODE = p_variable_code;
227:
228: l_standard_flag VARCHAR2(1);
229: l_ORIG_SYSTEM_REFERENCE_ID1 VARCHAR2(1000);
230: l_target_article_version_id NUMBER;
231: l_source_article_version_id NUMBER;
232: l_source_value VARCHAR2(2000):= NULL;
232: l_source_value VARCHAR2(2000):= NULL;
233:
234: BEGIN
235: OPEN csr_target_dtls;
236: FETCH csr_target_dtls INTO l_standard_flag, l_target_article_version_id, l_ORIG_SYSTEM_REFERENCE_ID1;
237: CLOSE csr_target_dtls;
238:
239: -- bug 3369336
240: -- copy variable values if the variable exists in the target doc article
237: CLOSE csr_target_dtls;
238:
239: -- bug 3369336
240: -- copy variable values if the variable exists in the target doc article
241: -- without comparing version or if it was non standard (bug 3397895 )
242:
243: OPEN csr_source_value(p_cat_id=>l_ORIG_SYSTEM_REFERENCE_ID1,p_variable_code=>p_variable_code);
244: FETCH csr_source_value INTO l_source_value;
245: CLOSE csr_source_value;
634: ,p_retain_lock_terms_yn IN VARCHAR2 DEFAULT 'N') IS
635: l_api_name CONSTANT VARCHAR2(30) := 'copy_articles';
636: l_prov_allowed VARCHAR2(1) ;
637: l_discard Boolean;
638: l_standard_yn VARCHAR2(1) ;
639: l_global_yn VARCHAR2(1) ;
640: l_org_id OKC_TERMS_TEMPLATES_ALL.ORG_ID%TYPE;
641: l_art_title OKC_ARTICLES_ALL.ARTICLE_TITLE%TYPE;
642: k NUMBER := 0;
723: SELECT nvl(PROVISION_ALLOWED_YN,'Y') FROM OKC_BUS_DOC_TYPES_B
724: WHERE DOCUMENT_TYPE=p_target_doc_type;
725:
726: CURSOR l_get_std_csr(b_article_id NUMBER) IS
727: SELECT STANDARD_YN,ARTICLE_TITLE FROM OKC_ARTICLES_ALL
728: WHERE article_id=b_article_id;
729:
730: CURSOR l_get_global_csr IS
731: SELECT global_flag FROM OKC_TERMS_TEMPLATES_ALL
1172: FOR i IN sav_sae_tbl.FIRST..sav_sae_tbl.LAST LOOP
1173: l_discard := false;
1174:
1175: OPEN l_get_std_csr(sav_sae_tbl(i));
1176: FETCH l_get_std_csr INTO l_standard_yn,l_art_title;
1177: CLOSE l_get_std_csr;
1178:
1179: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: l_standard_yn : '||l_standard_yn);
1176: FETCH l_get_std_csr INTO l_standard_yn,l_art_title;
1177: CLOSE l_get_std_csr;
1178:
1179: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: l_standard_yn : '||l_standard_yn);
1181: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: l_art_title : '||l_art_title);
1182: END IF;
1183:
1184: IF p_keep_version = 'N' AND l_standard_yn='Y'
1180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: l_standard_yn : '||l_standard_yn);
1181: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: l_art_title : '||l_art_title);
1182: END IF;
1183:
1184: IF p_keep_version = 'N' AND l_standard_yn='Y'
1185: AND p_target_doc_type<>OKC_TERMS_UTIL_GRP.G_TMPL_DOC_TYPE THEN
1186:
1187: -- check if Article is global or local
1188: OPEN l_get_article_org_csr(sav_sae_tbl(i));
1296: END IF; -- for target document type not template
1297:
1298: END IF; -- for adopted/localized or local article
1299:
1300: ELSIF l_standard_yn='N' THEN
1301:
1302: -- Copying Non-Standard Article
1303:
1304: OKC_ARTICLES_GRP.copy_article( p_api_version => 1,
1298: END IF; -- for adopted/localized or local article
1299:
1300: ELSIF l_standard_yn='N' THEN
1301:
1302: -- Copying Non-Standard Article
1303:
1304: OKC_ARTICLES_GRP.copy_article( p_api_version => 1,
1305: p_init_msg_list => FND_API.G_FALSE,
1306: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1306: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1307: p_commit => FND_API.G_FALSE,
1308: p_article_version_id => article_version_tbl(i),
1309: p_new_article_title => NULL,
1310: p_create_standard_yn => 'N',
1311: x_article_version_id => article_version_tbl(i),
1312: x_article_id => sav_sae_tbl(i),
1313: x_article_number => x_article_number,
1314: x_return_status => x_return_status,
1332: END IF; -- p_keep_version = N and std or non std art
1333:
1334: IF p_source_doc_type=OKC_TERMS_UTIL_GRP.G_TMPL_DOC_TYPE
1335: AND p_target_doc_type=OKC_TERMS_UTIL_GRP.G_TMPL_DOC_TYPE
1336: AND l_standard_yn='Y' THEN
1337:
1338: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1339: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Template To Template Copy l_global_yn : '||l_global_yn);
1340: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Profile OKC_GLOBAL_ORG_ID : '||fnd_profile.value('OKC_GLOBAL_ORG_ID'));
2716: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_retain_deliverable : '||p_retain_deliverable);
2717: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_allow_duplicates : '||p_allow_duplicates);
2718: END IF;
2719:
2720: -- Standard Start of API savepoint
2721: SAVEPOINT g_copy_tc_pvt;
2722:
2723: -- Standard call to check for call compatibility.
2724: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2719:
2720: -- Standard Start of API savepoint
2721: SAVEPOINT g_copy_tc_pvt;
2722:
2723: -- Standard call to check for call compatibility.
2724: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2726: END IF;
2727:
3622: IF FND_API.To_Boolean( p_commit ) THEN
3623: COMMIT WORK;
3624: END IF;
3625:
3626: -- Standard call to get message count and if count is 1, get message info.
3627: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3628:
3629: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3630: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1000: Leaving copy_tc');
3876: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3877: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Entering OKC_TERMS_COPY_PVT.copy_archived_doc ');
3878: END IF;
3879:
3880: -- Standard Start of API savepoint
3881: SAVEPOINT g_copy_archived_doc_pvt;
3882:
3883: -- Standard call to check for call compatibility.
3884: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3879:
3880: -- Standard Start of API savepoint
3881: SAVEPOINT g_copy_archived_doc_pvt;
3882:
3883: -- Standard call to check for call compatibility.
3884: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3886: END IF;
3887:
4078: IF FND_API.To_Boolean( p_commit ) THEN
4079: COMMIT WORK;
4080: END IF;
4081:
4082: -- Standard call to get message count and if count is 1, get message info.
4083: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4084:
4085: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4086: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1000: Leaving copy_archived_doc');