[Home] [Help]
84: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'920: p_retain_lock_xprt_yn : '||p_retain_lock_xprt_yn);
85: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'920: p_retain_lock_deliverables_yn : '||p_retain_lock_deliverables_yn);
86: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'930: p_retain_deliverables_yn : '||p_retain_deliverables_yn);
87: END IF;
88: -- Standard Start of API savepoint
89: SAVEPOINT g_Delete_Doc;
90: -- Standard call to check for call compatibility.
91: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
86: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'930: p_retain_deliverables_yn : '||p_retain_deliverables_yn);
87: END IF;
88: -- Standard Start of API savepoint
89: SAVEPOINT g_Delete_Doc;
90: -- Standard call to check for call compatibility.
91: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
93: END IF;
94: -- Initialize message list if p_init_msg_list is set to TRUE.
210:
211: IF FND_API.To_Boolean( p_commit ) THEN
212: COMMIT WORK;
213: END IF;
214: -- Standard call to get message count and if count is 1, get message info.
215: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
216: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
217: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1300: Leaving Delete_Doc');
218: END IF;
275: BEGIN
276: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
277: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1700: Entered Purge_Doc');
278: END IF;
279: -- Standard Start of API savepoint
280: SAVEPOINT g_Purge_Doc;
281: -- Standard call to check for call compatibility.
282: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
283: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
277: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1700: Entered Purge_Doc');
278: END IF;
279: -- Standard Start of API savepoint
280: SAVEPOINT g_Purge_Doc;
281: -- Standard call to check for call compatibility.
282: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
283: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
284: END IF;
285: -- Initialize message list if p_init_msg_list is set to TRUE.
446: IF FND_API.To_Boolean( p_commit ) THEN
447: COMMIT WORK;
448: END IF;
449:
450: -- Standard call to get message count and if count is 1, get message info.
451: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
452: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
453: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2100: Leaving Purge_Doc');
454: END IF;
523: BEGIN
524: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
525: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2500: Entered Mark_Variable_Based_Amendment');
526: END IF;
527: -- Standard Start of API savepoint
528: SAVEPOINT g_Get_System_Variables;
529: -- Standard call to check for call compatibility.
530: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
525: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2500: Entered Mark_Variable_Based_Amendment');
526: END IF;
527: -- Standard Start of API savepoint
528: SAVEPOINT g_Get_System_Variables;
529: -- Standard call to check for call compatibility.
530: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
532: END IF;
533: -- Initialize message list if p_init_msg_list is set to TRUE.
662:
663: END LOOP;
664: END IF;
665:
666: -- Standard call to get message count and if count is 1, get message info.
667: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
668: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
669: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2700: Leaving Mark_Variable_Based_Amendment');
670: END IF;
701: END Mark_Variable_Based_Amendment;
702:
703: /*
704: --To be used to find out if a document is using articles.If yes then what type.
705: --Possible return values NONE, ONLY_STANDARD_EXIST, NON_STANDARD_EXIST .
706: */
707:
708: FUNCTION Is_Article_Exist(
709: p_api_version IN NUMBER,
721: l_dummy VARCHAR2(1) := '?';
722: l_return_value VARCHAR2(100) := G_NO_ARTICLE_EXIST;
723:
724: CURSOR find_art_crs IS
725: SELECT a.standard_yn
726: FROM okc_k_articles_b kart, okc_articles_all a
727: WHERE kart.document_type=p_doc_type
728: AND kart.document_id=p_doc_id
729: AND nvl(kart.amendment_operation_code,'?')<>G_AMEND_CODE_DELETED
728: AND kart.document_id=p_doc_id
729: AND nvl(kart.amendment_operation_code,'?')<>G_AMEND_CODE_DELETED
730: AND nvl(kart.summary_amend_operation_code,'?')<>G_AMEND_CODE_DELETED
731: AND a.article_id = kart.sav_sae_id
732: ORDER BY Decode(a.standard_yn,'N',1) ASC ;
733: BEGIN
734: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
735: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3100: Entered Is_Article_exist');
736: END IF;
733: BEGIN
734: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
735: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3100: Entered Is_Article_exist');
736: END IF;
737: -- Standard call to check for call compatibility.
738: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
739: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
740: END IF;
741: -- Initialize message list if p_init_msg_list is set to TRUE.
745: -- Initialize API return status to success
746: x_return_status := G_RET_STS_SUCCESS;
747:
748: IF Get_Contract_Source_Code(p_document_type => p_doc_type,p_document_id => p_doc_id) = 'ATTACHED' THEN
749: RETURN G_NON_STANDARD_ART_EXIST;
750: END IF;
751:
752: OPEN find_art_crs;
753: FETCH find_art_crs INTO l_dummy;
752: OPEN find_art_crs;
753: FETCH find_art_crs INTO l_dummy;
754: CLOSE find_art_crs;
755: IF l_dummy='Y' THEN
756: l_return_value := G_ONLY_STANDARD_ART_EXIST;
757: ELSIF l_dummy='N' THEN
758: l_return_value := G_NON_STANDARD_ART_EXIST;
759: END IF;
760:
754: CLOSE find_art_crs;
755: IF l_dummy='Y' THEN
756: l_return_value := G_ONLY_STANDARD_ART_EXIST;
757: ELSIF l_dummy='N' THEN
758: l_return_value := G_NON_STANDARD_ART_EXIST;
759: END IF;
760:
761: -- Standard call to get message count and if count is 1, get message info.
762: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
757: ELSIF l_dummy='N' THEN
758: l_return_value := G_NON_STANDARD_ART_EXIST;
759: END IF;
760:
761: -- Standard call to get message count and if count is 1, get message info.
762: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
763: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
764: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3200: Result Is_Article_exist? : ['||l_return_value||']');
765: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3300: Leaving Is_Article_exist');
947: return l_return_value;
948:
949: END Is_Document_Updatable;
950:
951: FUNCTION Deviation_From_Standard(
952: p_doc_type IN VARCHAR2,
953: p_doc_id IN NUMBER
954: ) RETURN VARCHAR2 IS
955: l_return_status Varchar2(1);
957: l_msg_count NUMBER;
958: l_return_value Varchar2(30);
959: BEGIN
960:
961: l_return_value:=Deviation_From_Standard(p_api_version => 1,
962: p_init_msg_list => FND_API.G_FALSE,
963: p_doc_type => p_doc_type,
964: p_doc_id => p_doc_id,
965: x_return_status => l_return_status,
977: -- compared to template that was used in the document.ocument has used.
978: -- Possible return values NO_CHANGE,ARTICLES_CHANGED,DELIVERABLES_CHANGED,
979: -- ARTICLES_AND_DELIVERABLES_CHANGED
980: */
981: FUNCTION Deviation_From_Standard(
982: p_api_version IN NUMBER,
983: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
984:
985: x_return_status OUT NOCOPY VARCHAR2,
989: p_doc_type IN VARCHAR2,
990: p_doc_id IN NUMBER
991: ) RETURN VARCHAR2 IS
992: l_api_version CONSTANT NUMBER := 1;
993: l_api_name CONSTANT VARCHAR2(30) := 'Deviation_From_Standard';
994: l_return_value VARCHAR2(100) := G_NO_CHANGE;
995: l_article_changed VARCHAR2(1) := 'N';
996: l_deliverable_changed VARCHAR2(1) := 'N';
997:
1013: ;
1014:
1015: BEGIN
1016: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1017: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3700: Entered Deviation_From_Standard');
1018: END IF;
1019: -- Standard call to check for call compatibility.
1020: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1021: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1015: BEGIN
1016: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1017: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3700: Entered Deviation_From_Standard');
1018: END IF;
1019: -- Standard call to check for call compatibility.
1020: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1021: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1022: END IF;
1023: -- Initialize message list if p_init_msg_list is set to TRUE.
1044: l_return_value := G_NO_CHANGE;
1045: END IF;
1046: END IF;
1047:
1048: -- Standard call to get message count and if count is 1, get message info.
1049: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1050: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3800: Result Deviation_From_Standard? : ['||l_return_value||']');
1052: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3900: Leaving Deviation_From_Standard');
1047:
1048: -- Standard call to get message count and if count is 1, get message info.
1049: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1050: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3800: Result Deviation_From_Standard? : ['||l_return_value||']');
1052: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3900: Leaving Deviation_From_Standard');
1053: END IF;
1054: RETURN l_return_value ;
1055: EXCEPTION
1048: -- Standard call to get message count and if count is 1, get message info.
1049: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1050: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3800: Result Deviation_From_Standard? : ['||l_return_value||']');
1052: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3900: Leaving Deviation_From_Standard');
1053: END IF;
1054: RETURN l_return_value ;
1055: EXCEPTION
1056: WHEN FND_API.G_EXC_ERROR THEN
1054: RETURN l_return_value ;
1055: EXCEPTION
1056: WHEN FND_API.G_EXC_ERROR THEN
1057: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1058: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4000: Leaving Deviation_From_Standard : OKC_API.G_EXCEPTION_ERROR Exception');
1059: END IF;
1060: x_return_status := G_RET_STS_ERROR ;
1061: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1062: RETURN NULL ;
1062: RETURN NULL ;
1063:
1064: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1065: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1066: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4100: Leaving Deviation_From_Standard : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1067: END IF;
1068: x_return_status := G_RET_STS_UNEXP_ERROR ;
1069: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1070: RETURN NULL ;
1070: RETURN NULL ;
1071:
1072: WHEN OTHERS THEN
1073: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1074: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4200: Leaving Deviation_From_Standard because of EXCEPTION: '||sqlerrm);
1075: END IF;
1076:
1077: IF find_art_crs%ISOPEN THEN
1078: CLOSE find_art_crs;
1082: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1083: END IF;
1084: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1085: RETURN NULL ;
1086: END Deviation_From_Standard ;
1087:
1088: /*
1089: --To be used to find out if template used in document has expired.Possible return values Y,N.
1090: -- Possible return values are
1121: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1122: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4300: Entered Is_Template_Expired');
1123: END IF;
1124:
1125: -- Standard call to check for call compatibility.
1126: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1127: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1128: END IF;
1129:
1142: OPEN find_tmpl_crs;
1143: FETCH find_tmpl_crs INTO l_return_value;
1144: CLOSE find_tmpl_crs ;
1145:
1146: -- Standard call to get message count and if count is 1, get message info.
1147: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1148:
1149: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1150: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4500: Result Is_Template_Expired? : ['||l_return_value||']');
1248:
1249:
1250: /*
1251: --To be used in amend flow to find out if any article is amended.If Yes then what
1252: -- type of article is amended.Possible values NO_ARTICLE_AMENDED,ONLY_STANDARD_AMENDED ,NON_STANDARD_AMENDED
1253: */
1254:
1255: FUNCTION Is_Article_Amended(
1256: p_api_version IN NUMBER,
1267: l_api_name CONSTANT VARCHAR2(30) := 'Is_Article_AMENDED';
1268: l_dummy VARCHAR2(1) := '?';
1269: l_return_value VARCHAR2(100) := G_NO_ARTICLE_AMENDED;
1270: CURSOR find_art_crs IS
1271: SELECT a.standard_yn
1272: FROM okc_k_articles_b kart, okc_articles_all a
1273: WHERE kart.document_type=p_doc_type
1274: AND kart.document_id=p_doc_id
1275: AND kart.summary_amend_operation_code IS NOT NULL
1273: WHERE kart.document_type=p_doc_type
1274: AND kart.document_id=p_doc_id
1275: AND kart.summary_amend_operation_code IS NOT NULL
1276: AND a.article_id = kart.sav_sae_id
1277: ORDER BY Decode(a.standard_yn,'N',1) ASC ;
1278: BEGIN
1279: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1280: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5700: Entered Is_Article_AMENDED');
1281: END IF;
1278: BEGIN
1279: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1280: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5700: Entered Is_Article_AMENDED');
1281: END IF;
1282: -- Standard call to check for call compatibility.
1283: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1284: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1285: END IF;
1286: -- Initialize message list if p_init_msg_list is set to TRUE.
1294: FETCH find_art_crs INTO l_dummy;
1295: CLOSE find_art_crs;
1296:
1297: IF l_dummy='Y' THEN
1298: l_return_value := G_ONLY_STANDARD_ART_AMENDED;
1299: ELSIF l_dummy='N' THEN
1300: l_return_value := G_NON_STANDARD_ART_AMENDED;
1301: END IF;
1302:
1296:
1297: IF l_dummy='Y' THEN
1298: l_return_value := G_ONLY_STANDARD_ART_AMENDED;
1299: ELSIF l_dummy='N' THEN
1300: l_return_value := G_NON_STANDARD_ART_AMENDED;
1301: END IF;
1302:
1303: -- Standard call to get message count and if count is 1, get message info.
1304:
1299: ELSIF l_dummy='N' THEN
1300: l_return_value := G_NON_STANDARD_ART_AMENDED;
1301: END IF;
1302:
1303: -- Standard call to get message count and if count is 1, get message info.
1304:
1305: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1306:
1307: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1429: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1430: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6900: Entered Get_Terms_Template');
1431: END IF;
1432:
1433: -- Standard call to check for call compatibility.
1434: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1436: END IF;
1437:
1446: OPEN find_tmpl_crs;
1447: FETCH find_tmpl_crs INTO x_template_id, x_template_name;
1448: CLOSE find_tmpl_crs;
1449:
1450: -- Standard call to get message count and if count is 1, get message info.
1451: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1452:
1453: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1454: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7000: Result Get_Terms_Template? : ['||l_return_value||']');
1513: BEGIN
1514: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1515: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7500: Entered Get_Contract_Document_Type');
1516: END IF;
1517: -- Standard call to check for call compatibility.
1518: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1519: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1520: END IF;
1521: -- Initialize message list if p_init_msg_list is set to TRUE.
1532: IF l_return_value IS NULL THEN
1533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1534: END IF;
1535:
1536: -- Standard call to get message count and if count is 1, get message info.
1537: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1538: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1539: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7600: Result Get_Contract_Document_Type? : ['||l_return_value||']');
1540: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7700: Leaving Get_Contract_Document_Type');
1602:
1603: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1604: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8100: Entered Get_Contract_Document_Type_id');
1605: END IF;
1606: -- Standard call to check for call compatibility.
1607: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1608: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1609: END IF;
1610: -- Initialize message list if p_init_msg_list is set to TRUE.
1622: IF l_notfound THEN
1623: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1624: END IF;
1625:
1626: -- Standard call to get message count and if count is 1, get message info.
1627: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1628: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1629: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8200: Result Document_Type : ['||x_doc_type||']');
1630: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8300: Result Document_ID : ['||x_doc_id||']');
1730: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'9200: p_doc_type : '||p_doc_type);
1731: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'9300: p_doc_id : '||p_doc_id);
1732: END IF;
1733:
1734: -- Standard call to check for call compatibility.
1735: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name , G_PKG_NAME) THEN
1736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1737: END IF;
1738:
1904: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'11000: p_doc_type : '||p_doc_type);
1905: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'11100: p_doc_id : '||p_doc_id);
1906: END IF;
1907:
1908: -- Standard call to check for call compatibility.
1909: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1910: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1911: END IF;
1912:
2203: BEGIN
2204: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2205: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'14200: Entered is_manual_article_exist');
2206: END IF;
2207: -- Standard call to check for call compatibility.
2208: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2210: END IF;
2211: -- Initialize message list if p_init_msg_list is set to TRUE.
2228: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2229: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'14300: Leaving is_manual_article_exist');
2230: END IF;
2231:
2232: -- Standard call to get message count and if count is 1, get message info.
2233: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2234: RETURN l_return_value ;
2235:
2236: EXCEPTION
2289: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2290: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'14700: Get_Template_Name');
2291: END IF;
2292:
2293: -- Standard call to check for call compatibility.
2294: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2296: END IF;
2297:
2315: FETCH c_get_template_name INTO l_return_value;
2316: CLOSE c_get_template_name;
2317:
2318:
2319: -- Standard call to get message count and if count is 1, get message info.
2320: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2321:
2322: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2323: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'14900: Result Get_Template_Name : ['||l_return_value||']');
2419: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2420: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'15400: Entered get_item_dtl_for_expert');
2421: END IF;
2422:
2423: -- Standard call to check for call compatibility.
2424: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2426: END IF;
2427: -- Initialize message list if p_init_msg_list is set to TRUE.
2529: ELSE
2530: NULL;
2531: END IF;
2532:
2533: -- Standard call to get message count and if count is 1, get message info.
2534: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2535: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2536: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'15500: Leaving get_item_dtl_for_expert');
2537: END IF;
2701: Raise FND_API.G_EXC_ERROR;
2702: END IF;
2703: CLOSE l_get_template_dtl;
2704:
2705: -- Standard call to get message count and if count is 1, get message info.
2706: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2707: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2708: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'16500: Leaving Get_Terms_Template_dtl');
2709: END IF;
2806: x_template_description ;
2807:
2808: CLOSE terms_tmpl_csr;
2809:
2810: -- Standard call to get message count and if count is 1, get message info.
2811: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2812: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2813: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'17000: Leaving Get_Terms_Template_dtl');
2814: END IF;
2853:
2854: FUNCTION enable_update(
2855: p_object_type IN VARCHAR2,
2856: p_document_type IN VARCHAR2,
2857: p_standard_yn IN VARCHAR2
2858: ) RETURN VARCHAR2 IS
2859: l_api_name CONSTANT VARCHAR2(30) := 'enable_update';
2860: BEGIN
2861: IF (p_object_type <> 'SECTION' AND p_object_type <> 'ARTICLE') THEN
2867: -- Article Cases
2868: ELSIF p_document_type = 'TEMPLATE' THEN
2869: -- always disable for template as the logic is based on template status and is in the controller code
2870: RETURN 'OkcTermsStructDtlsUpdateDisabled';
2871: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
2872: -- update always enabled for standard articles
2873: RETURN 'OkcTermsStructDtlsUpdateEnabled' ;
2874: -- non std articles
2875: ELSIF fnd_function.test('OKC_TERMS_AUTHOR_NON_STD','N') THEN
2868: ELSIF p_document_type = 'TEMPLATE' THEN
2869: -- always disable for template as the logic is based on template status and is in the controller code
2870: RETURN 'OkcTermsStructDtlsUpdateDisabled';
2871: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
2872: -- update always enabled for standard articles
2873: RETURN 'OkcTermsStructDtlsUpdateEnabled' ;
2874: -- non std articles
2875: ELSIF fnd_function.test('OKC_TERMS_AUTHOR_NON_STD','N') THEN
2876: -- user has access to fn and doc not template
2889:
2890: FUNCTION enable_delete(
2891: p_object_type IN VARCHAR2,
2892: p_mandatory_yn IN VARCHAR2,
2893: p_standard_yn IN VARCHAR2,
2894: p_document_type IN VARCHAR2
2895: ) RETURN VARCHAR2 IS
2896: l_api_name CONSTANT VARCHAR2(30) := 'enable_delete';
2897: BEGIN
2916: ELSE
2917: RETURN 'OkcTermsStructDtlsRemoveDisabled';
2918: END IF;
2919: END IF;
2920: -- Case 2: STANDARD ARTICLES (non-mandatory)
2921: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
2922: -- for standard articles delete is always allowed
2923: RETURN 'OkcTermsStructDtlsRemoveEnabled' ;
2924: -- Case 3: NON-STANDARD ARTICLES (non-mandatory)
2917: RETURN 'OkcTermsStructDtlsRemoveDisabled';
2918: END IF;
2919: END IF;
2920: -- Case 2: STANDARD ARTICLES (non-mandatory)
2921: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
2922: -- for standard articles delete is always allowed
2923: RETURN 'OkcTermsStructDtlsRemoveEnabled' ;
2924: -- Case 3: NON-STANDARD ARTICLES (non-mandatory)
2925: ELSIF fnd_function.test('OKC_TERMS_AUTHOR_NON_STD','N') THEN
2918: END IF;
2919: END IF;
2920: -- Case 2: STANDARD ARTICLES (non-mandatory)
2921: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
2922: -- for standard articles delete is always allowed
2923: RETURN 'OkcTermsStructDtlsRemoveEnabled' ;
2924: -- Case 3: NON-STANDARD ARTICLES (non-mandatory)
2925: ELSIF fnd_function.test('OKC_TERMS_AUTHOR_NON_STD','N') THEN
2926: -- for non-std articles check for function security
2920: -- Case 2: STANDARD ARTICLES (non-mandatory)
2921: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
2922: -- for standard articles delete is always allowed
2923: RETURN 'OkcTermsStructDtlsRemoveEnabled' ;
2924: -- Case 3: NON-STANDARD ARTICLES (non-mandatory)
2925: ELSIF fnd_function.test('OKC_TERMS_AUTHOR_NON_STD','N') THEN
2926: -- for non-std articles check for function security
2927: -- user has access , so check allow delete for non-std articles
2928: RETURN 'OkcTermsStructDtlsRemoveEnabled' ;
3132: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3133: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'15400: Entered Get_Contract_Details');
3134: END IF;
3135:
3136: -- Standard call to check for call compatibility.
3137: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3139: END IF;
3140: -- Initialize message list if p_init_msg_list is set to TRUE.
3180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'16900: x_template_name:'||x_template_name);
3181: END IF;
3182: END IF;
3183:
3184: -- Standard call to get message count and if count is 1, get message info.
3185: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3186: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3187: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'17000: Leaving Get_Contract_Details');
3188: END IF;
3338: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3339: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'15400: Entered Get_Contract_Details_All');
3340: END IF;
3341:
3342: -- Standard call to check for call compatibility.
3343: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3345: END IF;
3346: -- Initialize message list if p_init_msg_list is set to TRUE.
3455: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'16900: x_template_name:'||x_template_name);
3456: END IF;
3457: END IF;
3458:
3459: -- Standard call to get message count and if count is 1, get message info.
3460: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3461: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3462: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'17000: Leaving Get_Contract_Details_All');
3463: END IF;
3598: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3599: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6900: Entered Is_Terms_Template_Valid');
3600: END IF;
3601:
3602: -- Standard call to check for call compatibility.
3603: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3605: END IF;
3606:
3614: OPEN terms_tmpl_csr;
3615: FETCH terms_tmpl_csr INTO l_result;
3616: CLOSE terms_tmpl_csr;
3617:
3618: -- Standard call to get message count and if count is 1, get message info.
3619: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3620:
3621: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3622: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7000: Result Is_Terms_Template_Valid? : ['||l_result||']');
3704: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3705: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6900: Entered Get_Contract_Defaults');
3706: END IF;
3707:
3708: -- Standard call to check for call compatibility.
3709: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3710: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3711: END IF;
3712:
3740: x_template_name:= fnd_message.get;
3741: x_template_description := NULL;
3742: END IF;
3743:
3744: -- Standard call to get message count and if count is 1, get message info.
3745: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3746:
3747: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3748: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7000: Result Get_Contract_Defaults? : ['||x_return_status||']');
3827: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6920: p_org_id='||p_org_id);
3828: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6930: p_valid_date='||p_valid_date);
3829: END IF;
3830:
3831: -- Standard call to check for call compatibility.
3832: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3833: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3834: END IF;
3835:
3843: OPEN terms_tmpl_csr;
3844: FETCH terms_tmpl_csr INTO x_template_id,x_template_name,x_template_description;
3845: CLOSE terms_tmpl_csr;
3846:
3847: -- Standard call to get message count and if count is 1, get message info.
3848: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3849:
3850: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3851: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7000: Result x_template_id : ['||x_template_id||']');
4002: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4003: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6900: Entered Has_Uploaded_Deviations_Doc');
4004: END IF;
4005:
4006: -- Standard call to check for call compatibility.
4007: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4008: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4009: END IF;
4010:
4024: p_document_id => p_document_id
4025: );
4026:
4027:
4028: -- Standard call to get message count and if count is 1, get message info.
4029: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4030:
4031: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4032: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7000: Result Has_Uploaded_Deviations_Doc? : ['||x_return_status||']');
4158: BEGIN
4159: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4160: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Entered Contract_Terms_Amended');
4161: END IF;
4162: -- Standard call to check for call compatibility.
4163: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4165: END IF;
4166: -- Initialize message list if p_init_msg_list is set to TRUE.
4193: p_doc_id => p_doc_id);
4194:
4195: END IF;
4196:
4197: -- Standard call to get message count and if count is 1, get message info.
4198:
4199: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4200:
4201: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4294: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4295: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6900: Entered get_translated_template');
4296: END IF;
4297:
4298: -- Standard call to check for call compatibility.
4299: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4301: END IF;
4302:
4353: END IF;
4354:
4355: CLOSE l_translated_csr;
4356:
4357: -- Standard call to get message count and if count is 1, get message info.
4358: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4359:
4360: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4361: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7300: Leaving get_translated_template');
4471:
4472: FUNCTION enable_update(
4473: p_object_type IN VARCHAR2,
4474: p_document_type IN VARCHAR2,
4475: p_standard_yn IN VARCHAR2,
4476: p_kart_sec_id in NUMBER
4477: ) RETURN VARCHAR2
4478: IS
4479:
4496: -- Article Cases
4497: ELSIF p_document_type = 'TEMPLATE' THEN
4498: -- always disable for template as the logic is based on template status and is in the controller code
4499: RETURN 'OkcTermsStructDtlsUpdateDisabled';
4500: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
4501: -- update always enabled for standard articles
4502: RETURN 'OkcTermsStructDtlsUpdateEnabled' ;
4503: -- non std articles
4504: ELSIF fnd_function.test('OKC_TERMS_AUTHOR_NON_STD','N') THEN
4497: ELSIF p_document_type = 'TEMPLATE' THEN
4498: -- always disable for template as the logic is based on template status and is in the controller code
4499: RETURN 'OkcTermsStructDtlsUpdateDisabled';
4500: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
4501: -- update always enabled for standard articles
4502: RETURN 'OkcTermsStructDtlsUpdateEnabled' ;
4503: -- non std articles
4504: ELSIF fnd_function.test('OKC_TERMS_AUTHOR_NON_STD','N') THEN
4505: -- user has access to fn and doc not template
4513:
4514: FUNCTION enable_delete(
4515: p_object_type IN VARCHAR2,
4516: p_mandatory_yn IN VARCHAR2,
4517: p_standard_yn IN VARCHAR2,
4518: p_document_type IN VARCHAR2 := NULL,
4519: p_kart_sec_id in number
4520: ) RETURN VARCHAR2
4521: IS
4557: ELSE
4558: RETURN 'OkcTermsStructDtlsRemoveDisabled';
4559: END IF;
4560: END IF;
4561: -- Case 2: STANDARD ARTICLES (non-mandatory)
4562: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
4563: -- for standard articles delete is always allowed
4564: RETURN 'OkcTermsStructDtlsRemoveEnabled' ;
4565: -- Case 3: NON-STANDARD ARTICLES (non-mandatory)
4558: RETURN 'OkcTermsStructDtlsRemoveDisabled';
4559: END IF;
4560: END IF;
4561: -- Case 2: STANDARD ARTICLES (non-mandatory)
4562: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
4563: -- for standard articles delete is always allowed
4564: RETURN 'OkcTermsStructDtlsRemoveEnabled' ;
4565: -- Case 3: NON-STANDARD ARTICLES (non-mandatory)
4566: ELSIF fnd_function.test('OKC_TERMS_AUTHOR_NON_STD','N') THEN
4559: END IF;
4560: END IF;
4561: -- Case 2: STANDARD ARTICLES (non-mandatory)
4562: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
4563: -- for standard articles delete is always allowed
4564: RETURN 'OkcTermsStructDtlsRemoveEnabled' ;
4565: -- Case 3: NON-STANDARD ARTICLES (non-mandatory)
4566: ELSIF fnd_function.test('OKC_TERMS_AUTHOR_NON_STD','N') THEN
4567: -- for non-std articles check for function security
4561: -- Case 2: STANDARD ARTICLES (non-mandatory)
4562: ELSIF NVL(p_standard_yn,'N') = 'Y' THEN
4563: -- for standard articles delete is always allowed
4564: RETURN 'OkcTermsStructDtlsRemoveEnabled' ;
4565: -- Case 3: NON-STANDARD ARTICLES (non-mandatory)
4566: ELSIF fnd_function.test('OKC_TERMS_AUTHOR_NON_STD','N') THEN
4567: -- for non-std articles check for function security
4568: -- user has access , so check allow delete for non-std articles
4569: RETURN 'OkcTermsStructDtlsRemoveEnabled' ;
4583: ELSE
4584: RETURN enable_delete(
4585: p_object_type ,
4586: p_mandatory_yn ,
4587: p_standard_yn ,
4588: p_document_type );
4589: END IF;
4590: END enable_delete;
4591:
4593:
4594: FUNCTION enable_delete(
4595: p_object_type IN VARCHAR2,
4596: p_mandatory_yn IN VARCHAR2,
4597: p_standard_yn IN VARCHAR2,
4598: p_document_type IN VARCHAR2 := NULL ,
4599: p_kart_sec_id in NUMBER,
4600: p_lockingEnabledYn IN VARCHAR2
4601: ) RETURN VARCHAR2
4603: BEGIN
4604: RETURN enable_delete(
4605: p_object_type ,
4606: p_mandatory_yn ,
4607: p_standard_yn ,
4608: p_document_type );
4609: END enable_delete;
4610:
4611: FUNCTION enable_update(
4610:
4611: FUNCTION enable_update(
4612: p_object_type IN VARCHAR2,
4613: p_document_type IN VARCHAR2,
4614: p_standard_yn IN VARCHAR2,
4615: p_kart_sec_id in NUMBER,
4616: p_lockingEnabledYn IN VARCHAR2
4617: ) RETURN VARCHAR2
4618: IS
4619: BEGIN
4620: RETURN enable_update(
4621: p_object_type ,
4622: p_document_type ,
4623: p_standard_yn
4624: );
4625:
4626: END enable_update;
4627: