22: ( p_api_name IN VARCHAR2,
23: p_param_value IN VARCHAR2,
24: p_param_name IN VARCHAR2 ) IS
25: BEGIN
26: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
27: fnd_message.set_name('IEX', 'IEX_API_ALL_INVALID_ARGUMENT');
28: fnd_message.set_token('API_NAME', p_api_name);
29: fnd_message.set_token('VALUE', p_param_value);
30: fnd_message.set_token('PARAMETER', p_param_name);
27: fnd_message.set_name('IEX', 'IEX_API_ALL_INVALID_ARGUMENT');
28: fnd_message.set_token('API_NAME', p_api_name);
29: fnd_message.set_token('VALUE', p_param_value);
30: fnd_message.set_token('PARAMETER', p_param_name);
31: fnd_msg_pub.add;
32: END IF;
33:
34:
35: END AddInvalidArgMsg;
41: PROCEDURE AddMissingArgMsg
42: ( p_api_name IN VARCHAR2,
43: p_param_name IN VARCHAR2 )IS
44: BEGIN
45: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
46: fnd_message.set_name('IEX', 'IEX_API_ALL_MISSING_PARAM');
47: fnd_message.set_token('API_NAME', p_api_name);
48: fnd_message.set_token('MISSING_PARAM', p_param_name);
49: fnd_msg_pub.add;
45: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
46: fnd_message.set_name('IEX', 'IEX_API_ALL_MISSING_PARAM');
47: fnd_message.set_token('API_NAME', p_api_name);
48: fnd_message.set_token('MISSING_PARAM', p_param_name);
49: fnd_msg_pub.add;
50: END IF;
51: END AddMissingArgMsg;
52:
53: /**Name AddNullArgMsg
57: PROCEDURE AddNullArgMsg
58: ( p_api_name IN VARCHAR2,
59: p_param_name IN VARCHAR2 )IS
60: BEGIN
61: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
62: fnd_message.set_name('IEX', 'IEX_API_ALL_NULL_PARAMETER');
63: fnd_message.set_token('API_NAME', p_api_name);
64: fnd_message.set_token('NULL_PARAM', p_param_name);
65: fnd_msg_pub.add;
61: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
62: fnd_message.set_name('IEX', 'IEX_API_ALL_NULL_PARAMETER');
63: fnd_message.set_token('API_NAME', p_api_name);
64: fnd_message.set_token('NULL_PARAM', p_param_name);
65: fnd_msg_pub.add;
66: END IF;
67:
68:
69: END AddNullArgMsg;
78: BEGIN
79: fnd_message.set_name('IEX', 'IEX_FAILED_OPERATION');
80: fnd_message.set_token('OBJECT', p_object);
81: fnd_message.set_token('OPERATION', p_operation);
82: fnd_msg_pub.add;
83:
84: END AddfailMsg;
85:
86:
150: END IF;
151:
152: -- Check p_init_msg_list
153: IF FND_API.to_Boolean( p_init_msg_list ) THEN
154: FND_MSG_PUB.initialize;
155: END IF;
156:
157: x_return_status := FND_API.G_RET_STS_SUCCESS;
158:
210: COMMIT WORK;
211: END IF;
212:
213: -- Standard call to get message count and if count is 1, get message info
214: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
215:
216:
217: EXCEPTION
218: WHEN FND_API.G_EXC_ERROR THEN
217: EXCEPTION
218: WHEN FND_API.G_EXC_ERROR THEN
219: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
220: x_return_status := FND_API.G_RET_STS_ERROR;
221: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
222:
223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
224: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
222:
223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
224: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
226: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
227:
228: WHEN OTHERS THEN
229: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
230: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
227:
228: WHEN OTHERS THEN
229: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
230: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
231: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
232: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
233: END IF;
234: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
235:
228: WHEN OTHERS THEN
229: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
230: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
231: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
232: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
233: END IF;
234: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
235:
236: END GET_NEXT_WORK_ITEMS;
230: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
231: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
232: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
233: END IF;
234: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
235:
236: END GET_NEXT_WORK_ITEMS;
237:
238: /**
284: END IF;
285:
286: -- Check p_init_msg_list
287: IF FND_API.to_Boolean( p_init_msg_list ) THEN
288: FND_MSG_PUB.initialize;
289: END IF;
290: -- IF PG_DEBUG < 10 THEN
291: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
292: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'after init');
440: end if;
441: --End bug#5874874 gnramasa 25-Apr-2007
442:
443: -- Standard call to get message count and if count is 1, get message info
444: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
445:
446:
447: EXCEPTION
448: WHEN FND_API.G_EXC_ERROR THEN
447: EXCEPTION
448: WHEN FND_API.G_EXC_ERROR THEN
449: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
450: x_return_status := FND_API.G_RET_STS_ERROR;
451: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
452:
453: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
454: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
455: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
452:
453: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
454: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
455: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
456: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
457:
458: WHEN OTHERS THEN
459: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
457:
458: WHEN OTHERS THEN
459: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
461: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
462: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
463: END IF;
464: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
465:
458: WHEN OTHERS THEN
459: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
461: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
462: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
463: END IF;
464: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
465:
466: END CLOSE_STRY_AND_WITEMS;
460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
461: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
462: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
463: END IF;
464: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
465:
466: END CLOSE_STRY_AND_WITEMS;
467:
468:
511: END IF;
512:
513: -- Check p_init_msg_list
514: IF FND_API.to_Boolean( p_init_msg_list ) THEN
515: FND_MSG_PUB.initialize;
516: END IF;
517:
518: x_return_status := FND_API.G_RET_STS_SUCCESS;
519:
612: COMMIT WORK;
613: END IF;
614:
615: -- Standard call to get message count and if count is 1, get message info
616: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
617:
618:
619: EXCEPTION
620: WHEN FND_API.G_EXC_ERROR THEN
619: EXCEPTION
620: WHEN FND_API.G_EXC_ERROR THEN
621: ROLLBACK TO CLOSE_STRATEGY_PUB;
622: x_return_status := FND_API.G_RET_STS_ERROR;
623: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
624:
625: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
626: ROLLBACK TO CLOSE_STRATEGY_PUB;
627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
624:
625: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
626: ROLLBACK TO CLOSE_STRATEGY_PUB;
627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
628: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
629:
630: WHEN OTHERS THEN
631: ROLLBACK TO CLOSE_STRATEGY_PUB;
632: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
629:
630: WHEN OTHERS THEN
631: ROLLBACK TO CLOSE_STRATEGY_PUB;
632: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
633: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
634: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
635: END IF;
636: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
637:
630: WHEN OTHERS THEN
631: ROLLBACK TO CLOSE_STRATEGY_PUB;
632: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
633: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
634: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
635: END IF;
636: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
637:
638: END CLOSE_STRATEGY;
632: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
633: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
634: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
635: END IF;
636: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
637:
638: END CLOSE_STRATEGY;
639:
640:
685: END IF;
686:
687: -- Check p_init_msg_list
688: IF FND_API.to_Boolean( p_init_msg_list ) THEN
689: FND_MSG_PUB.initialize;
690: END IF;
691: -- IF PG_DEBUG < 10 THEN
692: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
693: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'after init');
779: COMMIT WORK;
780: END IF;
781:
782: -- Standard call to get message count and if count is 1, get message info
783: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
784:
785:
786: EXCEPTION
787: WHEN FND_API.G_EXC_ERROR THEN
787: WHEN FND_API.G_EXC_ERROR THEN
788: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
789: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
790: x_return_status := FND_API.G_RET_STS_ERROR;
791: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
792:
793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
794: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
795: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
794: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
795: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
796: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
797: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
798:
799: WHEN OTHERS THEN
800: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
801: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
799: WHEN OTHERS THEN
800: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
801: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
802: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
803: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
804: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
805: END IF;
806: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
807:
800: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
801: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
802: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
803: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
804: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
805: END IF;
806: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
807:
808: END UPDATE_WORK_ITEM;
802: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
803: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
804: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
805: END IF;
806: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
807:
808: END UPDATE_WORK_ITEM;
809: /**
810: * update next work item in the strategy table
846: END IF;
847:
848: -- Check p_init_msg_list
849: IF FND_API.to_Boolean( p_init_msg_list ) THEN
850: FND_MSG_PUB.initialize;
851: END IF;
852:
853: x_return_status := FND_API.G_RET_STS_SUCCESS;
854:
946: COMMIT WORK;
947: END IF;
948:
949: -- Standard call to get message count and if count is 1, get message info
950: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
951:
952:
953: EXCEPTION
954: WHEN FND_API.G_EXC_ERROR THEN
953: EXCEPTION
954: WHEN FND_API.G_EXC_ERROR THEN
955: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
956: x_return_status := FND_API.G_RET_STS_ERROR;
957: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
958:
959: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
960: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
958:
959: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
960: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
962: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
963:
964: WHEN OTHERS THEN
965: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
966: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
963:
964: WHEN OTHERS THEN
965: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
966: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
967: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
968: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
969: END IF;
970: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
971:
964: WHEN OTHERS THEN
965: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
966: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
967: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
968: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
969: END IF;
970: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
971:
972: END UPDATE_NEXT_WORK_ITEM;
966: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
967: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
968: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
969: END IF;
970: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
971:
972: END UPDATE_NEXT_WORK_ITEM;
973:
974: