305: END IF;
306:
307: -- initialize message list if p_init_msg_list is set to TRUE
308: IF FND_API.To_Boolean( p_init_msg_list ) THEN
309: FND_MSG_PUB.initialize;
310: END IF;
311:
312: -- Initialize the API return status to success
313: x_return_status := FND_API.G_RET_STS_SUCCESS;
419: FROM dual; moved the comment 12699361 */
420: END IF;
421: EXCEPTION
422: WHEN OTHERS THEN
423: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
424: THEN
425: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_AO_IN_INSERT_ERROR');
426: FND_MSG_PUB.Add;
427: END IF;
422: WHEN OTHERS THEN
423: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
424: THEN
425: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_AO_IN_INSERT_ERROR');
426: FND_MSG_PUB.Add;
427: END IF;
428:
429: RAISE FND_API.G_EXC_ERROR;
430: END;
429: RAISE FND_API.G_EXC_ERROR;
430: END;
431:
432: -- Signify Success
433: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
434: THEN
435: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_AO_IN_RECORD_INSERTED');
436: FND_MSG_PUB.Add;
437: END IF;
432: -- Signify Success
433: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
434: THEN
435: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_AO_IN_RECORD_INSERTED');
436: FND_MSG_PUB.Add;
437: END IF;
438:
439: -- End of API body
440:
443: COMMIT WORK;
444: END IF;
445:
446: -- Standard call to get message count and if count is 1, get message info
447: FND_MSG_PUB.Count_And_Get
448: ( p_encoded => l_encoded,
449: p_count => x_msg_count,
450: p_data => x_msg_data
451: );
454: WHEN FND_API.G_EXC_ERROR THEN
455: ROLLBACK TO Advanced_Outbound_Input_PUB;
456: x_return_status := FND_API.G_RET_STS_ERROR;
457:
458: FND_MSG_PUB.Count_And_Get
459: ( p_encoded => l_encoded,
460: p_count => x_msg_count,
461: p_data => x_msg_data
462: );
464: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
465: ROLLBACK TO Advanced_Outbound_Input_PUB;
466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
467:
468: FND_MSG_PUB.Count_And_Get
469: ( p_encoded => l_encoded,
470: p_count => x_msg_count,
471: p_data => x_msg_data
472: );
474: WHEN OTHERS THEN
475: ROLLBACK TO Advanced_Outbound_Input_PUB;
476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
477:
478: IF FND_MSG_PUB.Check_Msg_Level
479: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
480:
481: THEN
482: FND_MSG_PUB.Add_Exc_Msg
475: ROLLBACK TO Advanced_Outbound_Input_PUB;
476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
477:
478: IF FND_MSG_PUB.Check_Msg_Level
479: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
480:
481: THEN
482: FND_MSG_PUB.Add_Exc_Msg
483: ( p_pkg_name => G_PKG_NAME,
478: IF FND_MSG_PUB.Check_Msg_Level
479: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
480:
481: THEN
482: FND_MSG_PUB.Add_Exc_Msg
483: ( p_pkg_name => G_PKG_NAME,
484: p_procedure_name => l_api_name,
485: p_error_text => 'G_MSG_LVL_UNEXP_ERROR'
486: );
485: p_error_text => 'G_MSG_LVL_UNEXP_ERROR'
486: );
487: END IF;
488:
489: FND_MSG_PUB.Count_And_Get
490: ( p_encoded => l_encoded,
491: p_count => x_msg_count,
492: p_data => x_msg_data
493: );
669: END IF;
670:
671: -- initialize message list if p_init_msg_list is set to TRUE
672: IF FND_API.To_Boolean( p_init_msg_list ) THEN
673: FND_MSG_PUB.initialize;
674: END IF;
675:
676: -- Initialize the API return status to success
677: x_return_status := FND_API.G_RET_STS_SUCCESS;
793: FROM dual;moved the comment12699361 */
794: END IF;
795: EXCEPTION
796: WHEN OTHERS THEN
797: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
798: THEN
799: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_IB_IN_INSERT_ERROR');
800: FND_MSG_PUB.Add;
801: END IF;
796: WHEN OTHERS THEN
797: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
798: THEN
799: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_IB_IN_INSERT_ERROR');
800: FND_MSG_PUB.Add;
801: END IF;
802:
803: RAISE FND_API.G_EXC_ERROR;
804: END;
803: RAISE FND_API.G_EXC_ERROR;
804: END;
805:
806: -- Signify Success
807: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
808: THEN
809: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_IB_IN_RECORD_INSERTED');
810: FND_MSG_PUB.Add;
811: END IF;
806: -- Signify Success
807: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
808: THEN
809: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_IB_IN_RECORD_INSERTED');
810: FND_MSG_PUB.Add;
811: END IF;
812:
813: -- End of API body
814:
817: COMMIT WORK;
818: END IF;
819:
820: -- Standard call to get message count and if count is 1, get message info
821: FND_MSG_PUB.Count_And_Get
822: ( p_encoded => l_encoded,
823: p_count => x_msg_count,
824: p_data => x_msg_data
825: );
828: WHEN FND_API.G_EXC_ERROR THEN
829: ROLLBACK TO Interaction_Blending_Input_PUB;
830: x_return_status := FND_API.G_RET_STS_ERROR;
831:
832: FND_MSG_PUB.Count_And_Get
833: ( p_encoded => l_encoded,
834: p_count => x_msg_count,
835: p_data => x_msg_data
836: );
838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
839: ROLLBACK TO Interaction_Blending_Input_PUB;
840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
841:
842: FND_MSG_PUB.Count_And_Get
843: ( p_encoded => l_encoded,
844: p_count => x_msg_count,
845: p_data => x_msg_data
846: );
848: WHEN OTHERS THEN
849: ROLLBACK TO Interaction_Blending_Input_PUB;
850: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
851:
852: IF FND_MSG_PUB.Check_Msg_Level
853: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
854:
855: THEN
856: FND_MSG_PUB.Add_Exc_Msg
849: ROLLBACK TO Interaction_Blending_Input_PUB;
850: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
851:
852: IF FND_MSG_PUB.Check_Msg_Level
853: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
854:
855: THEN
856: FND_MSG_PUB.Add_Exc_Msg
857: ( p_pkg_name => G_PKG_NAME,
852: IF FND_MSG_PUB.Check_Msg_Level
853: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
854:
855: THEN
856: FND_MSG_PUB.Add_Exc_Msg
857: ( p_pkg_name => G_PKG_NAME,
858: p_procedure_name => l_api_name,
859: p_error_text => 'G_MSG_LVL_UNEXP_ERROR'
860: );
859: p_error_text => 'G_MSG_LVL_UNEXP_ERROR'
860: );
861: END IF;
862:
863: FND_MSG_PUB.Count_And_Get
864: ( p_encoded => l_encoded,
865: p_count => x_msg_count,
866: p_data => x_msg_data
867: );
1088: END IF;
1089:
1090: -- initialize message list if p_init_msg_list is set to TRUE
1091: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1092: FND_MSG_PUB.initialize;
1093: END IF;
1094:
1095: -- Initialize the API return status to success
1096: x_return_status := FND_API.G_RET_STS_SUCCESS;
1169: FROM dual; moved the comment 12699361 */
1170: END IF;
1171: EXCEPTION
1172: WHEN OTHERS THEN
1173: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1174: THEN
1175: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_MCM_IN_INSERT_ERROR');
1176: FND_MSG_PUB.Add;
1177: END IF;
1172: WHEN OTHERS THEN
1173: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1174: THEN
1175: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_MCM_IN_INSERT_ERROR');
1176: FND_MSG_PUB.Add;
1177: END IF;
1178:
1179: RAISE FND_API.G_EXC_ERROR;
1180: END;
1179: RAISE FND_API.G_EXC_ERROR;
1180: END;
1181:
1182: -- Signify Success
1183: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1184: THEN
1185: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_MCM_IN_RECORD_INSERTED');
1186: FND_MSG_PUB.Add;
1187: END IF;
1182: -- Signify Success
1183: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1184: THEN
1185: FND_MESSAGE.SET_NAME('CCT', 'CCT_SDI_MCM_IN_RECORD_INSERTED');
1186: FND_MSG_PUB.Add;
1187: END IF;
1188:
1189: -- End of API body
1190:
1193: COMMIT WORK;
1194: END IF;
1195:
1196: -- Standard call to get message count and if count is 1, get message info
1197: FND_MSG_PUB.Count_And_Get
1198: ( p_encoded => l_encoded,
1199: p_count => x_msg_count,
1200: p_data => x_msg_data
1201: );
1204: WHEN FND_API.G_EXC_ERROR THEN
1205: ROLLBACK TO MCM_Input_PUB;
1206: x_return_status := FND_API.G_RET_STS_ERROR;
1207:
1208: FND_MSG_PUB.Count_And_Get
1209: ( p_encoded => l_encoded,
1210: p_count => x_msg_count,
1211: p_data => x_msg_data
1212: );
1214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1215: ROLLBACK TO MCM_Input_PUB;
1216: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1217:
1218: FND_MSG_PUB.Count_And_Get
1219: ( p_encoded => l_encoded,
1220: p_count => x_msg_count,
1221: p_data => x_msg_data
1222: );
1224: WHEN OTHERS THEN
1225: ROLLBACK TO MCM_Input_PUB;
1226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1227:
1228: IF FND_MSG_PUB.Check_Msg_Level
1229: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1230:
1231: THEN
1232: FND_MSG_PUB.Add_Exc_Msg
1225: ROLLBACK TO MCM_Input_PUB;
1226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1227:
1228: IF FND_MSG_PUB.Check_Msg_Level
1229: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1230:
1231: THEN
1232: FND_MSG_PUB.Add_Exc_Msg
1233: ( p_pkg_name => G_PKG_NAME,
1228: IF FND_MSG_PUB.Check_Msg_Level
1229: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1230:
1231: THEN
1232: FND_MSG_PUB.Add_Exc_Msg
1233: ( p_pkg_name => G_PKG_NAME,
1234: p_procedure_name => l_api_name,
1235: p_error_text => 'G_MSG_LVL_UNEXP_ERROR'
1236: );
1235: p_error_text => 'G_MSG_LVL_UNEXP_ERROR'
1236: );
1237: END IF;
1238:
1239: FND_MSG_PUB.Count_And_Get
1240: ( p_encoded => l_encoded,
1241: p_count => x_msg_count,
1242: p_data => x_msg_data
1243: );