31: END IF;
32:
33: -- Initialize message list if p_init_msg_list is set to TRUE.
34: IF FND_API.to_Boolean( p_init_msg_list ) THEN
35: FND_MSG_PUB.initialize;
36: END IF;
37:
38: -- Initialize API return status to success
39: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
60: RAISE FND_API.G_EXC_ERROR;
61: END IF;
62:
63: -- Standard call to get message count and if count is 1, get message info.
64: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
65:
66: EXCEPTION
67: WHEN FND_API.G_EXC_ERROR THEN
68: ROLLBACK;
67: WHEN FND_API.G_EXC_ERROR THEN
68: ROLLBACK;
69: x_return_status := FND_API.G_RET_STS_ERROR;
70:
71: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
72: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
73: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.create_defn_context', FALSE);
74: end if;
75:
76: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
77: ROLLBACK;
78: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
79:
80: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
81: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
82: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.create_defn_context', FALSE);
83: end if;
84:
85: WHEN OTHERS THEN
86: ROLLBACK;
87: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
88:
89: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
90: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
91: END IF;
92:
93: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
86: ROLLBACK;
87: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
88:
89: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
90: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
91: END IF;
92:
93: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
94: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
89: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
90: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
91: END IF;
92:
93: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
94: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
95: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.create_defn_context', FALSE);
96: end if;
97:
133: END IF;
134:
135: -- Initialize message list if p_init_msg_list is set to TRUE.
136: IF FND_API.to_Boolean( p_init_msg_list ) THEN
137: FND_MSG_PUB.initialize;
138: END IF;
139:
140: -- Initialize API return status to success
141: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
185: RAISE FND_API.G_EXC_ERROR;
186: END IF;
187:
188: -- Standard call to get message count and if count is 1, get message info.
189: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
190:
191: EXCEPTION
192: WHEN FND_API.G_EXC_ERROR THEN
193: ROLLBACK;
192: WHEN FND_API.G_EXC_ERROR THEN
193: ROLLBACK;
194: x_return_status := FND_API.G_RET_STS_ERROR;
195:
196: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
197: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
198: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.create_defn_context', FALSE);
199: end if;
200:
201: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
202: ROLLBACK;
203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
204:
205: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
206: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
207: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.create_defn_context', FALSE);
208: end if;
209:
210: WHEN OTHERS THEN
211: ROLLBACK;
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
213:
214: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
215: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
216: END IF;
217:
218: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
211: ROLLBACK;
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
213:
214: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
215: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
216: END IF;
217:
218: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
219: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
214: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
215: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
216: END IF;
217:
218: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
219: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
220: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.create_defn_context', FALSE);
221: end if;
222: END CREATE_DEFN_CONTEXT;
248: END IF;
249:
250: -- Initialize message list if p_init_msg_list is set to TRUE.
251: IF FND_API.to_Boolean( p_init_msg_list ) THEN
252: FND_MSG_PUB.initialize;
253: END IF;
254:
255: -- Initialize API return status to success
256: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
276: RAISE FND_API.G_EXC_ERROR;
277: END IF;
278:
279: -- Standard call to get message count and if count is 1, get message info.
280: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
281:
282: EXCEPTION
283: WHEN FND_API.G_EXC_ERROR THEN
284: ROLLBACK;
283: WHEN FND_API.G_EXC_ERROR THEN
284: ROLLBACK;
285: x_return_status := FND_API.G_RET_STS_ERROR;
286:
287: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
288: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
289: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.delete_entity_for_process', FALSE);
290: end if;
291:
292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
293: ROLLBACK;
294: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
295:
296: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
297: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
298: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.delete_entity_for_process', FALSE);
299: end if;
300:
301: WHEN OTHERS THEN
302: ROLLBACK;
303: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
304:
305: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
306: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
307: END IF;
308:
309: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
302: ROLLBACK;
303: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
304:
305: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
306: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
307: END IF;
308:
309: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
310: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
305: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
306: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
307: END IF;
308:
309: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
310: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
311: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.delete_entity_for_process', FALSE);
312: end if;
313: END DELETE_ENTITY_FOR_PROCESS;
348: END IF;
349:
350: -- Initialize message list if p_init_msg_list is set to TRUE.
351: IF FND_API.to_Boolean( p_init_msg_list ) THEN
352: FND_MSG_PUB.initialize;
353: END IF;
354:
355: -- Initialize API return status to success
356: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
395: RAISE FND_API.G_EXC_ERROR;
396: END IF;
397:
398: -- Standard call to get message count and if count is 1, get message info.
399: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
400:
401: EXCEPTION
402: WHEN FND_API.G_EXC_ERROR THEN
403: ROLLBACK;
402: WHEN FND_API.G_EXC_ERROR THEN
403: ROLLBACK;
404: x_return_status := FND_API.G_RET_STS_ERROR;
405:
406: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
407: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
408: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.create_defn_context', FALSE);
409: end if;
410:
411: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
412: ROLLBACK;
413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
414:
415: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
416: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
417: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.create_defn_context', FALSE);
418: end if;
419:
420: WHEN OTHERS THEN
421: ROLLBACK;
422: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
423:
424: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
425: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
426: END IF;
427:
428: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
421: ROLLBACK;
422: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
423:
424: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
425: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
426: END IF;
427:
428: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
429: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
424: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
425: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
426: END IF;
427:
428: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
429: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
430: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.create_defn_context', FALSE);
431: end if;
432:
462: END IF;
463:
464: -- Initialize message list if p_init_msg_list is set to TRUE.
465: IF FND_API.to_Boolean( p_init_msg_list ) THEN
466: FND_MSG_PUB.initialize;
467: END IF;
468:
469: -- Initialize API return status to success
470: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
483: );
484:
485:
486: -- Standard call to get message count and if count is 1, get message info.
487: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
488:
489: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
490: IF FND_API.To_Boolean( p_commit ) THEN
491: COMMIT ;
494: RAISE FND_API.G_EXC_ERROR;
495: END IF;
496:
497: -- Standard call to get message count and if count is 1, get message info.
498: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
499:
500: EXCEPTION
501: WHEN FND_API.G_EXC_ERROR THEN
502:
501: WHEN FND_API.G_EXC_ERROR THEN
502:
503: x_return_status := FND_API.G_RET_STS_ERROR;
504:
505: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
506: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
507: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.create_defn_from_defn', FALSE);
508: end if;
509:
510: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
511:
512: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
513:
514: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
515: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
516: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.create_defn_from_defn', FALSE);
517: end if;
518:
519: WHEN OTHERS THEN
520:
521: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
522:
523: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
524: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
525: END IF;
526:
527: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
520:
521: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
522:
523: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
524: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
525: END IF;
526:
527: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
528: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
523: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
524: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
525: END IF;
526:
527: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
528: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
529: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.create_defn_from_defn', FALSE);
530: end if;
531:
563: END IF;
564:
565: -- Initialize message list if p_init_msg_list is set to TRUE.
566: IF FND_API.to_Boolean( p_init_msg_list ) THEN
567: FND_MSG_PUB.initialize;
568: END IF;
569:
570: -- Initialize API return status to success
571: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
601: RAISE FND_API.G_EXC_ERROR;
602: END IF;
603:
604: -- Standard call to get message count and if count is 1, get message info.
605: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
606:
607: EXCEPTION
608: WHEN FND_API.G_EXC_ERROR THEN
609: x_return_status := FND_API.G_RET_STS_ERROR;
607: EXCEPTION
608: WHEN FND_API.G_EXC_ERROR THEN
609: x_return_status := FND_API.G_RET_STS_ERROR;
610:
611: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
612: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
613: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.send_defn_ackn', FALSE);
614: end if;
615:
615:
616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
618:
619: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
620: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
621: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.send_defn_ackn', FALSE);
622: end if;
623:
623:
624: WHEN OTHERS THEN
625: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
626:
627: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
628: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
629: END IF;
630:
631: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
624: WHEN OTHERS THEN
625: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
626:
627: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
628: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
629: END IF;
630:
631: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
632: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
627: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
628: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
629: END IF;
630:
631: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
632: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
633: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.send_defn_ackn', FALSE);
634: end if;
635:
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 API return status to success
677: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
695: RAISE FND_API.G_EXC_ERROR;
696: END IF;
697:
698: -- Standard call to get message count and if count is 1, get message info.
699: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
700:
701: EXCEPTION
702: WHEN FND_API.G_EXC_ERROR THEN
703: x_return_status := FND_API.G_RET_STS_ERROR;
701: EXCEPTION
702: WHEN FND_API.G_EXC_ERROR THEN
703: x_return_status := FND_API.G_RET_STS_ERROR;
704:
705: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
706: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
707: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.send_defn_ackn', FALSE);
708: end if;
709:
709:
710: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
712:
713: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
714: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
715: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.send_defn_ackn', FALSE);
716: end if;
717:
717:
718: WHEN OTHERS THEN
719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
720:
721: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
722: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
723: END IF;
724:
725: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
718: WHEN OTHERS THEN
719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
720:
721: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
722: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
723: END IF;
724:
725: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
726: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
721: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
722: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
723: END IF;
724:
725: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
726: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
727: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.send_defn_ackn', FALSE);
728: end if;
729: END SEND_DEFN_ACKN;
757: END IF;
758:
759: -- Initialize message list if p_init_msg_list is set to TRUE.
760: IF FND_API.to_Boolean( p_init_msg_list ) THEN
761: FND_MSG_PUB.initialize;
762: END IF;
763:
764: -- Initialize API return status to success
765: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
783: RAISE FND_API.G_EXC_ERROR;
784: END IF;
785:
786: -- Standard call to get message count and if count is 1, get message info.
787: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
788:
789: EXCEPTION
790: WHEN FND_API.G_EXC_ERROR THEN
791: x_return_status := FND_API.G_RET_STS_ERROR;
789: EXCEPTION
790: WHEN FND_API.G_EXC_ERROR THEN
791: x_return_status := FND_API.G_RET_STS_ERROR;
792:
793: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
794: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
795: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.send_defn_ackn', FALSE);
796: end if;
797:
797:
798: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
800:
801: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
802: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
803: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.send_defn_ackn', FALSE);
804: end if;
805:
805:
806: WHEN OTHERS THEN
807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
808:
809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
810: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
811: END IF;
812:
813: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
806: WHEN OTHERS THEN
807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
808:
809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
810: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
811: END IF;
812:
813: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
814: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
810: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
811: END IF;
812:
813: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
814: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
815: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.send_defn_ackn', FALSE);
816: end if;
817:
847: END IF;
848:
849: -- Initialize message list if p_init_msg_list is set to TRUE.
850: IF FND_API.to_Boolean( p_init_msg_list ) THEN
851: FND_MSG_PUB.initialize;
852: END IF;
853:
854: -- Initialize API return status to success
855: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
861:
862:
863:
864: -- Standard call to get message count and if count is 1, get message info.
865: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
866:
867: EXCEPTION
868: WHEN FND_API.G_EXC_ERROR THEN
869: ROLLBACK TO GET_DEFN_STATUS_GRP;
868: WHEN FND_API.G_EXC_ERROR THEN
869: ROLLBACK TO GET_DEFN_STATUS_GRP;
870: x_return_status := FND_API.G_RET_STS_ERROR;
871:
872: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
873: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
874: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.get_defn_status', FALSE);
875: end if;
876:
877: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
878: ROLLBACK TO GET_DEFN_STATUS_GRP;
879: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
880:
881: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
882: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
883: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.get_defn_status', FALSE);
884: end if;
885:
886: WHEN OTHERS THEN
887: ROLLBACK TO GET_DEFN_STATUS_GRP;
888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
889:
890: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
891: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
892: END IF;
893:
894: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
887: ROLLBACK TO GET_DEFN_STATUS_GRP;
888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
889:
890: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
891: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
892: END IF;
893:
894: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
895: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
890: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
891: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
892: END IF;
893:
894: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
895: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
896: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.get_defn_status', FALSE);
897: end if;
898:
932: END IF;
933:
934: -- Initialize message list if p_init_msg_list is set to TRUE.
935: IF FND_API.to_Boolean( p_init_msg_list ) THEN
936: FND_MSG_PUB.initialize;
937: END IF;
938:
939: -- Initialize API return status to success
940: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
946: X_OUTPUT_XML => X_OUTPUT_XML
947: );
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: EXCEPTION
953: WHEN FND_API.G_EXC_ERROR THEN
954: ROLLBACK TO GET_INSTR_XML_GRP;
953: WHEN FND_API.G_EXC_ERROR THEN
954: ROLLBACK TO GET_INSTR_XML_GRP;
955: x_return_status := FND_API.G_RET_STS_ERROR;
956:
957: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
958: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
959: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.GET_INSTR_XML', FALSE);
960: end if;
961:
962: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
963: ROLLBACK TO GET_INSTR_XML_GRP;
964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
965:
966: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
967: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
968: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.GET_INSTR_XML', FALSE);
969: end if;
970:
971: WHEN OTHERS THEN
972: ROLLBACK TO GET_INSTR_XML_GRP;
973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
974:
975: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
976: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
977: END IF;
978:
979: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
972: ROLLBACK TO GET_INSTR_XML_GRP;
973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
974:
975: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
976: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
977: END IF;
978:
979: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
980: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
975: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
976: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
977: END IF;
978:
979: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
980: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
981: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.GET_INSTR_XML', FALSE);
982: end if;
983:
1017: END IF;
1018:
1019: -- Initialize message list if p_init_msg_list is set to TRUE.
1020: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1021: FND_MSG_PUB.initialize;
1022: END IF;
1023:
1024: -- Initialize API return status to success
1025: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1031: X_OUTPUT_XML => X_OUTPUT_XML
1032: );
1033:
1034: -- Standard call to get message count and if count is 1, get message info.
1035: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1036:
1037: EXCEPTION
1038: WHEN FND_API.G_EXC_ERROR THEN
1039: ROLLBACK TO GET_INSTR_XML_GRP;
1038: WHEN FND_API.G_EXC_ERROR THEN
1039: ROLLBACK TO GET_INSTR_XML_GRP;
1040: x_return_status := FND_API.G_RET_STS_ERROR;
1041:
1042: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1043: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1044: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.GET_INSTR_INSTANCE_XML', FALSE);
1045: end if;
1046:
1047: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1048: ROLLBACK TO GET_INSTR_XML_GRP;
1049: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1050:
1051: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1052: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1053: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.GET_INSTR_INSTANCE_XML', FALSE);
1054: end if;
1055:
1056: WHEN OTHERS THEN
1057: ROLLBACK TO GET_INSTR_XML_GRP;
1058: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1059:
1060: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1061: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1062: END IF;
1063:
1064: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1057: ROLLBACK TO GET_INSTR_XML_GRP;
1058: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1059:
1060: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1061: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1062: END IF;
1063:
1064: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1065: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1060: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1061: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1062: END IF;
1063:
1064: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1065: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1066: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.GET_INSTR_INSTANCE_XML', FALSE);
1067: end if;
1068:
1100: END IF;
1101:
1102: -- Initialize message list if p_init_msg_list is set to TRUE.
1103: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1104: FND_MSG_PUB.initialize;
1105: END IF;
1106:
1107: -- Initialize API return status to success
1108: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1124: RAISE FND_API.G_EXC_ERROR;
1125: END IF;
1126:
1127: -- Standard call to get message count and if count is 1, get message info.
1128: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1129:
1130: IF FND_API.To_Boolean( p_commit ) THEN
1131: COMMIT ;
1132: END IF;
1135: WHEN FND_API.G_EXC_ERROR THEN
1136: ROLLBACK TO CREATE_INSTANCE_FROM_DEFN_GRP;
1137: x_return_status := FND_API.G_RET_STS_ERROR;
1138:
1139: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1140: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1141: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.CREATE_INSTANCE_FROM_DEFN', FALSE);
1142: end if;
1143: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1143: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1144: ROLLBACK TO CREATE_INSTANCE_FROM_DEFN_GRP;
1145: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1146:
1147: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1148: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1149: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.CREATE_INSTANCE_FROM_DEFN', FALSE);
1150: end if;
1151:
1152: WHEN OTHERS THEN
1153: ROLLBACK TO CREATE_INSTANCE_FROM_DEFN_GRP;
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1155:
1156: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1157: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1158: END IF;
1159:
1160: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1153: ROLLBACK TO CREATE_INSTANCE_FROM_DEFN_GRP;
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1155:
1156: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1157: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1158: END IF;
1159:
1160: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1161: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1156: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1157: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1158: END IF;
1159:
1160: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1161: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1162: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.CREATE_INSTANCE_FROM_DEFN', FALSE);
1163: end if;
1164:
1195: END IF;
1196:
1197: -- Initialize message list if p_init_msg_list is set to TRUE.
1198: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1199: FND_MSG_PUB.initialize;
1200: END IF;
1201:
1202: -- Initialize API return status to success
1203: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1222: END IF;
1223: END IF;
1224:
1225: -- Standard call to get message count and if count is 1, get message info.
1226: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1227:
1228: EXCEPTION
1229: WHEN FND_API.G_EXC_ERROR THEN
1230: ROLLBACK TO CREATE_INST_FRM_INST_SV;
1229: WHEN FND_API.G_EXC_ERROR THEN
1230: ROLLBACK TO CREATE_INST_FRM_INST_SV;
1231: x_return_status := FND_API.G_RET_STS_ERROR;
1232:
1233: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1234: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1235: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.CREATE_INSTANCE_FROM_INSTANCE', FALSE);
1236: end if;
1237:
1238: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1239: ROLLBACK TO CREATE_INST_FRM_INST_SV;
1240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1241:
1242: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1243: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1244: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.CREATE_INSTANCE_FROM_INSTANCE', FALSE);
1245: end if;
1246:
1247: WHEN OTHERS THEN
1248: ROLLBACK TO CREATE_INST_FRM_INST_SV;
1249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1250:
1251: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1252: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1253: END IF;
1254:
1255: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1248: ROLLBACK TO CREATE_INST_FRM_INST_SV;
1249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1250:
1251: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1252: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1253: END IF;
1254:
1255: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1256: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1251: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1252: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1253: END IF;
1254:
1255: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1256: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1257: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.CREATE_INSTANCE_FROM_INSTANCE', FALSE);
1258: end if;
1259:
1289: END IF;
1290:
1291: -- Initialize message list if p_init_msg_list is set to TRUE.
1292: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1293: FND_MSG_PUB.initialize;
1294: END IF;
1295:
1296: -- Initialize API return status to success
1297: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1317: COMMIT;
1318: END IF;
1319:
1320: -- Standard call to get message count and if count is 1, get message info.
1321: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1322:
1323: EXCEPTION
1324: WHEN FND_API.G_EXC_ERROR THEN
1325: ROLLBACK;
1324: WHEN FND_API.G_EXC_ERROR THEN
1325: ROLLBACK;
1326: x_return_status := FND_API.G_RET_STS_ERROR;
1327:
1328: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1329: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1330: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.SEND_TASK_ACKN', FALSE);
1331: end if;
1332:
1333: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1334: ROLLBACK;
1335: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1336:
1337: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1338: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1339: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.SEND_TASK_ACKN', FALSE);
1340: end if;
1341:
1342: WHEN OTHERS THEN
1343: ROLLBACK;
1344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1345:
1346: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1347: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1348: END IF;
1349:
1350: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1343: ROLLBACK;
1344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1345:
1346: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1347: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1348: END IF;
1349:
1350: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1351: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1346: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1347: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1348: END IF;
1349:
1350: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1351: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1352: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.SEND_TASK_ACKN', FALSE);
1353: end if;
1354:
1382: END IF;
1383:
1384: -- Initialize message list if p_init_msg_list is set to TRUE.
1385: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1386: FND_MSG_PUB.initialize;
1387: END IF;
1388:
1389: -- Initialize API return status to success
1390: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1406: COMMIT;
1407: END IF;
1408:
1409: -- Standard call to get message count and if count is 1, get message info.
1410: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1411:
1412: EXCEPTION
1413: WHEN FND_API.G_EXC_ERROR THEN
1414: ROLLBACK;
1413: WHEN FND_API.G_EXC_ERROR THEN
1414: ROLLBACK;
1415: x_return_status := FND_API.G_RET_STS_ERROR;
1416:
1417: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1418: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1419: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.NULLIFY_INSTR_FOR_ENTITY', FALSE);
1420: end if;
1421:
1422: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1423: ROLLBACK;
1424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1425:
1426: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1427: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1428: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.NULLIFY_INSTR_FOR_ENTITY', FALSE);
1429: end if;
1430:
1431: WHEN OTHERS THEN
1432: ROLLBACK;
1433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1434:
1435: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1436: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1437: END IF;
1438:
1439: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1432: ROLLBACK;
1433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1434:
1435: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1436: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1437: END IF;
1438:
1439: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1440: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1435: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1436: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1437: END IF;
1438:
1439: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1440: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1441: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.NULLIFY_INSTR_FOR_ENTITY', FALSE);
1442: end if;
1443:
1473: END IF;
1474:
1475: -- Initialize message list if p_init_msg_list is set to TRUE.
1476: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1477: FND_MSG_PUB.initialize;
1478: END IF;
1479:
1480: -- Initialize API return status to success
1481: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1487: X_ATTRIBUTE_VALUE := L_TASK_PARAM_VALUE;
1488: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1489:
1490: -- Standard call to get message count and if count is 1, get message info.
1491: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1492:
1493: EXCEPTION
1494: WHEN FND_API.G_EXC_ERROR THEN
1495: ROLLBACK TO GET_TASK_PARAMETER_GRP;
1494: WHEN FND_API.G_EXC_ERROR THEN
1495: ROLLBACK TO GET_TASK_PARAMETER_GRP;
1496: x_return_status := FND_API.G_RET_STS_ERROR;
1497:
1498: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1499: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1500: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.GET_TASK_PARAMETER', FALSE);
1501: end if;
1502:
1503: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1504: ROLLBACK TO GET_TASK_PARAMETER_GRP;
1505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1506:
1507: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1508: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1509: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.GET_TASK_PARAMETER', FALSE);
1510: end if;
1511:
1512: WHEN OTHERS THEN
1513: ROLLBACK TO GET_TASK_PARAMETER_GRP;
1514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1515:
1516: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1517: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1518: END IF;
1519:
1520: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1513: ROLLBACK TO GET_TASK_PARAMETER_GRP;
1514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1515:
1516: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1517: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1518: END IF;
1519:
1520: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1521: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1516: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1517: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1518: END IF;
1519:
1520: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1521: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1522: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.GET_TASK_PARAMETER', FALSE);
1523: end if;
1524:
1573: END IF;
1574:
1575: -- Initialize message list if p_init_msg_list is set to TRUE.
1576: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1577: FND_MSG_PUB.initialize;
1578: END IF;
1579:
1580: -- Initialize API return status to success
1581: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1591: X_MSG_DATA => X_MSG_DATA
1592: );
1593:
1594: -- Standard call to get message count and if count is 1, get message info.
1595: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1596:
1597: EXCEPTION
1598: WHEN FND_API.G_EXC_ERROR THEN
1599: ROLLBACK TO IS_TASK_ATTRIBUTE_USED_GRP;
1598: WHEN FND_API.G_EXC_ERROR THEN
1599: ROLLBACK TO IS_TASK_ATTRIBUTE_USED_GRP;
1600: x_return_status := FND_API.G_RET_STS_ERROR;
1601:
1602: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1603: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1604: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_instruction_grp.IS_TASK_ATTRIBUTE_USED', FALSE);
1605: end if;
1606:
1607: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1608: ROLLBACK TO IS_TASK_ATTRIBUTE_USED_GRP;
1609: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1610:
1611: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1612: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1613: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.IS_TASK_ATTRIBUTE_USED', FALSE);
1614: end if;
1615:
1616: WHEN OTHERS THEN
1617: ROLLBACK TO IS_TASK_ATTRIBUTE_USED_GRP;
1618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1619:
1620: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1621: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1622: END IF;
1623:
1624: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1617: ROLLBACK TO IS_TASK_ATTRIBUTE_USED_GRP;
1618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1619:
1620: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1621: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1622: END IF;
1623:
1624: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1625: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1620: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1621: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1622: END IF;
1623:
1624: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1625: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1626: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_instruction_grp.IS_TASK_ATTRIBUTE_USED', FALSE);
1627: end if;
1628: