92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
93: END IF;
94: -- Initialize message list if p_init_msg_list is set to TRUE.
95: IF FND_API.to_Boolean( p_init_msg_list ) THEN
96: FND_MSG_PUB.initialize;
97: END IF;
98: -- Initialize API return status to success
99: x_return_status := G_RET_STS_SUCCESS;
100:
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;
219:
223: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
224: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1400: Leaving Delete_Doc : OKC_API.G_EXCEPTION_ERROR Exception');
225: END IF;
226: x_return_status := G_RET_STS_ERROR ;
227: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
228:
229: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
230: ROLLBACK TO g_Delete_Doc;
231: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
231: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
232: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1500: Leaving Delete_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
233: END IF;
234: x_return_status := G_RET_STS_UNEXP_ERROR ;
235: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
236:
237: WHEN OTHERS THEN
238: ROLLBACK TO g_Delete_Doc;
239:
241: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1600: Leaving Delete_Doc because of EXCEPTION: '||sqlerrm);
242: END IF;
243:
244: x_return_status := G_RET_STS_UNEXP_ERROR ;
245: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
246: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
247: END IF;
248: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
249: END Delete_Doc ;
242: END IF;
243:
244: x_return_status := G_RET_STS_UNEXP_ERROR ;
245: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
246: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
247: END IF;
248: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
249: END Delete_Doc ;
250:
244: x_return_status := G_RET_STS_UNEXP_ERROR ;
245: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
246: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
247: END IF;
248: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
249: END Delete_Doc ;
250:
251: /*
252: -- To be used when doing bulk deletes of document.A very PO specific scenario.
283: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
284: END IF;
285: -- Initialize message list if p_init_msg_list is set to TRUE.
286: IF FND_API.to_Boolean( p_init_msg_list ) THEN
287: FND_MSG_PUB.initialize;
288: END IF;
289: -- Initialize API return status to success
290: x_return_status := G_RET_STS_SUCCESS;
291:
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;
455:
459: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
460: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2200: Leaving Purge_Doc : OKC_API.G_EXCEPTION_ERROR Exception');
461: END IF;
462: x_return_status := G_RET_STS_ERROR ;
463: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
464:
465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
466: ROLLBACK TO g_Purge_Doc;
467: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
467: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
468: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2300: Leaving Purge_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
469: END IF;
470: x_return_status := G_RET_STS_UNEXP_ERROR ;
471: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
472:
473: WHEN OTHERS THEN
474: ROLLBACK TO g_Purge_Doc;
475:
477: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2400: Leaving Purge_Doc because of EXCEPTION: '||sqlerrm);
478: END IF;
479:
480: x_return_status := G_RET_STS_UNEXP_ERROR ;
481: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
482: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
483: END IF;
484: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
485: END Purge_Doc ;
478: END IF;
479:
480: x_return_status := G_RET_STS_UNEXP_ERROR ;
481: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
482: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
483: END IF;
484: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
485: END Purge_Doc ;
486:
480: x_return_status := G_RET_STS_UNEXP_ERROR ;
481: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
482: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
483: END IF;
484: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
485: END Purge_Doc ;
486:
487: /*
488: -- To be used in amend flow to mark articles as amended if any of system
531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
532: END IF;
533: -- Initialize message list if p_init_msg_list is set to TRUE.
534: IF FND_API.to_Boolean( p_init_msg_list ) THEN
535: FND_MSG_PUB.initialize;
536: END IF;
537: -- Initialize API return status to success
538: x_return_status := G_RET_STS_SUCCESS;
539:
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;
671:
675: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
676: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2800: Leaving Mark_Variable_Based_Amendment : OKC_API.G_EXCEPTION_ERROR Exception');
677: END IF;
678: x_return_status := G_RET_STS_ERROR ;
679: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
680:
681: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
682: ROLLBACK TO g_Get_System_Variables;
683: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
683: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
684: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2900: Leaving Mark_Variable_Based_Amendment : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
685: END IF;
686: x_return_status := G_RET_STS_UNEXP_ERROR ;
687: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
688:
689: WHEN OTHERS THEN
690: ROLLBACK TO g_Get_System_Variables;
691: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
692: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3000: Leaving Mark_Variable_Based_Amendment because of EXCEPTION: '||sqlerrm);
693: END IF;
694:
695: x_return_status := G_RET_STS_UNEXP_ERROR ;
696: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
697: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
698: END IF;
699: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
700:
693: END IF;
694:
695: x_return_status := G_RET_STS_UNEXP_ERROR ;
696: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
697: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
698: END IF;
699: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
700:
701: END Mark_Variable_Based_Amendment;
695: x_return_status := G_RET_STS_UNEXP_ERROR ;
696: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
697: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
698: END IF;
699: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
700:
701: END Mark_Variable_Based_Amendment;
702:
703: /*
739: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
740: END IF;
741: -- Initialize message list if p_init_msg_list is set to TRUE.
742: IF FND_API.to_Boolean( p_init_msg_list ) THEN
743: FND_MSG_PUB.initialize;
744: END IF;
745: -- Initialize API return status to success
746: x_return_status := G_RET_STS_SUCCESS;
747:
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');
766: END IF;
771: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
772: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3400: Leaving Is_Article_exist : OKC_API.G_EXCEPTION_ERROR Exception');
773: END IF;
774: x_return_status := G_RET_STS_ERROR ;
775: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
776: RETURN FND_API.G_FALSE ;
777:
778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
779: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
779: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
780: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3500: Leaving Is_Article_exist : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
781: END IF;
782: x_return_status := G_RET_STS_UNEXP_ERROR ;
783: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
784: RETURN FND_API.G_FALSE ;
785:
786: WHEN OTHERS THEN
787: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
791: IF find_art_crs%ISOPEN THEN
792: CLOSE find_art_crs;
793: END IF;
794: x_return_status := G_RET_STS_UNEXP_ERROR ;
795: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
796: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
797: END IF;
798: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
799: RETURN FND_API.G_FALSE ;
792: CLOSE find_art_crs;
793: END IF;
794: x_return_status := G_RET_STS_UNEXP_ERROR ;
795: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
796: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
797: END IF;
798: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
799: RETURN FND_API.G_FALSE ;
800: END Is_Article_exist ;
794: x_return_status := G_RET_STS_UNEXP_ERROR ;
795: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
796: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
797: END IF;
798: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
799: RETURN FND_API.G_FALSE ;
800: END Is_Article_exist ;
801:
802: FUNCTION Is_Article_Exist(
1021: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1022: END IF;
1023: -- Initialize message list if p_init_msg_list is set to TRUE.
1024: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1025: FND_MSG_PUB.initialize;
1026: END IF;
1027: -- Initialize API return status to success
1028: x_return_status := G_RET_STS_SUCCESS;
1029:
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');
1053: END IF;
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 ;
1063:
1064: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1065: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) 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 ;
1071:
1072: WHEN OTHERS THEN
1073: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1077: IF find_art_crs%ISOPEN THEN
1078: CLOSE find_art_crs;
1079: END IF;
1080: x_return_status := G_RET_STS_UNEXP_ERROR ;
1081: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
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 ;
1078: CLOSE find_art_crs;
1079: END IF;
1080: x_return_status := G_RET_STS_UNEXP_ERROR ;
1081: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
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 ;
1080: x_return_status := G_RET_STS_UNEXP_ERROR ;
1081: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
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: /*
1128: END IF;
1129:
1130: -- Initialize message list if p_init_msg_list is set to TRUE.
1131: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1132: FND_MSG_PUB.initialize;
1133: END IF;
1134:
1135: -- Initialize API return status to success
1136: x_return_status := G_RET_STS_SUCCESS;
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||']');
1151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4600: Leaving Is_Template_Expired');
1159: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4700: Leaving Is_Template_Expired : OKC_API.G_EXCEPTION_ERROR Exception');
1160: END IF;
1161:
1162: x_return_status := G_RET_STS_ERROR ;
1163: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1164: RETURN NULL ;
1165:
1166: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1167: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1168: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4800: Leaving Is_Template_Expired : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1169: END IF;
1170:
1171: x_return_status := G_RET_STS_UNEXP_ERROR ;
1172: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1173: RETURN NULL ;
1174:
1175: WHEN OTHERS THEN
1176: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1182: END IF;
1183:
1184: x_return_status := G_RET_STS_UNEXP_ERROR ;
1185:
1186: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1187: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1188: END IF;
1189:
1190: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1183:
1184: x_return_status := G_RET_STS_UNEXP_ERROR ;
1185:
1186: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1187: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1188: END IF;
1189:
1190: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1191: RETURN NULL ;
1186: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1187: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1188: END IF;
1189:
1190: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1191: RETURN NULL ;
1192: END Is_Template_Expired;
1193:
1194: /*
1235: END IF;
1236:
1237: IF l_return_value IS NULL THEN
1238: x_return_status := G_RET_STS_ERROR ;
1239: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1240: END IF;
1241:
1242: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1243: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5600: Leaving Is_Deliverable_Exist');
1284: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1285: END IF;
1286: -- Initialize message list if p_init_msg_list is set to TRUE.
1287: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1288: FND_MSG_PUB.initialize;
1289: END IF;
1290: -- Initialize API return status to success
1291: x_return_status := G_RET_STS_SUCCESS;
1292:
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
1308: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5800: Result Is_Article_AMENDED? : ['||l_return_value||']');
1309: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5900: Leaving Is_Article_AMENDED');
1316: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1317: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6000: Leaving Is_Article_AMENDED : OKC_API.G_EXCEPTION_ERROR Exception');
1318: END IF;
1319: x_return_status := G_RET_STS_ERROR ;
1320: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1321: RETURN NULL ;
1322:
1323: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1324:
1325: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1326: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6100: Leaving Is_Article_AMENDED : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1327: END IF;
1328: x_return_status := G_RET_STS_UNEXP_ERROR ;
1329: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1330: RETURN NULL ;
1331:
1332: WHEN OTHERS THEN
1333: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1339: END IF;
1340:
1341: x_return_status := G_RET_STS_UNEXP_ERROR ;
1342:
1343: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1344: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1345: END IF;
1346: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1347: RETURN NULL ;
1340:
1341: x_return_status := G_RET_STS_UNEXP_ERROR ;
1342:
1343: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1344: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1345: END IF;
1346: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1347: RETURN NULL ;
1348:
1342:
1343: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1344: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1345: END IF;
1346: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1347: RETURN NULL ;
1348:
1349: END Is_Article_AMENDED;
1350:
1391: END IF;
1392:
1393: IF l_return_value IS NULL THEN
1394: x_return_status := G_RET_STS_ERROR ;
1395: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1396: END IF;
1397: Return l_return_value;
1398: END;
1399:
1436: END IF;
1437:
1438: -- Initialize message list if p_init_msg_list is set to TRUE.
1439: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1440: FND_MSG_PUB.initialize;
1441: END IF;
1442:
1443: -- Initialize API return status to success
1444: x_return_status := G_RET_STS_SUCCESS;
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||']');
1455: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7100: Leaving Get_Terms_Template');
1461: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1462: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7200: Leaving Get_Terms_Template : OKC_API.G_EXCEPTION_ERROR Exception');
1463: END IF;
1464:
1465: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1466: x_return_status := G_RET_STS_ERROR ;
1467:
1468: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1469: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1470: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7300: Leaving Get_Terms_Template : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1471: END IF;
1472:
1473: x_return_status := G_RET_STS_UNEXP_ERROR ;
1474: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1475:
1476: WHEN OTHERS THEN
1477:
1478: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1480: END IF;
1481: IF find_tmpl_crs%ISOPEN THEN
1482: CLOSE find_tmpl_crs;
1483: END IF;
1484: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1485: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1486: END IF;
1487: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1488: x_return_status := G_RET_STS_UNEXP_ERROR ;
1481: IF find_tmpl_crs%ISOPEN THEN
1482: CLOSE find_tmpl_crs;
1483: END IF;
1484: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1485: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1486: END IF;
1487: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1488: x_return_status := G_RET_STS_UNEXP_ERROR ;
1489:
1483: END IF;
1484: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1485: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1486: END IF;
1487: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1488: x_return_status := G_RET_STS_UNEXP_ERROR ;
1489:
1490: END Get_Terms_Template;
1491:
1519: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1520: END IF;
1521: -- Initialize message list if p_init_msg_list is set to TRUE.
1522: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1523: FND_MSG_PUB.initialize;
1524: END IF;
1525: -- Initialize API return status to success
1526: x_return_status := G_RET_STS_SUCCESS;
1527:
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');
1541: END IF;
1545: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1546: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7800: Leaving Get_Contract_Document_Type : OKC_API.G_EXCEPTION_ERROR Exception');
1547: END IF;
1548: x_return_status := G_RET_STS_ERROR ;
1549: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1550: RETURN NULL ;
1551:
1552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1553: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1553: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1554: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7900: Leaving Get_Contract_Document_Type : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1555: END IF;
1556: x_return_status := G_RET_STS_UNEXP_ERROR ;
1557: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1558: RETURN NULL ;
1559:
1560: WHEN OTHERS THEN
1561: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1565: IF find_chrtype_crs%ISOPEN THEN
1566: CLOSE find_chrtype_crs;
1567: END IF;
1568: x_return_status := G_RET_STS_UNEXP_ERROR ;
1569: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1570: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1571: END IF;
1572: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1573: RETURN NULL ;
1566: CLOSE find_chrtype_crs;
1567: END IF;
1568: x_return_status := G_RET_STS_UNEXP_ERROR ;
1569: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1570: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1571: END IF;
1572: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1573: RETURN NULL ;
1574: END Get_Contract_Document_Type;
1568: x_return_status := G_RET_STS_UNEXP_ERROR ;
1569: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1570: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1571: END IF;
1572: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1573: RETURN NULL ;
1574: END Get_Contract_Document_Type;
1575: /*
1576: -- To be used to find out document type/ID when document is of contract family.
1608: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1609: END IF;
1610: -- Initialize message list if p_init_msg_list is set to TRUE.
1611: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1612: FND_MSG_PUB.initialize;
1613: END IF;
1614: -- Initialize API return status to success
1615: x_return_status := G_RET_STS_SUCCESS;
1616:
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||']');
1631: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8400: Leaving Get_Contract_Document_Type');
1635: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1636: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8500: Leaving Get_Contract_Document_Type_id : OKC_API.G_EXCEPTION_ERROR Exception');
1637: END IF;
1638: x_return_status := G_RET_STS_ERROR ;
1639: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1640:
1641: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1642: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1643: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8600: Leaving Get_Contract_Document_Type_id : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1642: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1643: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8600: Leaving Get_Contract_Document_Type_id : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1644: END IF;
1645: x_return_status := G_RET_STS_UNEXP_ERROR ;
1646: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1647:
1648: WHEN OTHERS THEN
1649: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1650: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8700: Leaving Get_Contract_Document_Type_id because of EXCEPTION: '||sqlerrm);
1653: IF find_chrtype_crs%ISOPEN THEN
1654: CLOSE find_chrtype_crs;
1655: END IF;
1656: x_return_status := G_RET_STS_UNEXP_ERROR ;
1657: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1658: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1659: END IF;
1660: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1661: END Get_Contract_Document_Type_Id;
1654: CLOSE find_chrtype_crs;
1655: END IF;
1656: x_return_status := G_RET_STS_UNEXP_ERROR ;
1657: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1658: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1659: END IF;
1660: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1661: END Get_Contract_Document_Type_Id;
1662: /*
1656: x_return_status := G_RET_STS_UNEXP_ERROR ;
1657: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1658: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1659: END IF;
1660: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1661: END Get_Contract_Document_Type_Id;
1662: /*
1663: -- To be used to find out document type when document is of contract family.
1664: */
1737: END IF;
1738:
1739: -- Initialize message list if p_init_msg_list is set to TRUE.
1740: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1741: FND_MSG_PUB.initialize;
1742: END IF;
1743: -- Initialize API return status to success
1744: x_return_status := G_RET_STS_SUCCESS;
1745:
1831: CLOSE l_get_max_art_date_csr;
1832: END IF;
1833:
1834: x_return_status := G_RET_STS_ERROR ;
1835: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1836:
1837: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1838: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1839: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'10200: Leaving get_last_update_date : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1843: CLOSE l_get_max_art_date_csr;
1844: END IF;
1845:
1846: x_return_status := G_RET_STS_UNEXP_ERROR ;
1847: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1848:
1849: WHEN OTHERS THEN
1850: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1851: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'10300: Leaving get_last_update_date because of EXCEPTION: '||sqlerrm);
1856: END IF;
1857:
1858:
1859: x_return_status := G_RET_STS_UNEXP_ERROR ;
1860: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1861: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1862: END IF;
1863: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1864: END get_last_update_date;
1857:
1858:
1859: x_return_status := G_RET_STS_UNEXP_ERROR ;
1860: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1861: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1862: END IF;
1863: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1864: END get_last_update_date;
1865:
1859: x_return_status := G_RET_STS_UNEXP_ERROR ;
1860: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1861: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1862: END IF;
1863: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1864: END get_last_update_date;
1865:
1866: FUNCTION Ok_To_Commit (
1867: p_api_version IN NUMBER,
1911: END IF;
1912:
1913: -- Initialize message list if p_init_msg_list is set to TRUE.
1914: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1915: FND_MSG_PUB.initialize;
1916: END IF;
1917:
1918: IF p_doc_type = G_TMPL_DOC_TYPE THEN
1919: OPEN l_tmpl_csr;
2143: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2144: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'13900: Leaving ok_to_commit: OKC_API.G_EXCEPTION_ERROR Exception');
2145: END IF;
2146: x_return_status := G_RET_STS_ERROR ;
2147: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2148: RETURN FND_API.G_FALSE;
2149:
2150: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2151: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2151: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2152: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'14000: Leaving ok_to_commit: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2153: END IF;
2154: x_return_status := G_RET_STS_UNEXP_ERROR ;
2155: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2156: RETURN FND_API.G_FALSE;
2157:
2158: WHEN OTHERS THEN
2159: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2160: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'14100: Leaving ok_to_commit because of EXCEPTION: '||sqlerrm);
2161: END IF;
2162:
2163: x_return_status := G_RET_STS_UNEXP_ERROR ;
2164: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2165: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2166: END IF;
2167: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2168: RETURN FND_API.G_FALSE;
2161: END IF;
2162:
2163: x_return_status := G_RET_STS_UNEXP_ERROR ;
2164: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2165: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2166: END IF;
2167: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2168: RETURN FND_API.G_FALSE;
2169:
2163: x_return_status := G_RET_STS_UNEXP_ERROR ;
2164: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2165: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2166: END IF;
2167: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2168: RETURN FND_API.G_FALSE;
2169:
2170: END ok_to_commit;
2171:
2209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2210: END IF;
2211: -- Initialize message list if p_init_msg_list is set to TRUE.
2212: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2213: FND_MSG_PUB.initialize;
2214: END IF;
2215: -- Initialize API return status to success
2216: x_return_status := G_RET_STS_SUCCESS;
2217:
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
2237: WHEN FND_API.G_EXC_ERROR THEN
2238: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2239: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'14400: Leaving is_manual_article_exist : OKC_API.G_EXCEPTION_ERROR Exception');
2240: END IF;
2241: x_return_status := G_RET_STS_ERROR ;
2242: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2243: RETURN NULL ;
2244:
2245: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2246: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2246: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2247: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'14500: Leaving is_manual_article_exist : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2248: END IF;
2249: x_return_status := G_RET_STS_UNEXP_ERROR ;
2250: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2251: RETURN NULL ;
2252:
2253: WHEN OTHERS THEN
2254: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2258: IF find_art_crs%ISOPEN THEN
2259: CLOSE find_art_crs;
2260: END IF;
2261: x_return_status := G_RET_STS_UNEXP_ERROR ;
2262: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2263: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2264: END IF;
2265: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2266: RETURN NULL ;
2259: CLOSE find_art_crs;
2260: END IF;
2261: x_return_status := G_RET_STS_UNEXP_ERROR ;
2262: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2263: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2264: END IF;
2265: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2266: RETURN NULL ;
2267: END is_manual_article_exist ;
2261: x_return_status := G_RET_STS_UNEXP_ERROR ;
2262: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2263: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2264: END IF;
2265: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2266: RETURN NULL ;
2267: END is_manual_article_exist ;
2268:
2269:
2296: END IF;
2297:
2298: -- Initialize message list if p_init_msg_list is set to TRUE.
2299: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2300: FND_MSG_PUB.initialize;
2301: END IF;
2302:
2303: -- Initialize API return status to success
2304: x_return_status := G_RET_STS_SUCCESS;
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||']');
2324: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'15000: Leaving Get_Template_Name');
2334: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2335: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'15100: Leaving Get_Template_Name : OKC_API.G_EXCEPTION_ERROR Exception');
2336: END IF;
2337: x_return_status := G_RET_STS_ERROR ;
2338: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2339: RETURN NULL ;
2340:
2341: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2342: IF c_get_template_name%ISOPEN THEN
2345: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2346: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'15200: Leaving Get_Template_Name : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2347: END IF;
2348: x_return_status := G_RET_STS_UNEXP_ERROR ;
2349: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2350: RETURN NULL ;
2351:
2352: WHEN OTHERS THEN
2353: IF c_get_template_name%ISOPEN THEN
2357: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'15300: Leaving Get_Template_Name because of EXCEPTION: '||sqlerrm);
2358: END IF;
2359:
2360: x_return_status := G_RET_STS_UNEXP_ERROR ;
2361: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2362: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2363: END IF;
2364: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2365: RETURN NULL ;
2358: END IF;
2359:
2360: x_return_status := G_RET_STS_UNEXP_ERROR ;
2361: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2362: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2363: END IF;
2364: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2365: RETURN NULL ;
2366:
2360: x_return_status := G_RET_STS_UNEXP_ERROR ;
2361: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2362: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2363: END IF;
2364: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2365: RETURN NULL ;
2366:
2367:
2368: END Get_Template_Name;
2425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2426: END IF;
2427: -- Initialize message list if p_init_msg_list is set to TRUE.
2428: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2429: FND_MSG_PUB.initialize;
2430: END IF;
2431: -- Initialize API return status to success
2432: x_return_status := G_RET_STS_SUCCESS;
2433:
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;
2538: EXCEPTION
2541: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2542: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'15600: Leaving get_item_dtl_for_expert : OKC_API.G_EXCEPTION_ERROR Exception');
2543: END IF;
2544: x_return_status := G_RET_STS_ERROR ;
2545: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2546:
2547: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2548:
2549: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2549: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2550: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'15700: Leaving get_item_dtl_for_expert : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2551: END IF;
2552: x_return_status := G_RET_STS_UNEXP_ERROR ;
2553: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2554:
2555: WHEN OTHERS THEN
2556:
2557: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2558: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'15800: Leaving get_item_dtl_for_expert because of EXCEPTION: '||sqlerrm);
2559: END IF;
2560:
2561: x_return_status := G_RET_STS_UNEXP_ERROR ;
2562: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2563: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2564: END IF;
2565: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2566:
2559: END IF;
2560:
2561: x_return_status := G_RET_STS_UNEXP_ERROR ;
2562: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2563: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2564: END IF;
2565: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2566:
2567: END get_item_dtl_for_expert;
2561: x_return_status := G_RET_STS_UNEXP_ERROR ;
2562: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2563: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2564: END IF;
2565: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2566:
2567: END get_item_dtl_for_expert;
2568:
2569: FUNCTION get_last_signed_revision(
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;
2710: EXCEPTION
2716: IF l_get_template_dtl%ISOPEN THEN
2717: CLOSE l_get_template_dtl;
2718: END IF;
2719: x_return_status := G_RET_STS_ERROR ;
2720: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2721:
2722: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2723:
2724: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2727: IF l_get_template_dtl%ISOPEN THEN
2728: CLOSE l_get_template_dtl;
2729: END IF;
2730: x_return_status := G_RET_STS_UNEXP_ERROR ;
2731: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2732:
2733: WHEN OTHERS THEN
2734:
2735: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2738: IF l_get_template_dtl%ISOPEN THEN
2739: CLOSE l_get_template_dtl;
2740: END IF;
2741: x_return_status := G_RET_STS_UNEXP_ERROR ;
2742: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2743: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2744: END IF;
2745: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2746:
2739: CLOSE l_get_template_dtl;
2740: END IF;
2741: x_return_status := G_RET_STS_UNEXP_ERROR ;
2742: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2743: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2744: END IF;
2745: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2746:
2747: END Get_Terms_Template_dtl;
2741: x_return_status := G_RET_STS_UNEXP_ERROR ;
2742: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2743: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2744: END IF;
2745: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2746:
2747: END Get_Terms_Template_dtl;
2748:
2749: FUNCTION empclob
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;
2815: EXCEPTION
2821: IF terms_tmpl_csr%ISOPEN THEN
2822: CLOSE terms_tmpl_csr;
2823: END IF;
2824: x_return_status := G_RET_STS_ERROR ;
2825: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2826:
2827: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2828:
2829: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2832: IF terms_tmpl_csr%ISOPEN THEN
2833: CLOSE terms_tmpl_csr;
2834: END IF;
2835: x_return_status := G_RET_STS_UNEXP_ERROR ;
2836: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2837:
2838: WHEN OTHERS THEN
2839:
2840: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2843: IF terms_tmpl_csr%ISOPEN THEN
2844: CLOSE terms_tmpl_csr;
2845: END IF;
2846: x_return_status := G_RET_STS_UNEXP_ERROR ;
2847: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2848: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2849: END IF;
2850: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2851:
2844: CLOSE terms_tmpl_csr;
2845: END IF;
2846: x_return_status := G_RET_STS_UNEXP_ERROR ;
2847: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2848: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2849: END IF;
2850: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2851:
2852: END Get_Terms_Template_dtl;
2846: x_return_status := G_RET_STS_UNEXP_ERROR ;
2847: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2848: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2849: END IF;
2850: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2851:
2852: END Get_Terms_Template_dtl;
2853:
2854: FUNCTION enable_update(
3138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3139: END IF;
3140: -- Initialize message list if p_init_msg_list is set to TRUE.
3141: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3142: FND_MSG_PUB.initialize;
3143: END IF;
3144: -- Initialize API return status to success
3145: x_return_status := G_RET_STS_SUCCESS;
3146:
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;
3189: EXCEPTION
3192: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3193: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'17100: Leaving Get_Contract_Details : OKC_API.G_EXCEPTION_ERROR Exception');
3194: END IF;
3195: x_return_status := G_RET_STS_ERROR ;
3196: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3197:
3198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3199:
3200: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3200: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3201: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'17200: Leaving Get_Contract_Details : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
3202: END IF;
3203: x_return_status := G_RET_STS_UNEXP_ERROR ;
3204: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3205:
3206: WHEN OTHERS THEN
3207:
3208: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3208: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3209: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'17300: Leaving Get_Contract_Details because of EXCEPTION: '||sqlerrm);
3210: END IF;
3211: x_return_status := G_RET_STS_UNEXP_ERROR ;
3212: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3213: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3214: END IF;
3215: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3216:
3209: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'17300: Leaving Get_Contract_Details because of EXCEPTION: '||sqlerrm);
3210: END IF;
3211: x_return_status := G_RET_STS_UNEXP_ERROR ;
3212: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3213: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3214: END IF;
3215: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3216:
3217: END Get_Contract_Details;
3211: x_return_status := G_RET_STS_UNEXP_ERROR ;
3212: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3213: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3214: END IF;
3215: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3216:
3217: END Get_Contract_Details;
3218:
3219: --Returns terms details for the document.
3344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3345: END IF;
3346: -- Initialize message list if p_init_msg_list is set to TRUE.
3347: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3348: FND_MSG_PUB.initialize;
3349: END IF;
3350: -- Initialize API return status to success
3351: x_return_status := G_RET_STS_SUCCESS;
3352:
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;
3464: EXCEPTION
3467: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3468: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'17100: Leaving Get_Contract_Details_All : OKC_API.G_EXCEPTION_ERROR Exception');
3469: END IF;
3470: x_return_status := G_RET_STS_ERROR ;
3471: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3472:
3473: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3474:
3475: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3475: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3476: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'17200: Leaving Get_Contract_Details_All : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
3477: END IF;
3478: x_return_status := G_RET_STS_UNEXP_ERROR ;
3479: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3480:
3481: WHEN OTHERS THEN
3482:
3483: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3483: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3484: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'17300: Leaving Get_Contract_Details_All because of EXCEPTION: '||sqlerrm);
3485: END IF;
3486: x_return_status := G_RET_STS_UNEXP_ERROR ;
3487: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3488: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3489: END IF;
3490: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3491:
3484: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'17300: Leaving Get_Contract_Details_All because of EXCEPTION: '||sqlerrm);
3485: END IF;
3486: x_return_status := G_RET_STS_UNEXP_ERROR ;
3487: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3488: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3489: END IF;
3490: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3491:
3492: END Get_Contract_Details_All;
3486: x_return_status := G_RET_STS_UNEXP_ERROR ;
3487: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3488: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3489: END IF;
3490: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3491:
3492: END Get_Contract_Details_All;
3493:
3494: -- Returns AUTHORING_PARTY_CODE for the document
3605: END IF;
3606:
3607: -- Initialize message list if p_init_msg_list is set to TRUE.
3608: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3609: FND_MSG_PUB.initialize;
3610: END IF;
3611:
3612: x_return_status := G_RET_STS_SUCCESS;
3613:
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||']');
3623: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7100: Leaving Is_Terms_Template_Valid');
3635: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3636: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7200: Leaving Is_Terms_Template_Valid : OKC_API.G_EXCEPTION_ERROR Exception');
3637: END IF;
3638:
3639: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3640: x_return_status := G_RET_STS_ERROR ;
3641:
3642: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3643: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3644: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7300: Leaving Is_Terms_Template_Valid : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
3645: END IF;
3646:
3647: x_return_status := G_RET_STS_UNEXP_ERROR ;
3648: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3649:
3650: WHEN OTHERS THEN
3651:
3652: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3654: END IF;
3655: IF terms_tmpl_csr%ISOPEN THEN
3656: CLOSE terms_tmpl_csr;
3657: END IF;
3658: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3659: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3660: END IF;
3661: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3662: x_return_status := G_RET_STS_UNEXP_ERROR ;
3655: IF terms_tmpl_csr%ISOPEN THEN
3656: CLOSE terms_tmpl_csr;
3657: END IF;
3658: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3659: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3660: END IF;
3661: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3662: x_return_status := G_RET_STS_UNEXP_ERROR ;
3663: END Is_Terms_Template_Valid;
3657: END IF;
3658: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3659: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3660: END IF;
3661: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3662: x_return_status := G_RET_STS_UNEXP_ERROR ;
3663: END Is_Terms_Template_Valid;
3664:
3665:
3711: END IF;
3712:
3713: -- Initialize message list if p_init_msg_list is set to TRUE.
3714: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3715: FND_MSG_PUB.initialize;
3716: END IF;
3717:
3718: x_return_status := G_RET_STS_SUCCESS;
3719:
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||']');
3749: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7100: Leaving Get_Contract_Defaults');
3756: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3757: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7200: Leaving Get_Contract_Defaults : OKC_API.G_EXCEPTION_ERROR Exception');
3758: END IF;
3759:
3760: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3761: x_return_status := G_RET_STS_ERROR ;
3762:
3763: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3764: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3765: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7300: Leaving Get_Contract_Defaults : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
3766: END IF;
3767:
3768: x_return_status := G_RET_STS_UNEXP_ERROR ;
3769: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3770:
3771: WHEN OTHERS THEN
3772:
3773: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3775: END IF;
3776: IF terms_tmpl_csr%ISOPEN THEN
3777: CLOSE terms_tmpl_csr;
3778: END IF;
3779: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3780: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3781: END IF;
3782: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3783: x_return_status := G_RET_STS_UNEXP_ERROR ;
3776: IF terms_tmpl_csr%ISOPEN THEN
3777: CLOSE terms_tmpl_csr;
3778: END IF;
3779: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3780: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3781: END IF;
3782: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3783: x_return_status := G_RET_STS_UNEXP_ERROR ;
3784: END Get_Contract_Defaults;
3778: END IF;
3779: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3780: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3781: END IF;
3782: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3783: x_return_status := G_RET_STS_UNEXP_ERROR ;
3784: END Get_Contract_Defaults;
3785:
3786: PROCEDURE Get_Default_Template(
3834: END IF;
3835:
3836: -- Initialize message list if p_init_msg_list is set to TRUE.
3837: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3838: FND_MSG_PUB.initialize;
3839: END IF;
3840:
3841: x_return_status := G_RET_STS_SUCCESS;
3842:
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||']');
3852: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7010: Result x_template_name : ['||x_template_name||']');
3860:
3861: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3862: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7200: Leaving Get_Default_Template : OKC_API.G_EXCEPTION_ERROR Exception');
3863: END IF;
3864: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3865: x_return_status := G_RET_STS_ERROR ;
3866:
3867: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3868: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3869: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7300: Leaving Get_Default_Template : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
3870: END IF;
3871:
3872: x_return_status := G_RET_STS_UNEXP_ERROR ;
3873: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3874:
3875: WHEN OTHERS THEN
3876:
3877: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3879: END IF;
3880: IF terms_tmpl_csr%ISOPEN THEN
3881: CLOSE terms_tmpl_csr;
3882: END IF;
3883: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3884: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3885: END IF;
3886: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3887: x_return_status := G_RET_STS_UNEXP_ERROR ;
3880: IF terms_tmpl_csr%ISOPEN THEN
3881: CLOSE terms_tmpl_csr;
3882: END IF;
3883: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3884: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3885: END IF;
3886: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3887: x_return_status := G_RET_STS_UNEXP_ERROR ;
3888: END Get_Default_Template;
3882: END IF;
3883: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3884: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3885: END IF;
3886: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3887: x_return_status := G_RET_STS_UNEXP_ERROR ;
3888: END Get_Default_Template;
3889:
3890: --Returns 'Y' or 'N' depending on wether the API is able to generate deviation report.
4009: END IF;
4010:
4011: -- Initialize message list if p_init_msg_list is set to TRUE.
4012: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4013: FND_MSG_PUB.initialize;
4014: END IF;
4015:
4016: x_return_status := G_RET_STS_SUCCESS;
4017:
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||']');
4033: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'x_contract_source:'||x_contract_source);
4041: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4042: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7200: Leaving Has_Uploaded_Deviations_Doc : OKC_API.G_EXCEPTION_ERROR Exception');
4043: END IF;
4044:
4045: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4046: x_return_status := G_RET_STS_ERROR ;
4047:
4048: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4049: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4050: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7300: Leaving Has_Uploaded_Deviations_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
4051: END IF;
4052:
4053: x_return_status := G_RET_STS_UNEXP_ERROR ;
4054: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4055:
4056: WHEN OTHERS THEN
4057:
4058: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4057:
4058: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4059: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7400: Leaving Has_Uploaded_Deviations_Doc because of EXCEPTION:'||sqlerrm);
4060: END IF;
4061: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4062: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4063: END IF;
4064: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4065: x_return_status := G_RET_STS_UNEXP_ERROR ;
4058: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4059: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7400: Leaving Has_Uploaded_Deviations_Doc because of EXCEPTION:'||sqlerrm);
4060: END IF;
4061: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4062: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4063: END IF;
4064: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4065: x_return_status := G_RET_STS_UNEXP_ERROR ;
4066: END Has_Uploaded_Deviations_Doc;
4060: END IF;
4061: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4062: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4063: END IF;
4064: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4065: x_return_status := G_RET_STS_UNEXP_ERROR ;
4066: END Has_Uploaded_Deviations_Doc;
4067:
4068: -- Returns 'Y' if Deviations report is implemented and enabled for the particular document, else 'N' .
4164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4165: END IF;
4166: -- Initialize message list if p_init_msg_list is set to TRUE.
4167: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4168: FND_MSG_PUB.initialize;
4169: END IF;
4170: -- Initialize API return status to success
4171: x_return_status := G_RET_STS_SUCCESS;
4172:
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
4202: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Result Contract_Terms_Amended? : ['||l_return_value||']');
4203: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Leaving Contract_Terms_Amended');
4210: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4211: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'400: Leaving Contract_Terms_Amended : OKC_API.G_EXCEPTION_ERROR Exception');
4212: END IF;
4213: x_return_status := G_RET_STS_ERROR ;
4214: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4215: RETURN NULL ;
4216:
4217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4218:
4219: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4220: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving Contract_Terms_Amended : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
4221: END IF;
4222: x_return_status := G_RET_STS_UNEXP_ERROR ;
4223: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4224: RETURN NULL ;
4225:
4226: WHEN OTHERS THEN
4227: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4237: END IF;
4238:
4239: x_return_status := G_RET_STS_UNEXP_ERROR ;
4240:
4241: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4242: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4243: END IF;
4244: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4245: RETURN NULL ;
4238:
4239: x_return_status := G_RET_STS_UNEXP_ERROR ;
4240:
4241: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4242: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4243: END IF;
4244: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4245: RETURN NULL ;
4246:
4240:
4241: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4242: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4243: END IF;
4244: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4245: RETURN NULL ;
4246:
4247: END Contract_Terms_Amended;
4248:
4301: END IF;
4302:
4303: -- Initialize message list if p_init_msg_list is set to TRUE.
4304: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4305: FND_MSG_PUB.initialize;
4306: END IF;
4307:
4308: x_return_status := G_RET_STS_SUCCESS;
4309:
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');
4362: END IF;
4366: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4367: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7400: Leaving Contract_Terms_Amended : OKC_API.G_EXCEPTION_ERROR Exception');
4368: END IF;
4369: x_return_status := G_RET_STS_ERROR ;
4370: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4371: RETURN ;
4372:
4373: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4374:
4375: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4376: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7500: Leaving Contract_Terms_Amended : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
4377: END IF;
4378: x_return_status := G_RET_STS_UNEXP_ERROR ;
4379: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4380: RETURN ;
4381: WHEN OTHERS THEN
4382:
4383: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4382:
4383: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4384: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7700: Leaving get_translated_template because of EXCEPTION:'||sqlerrm);
4385: END IF;
4386: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4387: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4388: END IF;
4389: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4390: x_return_status := G_RET_STS_UNEXP_ERROR ;
4383: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4384: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7700: Leaving get_translated_template because of EXCEPTION:'||sqlerrm);
4385: END IF;
4386: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4387: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4388: END IF;
4389: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4390: x_return_status := G_RET_STS_UNEXP_ERROR ;
4391: END get_translated_template;
4385: END IF;
4386: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4387: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4388: END IF;
4389: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4390: x_return_status := G_RET_STS_UNEXP_ERROR ;
4391: END get_translated_template;
4392: --MLS for templates
4393: