41: p_variable_code IN VARCHAR2)
42: RETURN VARCHAR2 IS
43: l_api_name CONSTANT VARCHAR2(30) := 'get_variable_value_id';
44: CURSOR csr_target_dtls IS
45: SELECT NVL(standard_yn,'N') standard_flag,
46: kart.article_version_id,
47: kart.ORIG_SYSTEM_REFERENCE_ID1
48: FROM okc_articles_all lib,
49: okc_k_articles_b kart
60: FROM OKC_K_ART_VARIABLES VAR
61: WHERE VAR.CAT_ID = p_cat_id
62: AND VAR.VARIABLE_CODE = p_variable_code;
63:
64: l_standard_flag VARCHAR2(1);
65: l_ORIG_SYSTEM_REFERENCE_ID1 VARCHAR2(1000);
66: l_target_article_version_id NUMBER;
67: l_source_article_version_id NUMBER;
68: l_source_value_id VARCHAR2(1000):= NULL;
68: l_source_value_id VARCHAR2(1000):= NULL;
69:
70: BEGIN
71: OPEN csr_target_dtls;
72: FETCH csr_target_dtls INTO l_standard_flag, l_target_article_version_id, l_ORIG_SYSTEM_REFERENCE_ID1;
73: CLOSE csr_target_dtls;
74:
75:
76: -- bug 3369336
74:
75:
76: -- bug 3369336
77: -- copy variable values if the variable exists in the target doc article
78: -- without comparing version or if it was non standard (bug 3397895 )
79:
80: OPEN csr_source_value_id(p_cat_id=>l_ORIG_SYSTEM_REFERENCE_ID1,p_variable_code=>p_variable_code);
81: FETCH csr_source_value_id INTO l_source_value_id;
82: CLOSE csr_source_value_id;
110: FROM okc_k_art_variables var
111: WHERE var.cat_id = p_cat_id
112: AND var.variable_code = p_variable_code;
113:
114: l_standard_flag VARCHAR2(1);
115: l_id1 VARCHAR2(2000);
116: l_var_value_id okc_k_art_variables.variable_value_id%TYPE := NULL;
117: l_var_value okc_k_art_variables.variable_value%TYPE := NULL;
118:
138: p_variable_code IN VARCHAR2)
139: RETURN VARCHAR2 IS
140: l_api_name CONSTANT VARCHAR2(30) := 'get_variable_value';
141: CURSOR csr_target_dtls IS
142: SELECT NVL(standard_yn,'N') standard_flag,
143: kart.article_version_id,
144: kart.ORIG_SYSTEM_REFERENCE_ID1
145: FROM okc_articles_all lib,
146: okc_k_articles_b kart
157: FROM OKC_K_ART_VARIABLES VAR
158: WHERE VAR.CAT_ID = p_cat_id
159: AND VAR.VARIABLE_CODE = p_variable_code;
160:
161: l_standard_flag VARCHAR2(1);
162: l_ORIG_SYSTEM_REFERENCE_ID1 VARCHAR2(1000);
163: l_target_article_version_id NUMBER;
164: l_source_article_version_id NUMBER;
165: l_source_value VARCHAR2(2000):= NULL;
165: l_source_value VARCHAR2(2000):= NULL;
166:
167: BEGIN
168: OPEN csr_target_dtls;
169: FETCH csr_target_dtls INTO l_standard_flag, l_target_article_version_id, l_ORIG_SYSTEM_REFERENCE_ID1;
170: CLOSE csr_target_dtls;
171:
172: -- bug 3369336
173: -- copy variable values if the variable exists in the target doc article
170: CLOSE csr_target_dtls;
171:
172: -- bug 3369336
173: -- copy variable values if the variable exists in the target doc article
174: -- without comparing version or if it was non standard (bug 3397895 )
175:
176: OPEN csr_source_value(p_cat_id=>l_ORIG_SYSTEM_REFERENCE_ID1,p_variable_code=>p_variable_code);
177: FETCH csr_source_value INTO l_source_value;
178: CLOSE csr_source_value;
396: x_msg_count OUT NOCOPY NUMBER) IS
397: l_api_name CONSTANT VARCHAR2(30) := 'copy_articles';
398: l_prov_allowed VARCHAR2(1) ;
399: l_discard Boolean;
400: l_standard_yn VARCHAR2(1) ;
401: l_global_yn VARCHAR2(1) ;
402: l_org_id OKC_TERMS_TEMPLATES_ALL.ORG_ID%TYPE;
403: l_art_title OKC_ARTICLES_ALL.ARTICLE_TITLE%TYPE;
404: k NUMBER := 0;
482: SELECT nvl(PROVISION_ALLOWED_YN,'Y') FROM OKC_BUS_DOC_TYPES_B
483: WHERE DOCUMENT_TYPE=p_target_doc_type;
484:
485: CURSOR l_get_std_csr(b_article_id NUMBER) IS
486: SELECT STANDARD_YN,ARTICLE_TITLE FROM OKC_ARTICLES_ALL
487: WHERE article_id=b_article_id;
488:
489: CURSOR l_get_global_csr IS
490: SELECT global_flag FROM OKC_TERMS_TEMPLATES_ALL
860: FOR i IN sav_sae_tbl.FIRST..sav_sae_tbl.LAST LOOP
861: l_discard := false;
862:
863: OPEN l_get_std_csr(sav_sae_tbl(i));
864: FETCH l_get_std_csr INTO l_standard_yn,l_art_title;
865: CLOSE l_get_std_csr;
866:
867: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
868: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: l_standard_yn : '||l_standard_yn);
864: FETCH l_get_std_csr INTO l_standard_yn,l_art_title;
865: CLOSE l_get_std_csr;
866:
867: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
868: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: l_standard_yn : '||l_standard_yn);
869: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: l_art_title : '||l_art_title);
870: END IF;
871:
872: IF p_keep_version = 'N' AND l_standard_yn='Y'
868: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: l_standard_yn : '||l_standard_yn);
869: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: l_art_title : '||l_art_title);
870: END IF;
871:
872: IF p_keep_version = 'N' AND l_standard_yn='Y'
873: AND p_target_doc_type<>OKC_TERMS_UTIL_GRP.G_TMPL_DOC_TYPE THEN
874:
875: -- check if Article is global or local
876: OPEN l_get_article_org_csr(sav_sae_tbl(i));
984: END IF; -- for target document type not template
985:
986: END IF; -- for adopted/localized or local article
987:
988: ELSIF l_standard_yn='N' THEN
989:
990: -- Copying Non-Standard Article
991:
992: OKC_ARTICLES_GRP.copy_article( p_api_version => 1,
986: END IF; -- for adopted/localized or local article
987:
988: ELSIF l_standard_yn='N' THEN
989:
990: -- Copying Non-Standard Article
991:
992: OKC_ARTICLES_GRP.copy_article( p_api_version => 1,
993: p_init_msg_list => FND_API.G_FALSE,
994: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
994: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
995: p_commit => FND_API.G_FALSE,
996: p_article_version_id => article_version_tbl(i),
997: p_new_article_title => NULL,
998: p_create_standard_yn => 'N',
999: x_article_version_id => article_version_tbl(i),
1000: x_article_id => sav_sae_tbl(i),
1001: x_article_number => x_article_number,
1002: x_return_status => x_return_status,
1020: END IF; -- p_keep_version = N and std or non std art
1021:
1022: IF p_source_doc_type=OKC_TERMS_UTIL_GRP.G_TMPL_DOC_TYPE
1023: AND p_target_doc_type=OKC_TERMS_UTIL_GRP.G_TMPL_DOC_TYPE
1024: AND l_standard_yn='Y' THEN
1025:
1026: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1027: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Template To Template Copy l_global_yn : '||l_global_yn);
1028: 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'));
2122: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_retain_deliverable : '||p_retain_deliverable);
2123: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: p_allow_duplicates : '||p_allow_duplicates);
2124: END IF;
2125:
2126: -- Standard Start of API savepoint
2127: SAVEPOINT g_copy_tc_pvt;
2128:
2129: -- Standard call to check for call compatibility.
2130: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2125:
2126: -- Standard Start of API savepoint
2127: SAVEPOINT g_copy_tc_pvt;
2128:
2129: -- Standard call to check for call compatibility.
2130: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2131: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2132: END IF;
2133:
2807: IF FND_API.To_Boolean( p_commit ) THEN
2808: COMMIT WORK;
2809: END IF;
2810:
2811: -- Standard call to get message count and if count is 1, get message info.
2812: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2813:
2814: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2815: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1000: Leaving copy_tc');
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;
3057:
3058: -- Standard call to check for call compatibility.
3059: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3054:
3055: -- Standard Start of API savepoint
3056: SAVEPOINT g_copy_archived_doc_pvt;
3057:
3058: -- Standard call to check for call compatibility.
3059: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3060: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3061: END IF;
3062:
3239: IF FND_API.To_Boolean( p_commit ) THEN
3240: COMMIT WORK;
3241: END IF;
3242:
3243: -- Standard call to get message count and if count is 1, get message info.
3244: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3245:
3246: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3247: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1000: Leaving copy_archived_doc');