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