86:
87: -- Initialize message list if p_init_msg_list is set to TRUE.
88:
89: IF FND_API.to_Boolean (p_init_msg_list) THEN
90: FND_MSG_PUB.initialize;
91: END IF;
92:
93: OPEN C_Root_Set_Of_Books;
94: FETCH C_Root_Set_Of_Books INTO l_set_of_books_id;
130: END IF;
131:
132: -- Standard call to get message count and if count is 1, get message info.
133:
134: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
135: p_data => p_msg_data);
136:
137: EXCEPTION
138:
139: WHEN FND_API.G_EXC_ERROR THEN
140: ROLLBACK to Create_Commit_Line_Items_Pvt;
141: p_return_status := FND_API.G_RET_STS_ERROR;
142:
143: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
144: p_data => p_msg_data);
145:
146: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
147: ROLLBACK to Create_Commit_Line_Items_Pvt;
146: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
147: ROLLBACK to Create_Commit_Line_Items_Pvt;
148: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
149:
150: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
151: p_data => p_msg_data);
152:
153: WHEN OTHERS THEN
154: ROLLBACK to Create_Commit_Line_Items_Pvt;
153: WHEN OTHERS THEN
154: ROLLBACK to Create_Commit_Line_Items_Pvt;
155: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
156:
157: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
158: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
159: l_api_name);
160: END IF;
161:
154: ROLLBACK to Create_Commit_Line_Items_Pvt;
155: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
156:
157: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
158: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
159: l_api_name);
160: END IF;
161:
162: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
158: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
159: l_api_name);
160: END IF;
161:
162: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
163: p_data => p_msg_data);
164:
165: END Create_Commitment_Line_Items;
166:
217:
218: -- Initialize message list if p_init_msg_list is set to TRUE.
219:
220: IF FND_API.to_Boolean (p_init_msg_list) THEN
221: FND_MSG_PUB.initialize;
222: END IF;
223:
224: OPEN C_Root_Set_Of_Books;
225: FETCH C_Root_Set_Of_Books INTO l_set_of_books_id;
262: END IF;
263:
264: -- Standard call to get message count and if count is 1, get message info.
265:
266: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
267: p_data => p_msg_data);
268:
269: EXCEPTION
270:
271: WHEN FND_API.G_EXC_ERROR THEN
272: ROLLBACK to Post_Commitment_Worksheet_Pvt;
273: p_return_status := FND_API.G_RET_STS_ERROR;
274:
275: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
276: p_data => p_msg_data);
277:
278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
279: ROLLBACK to Post_Commitment_Worksheet_Pvt;
278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
279: ROLLBACK to Post_Commitment_Worksheet_Pvt;
280: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
281:
282: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
283: p_data => p_msg_data);
284:
285: WHEN OTHERS THEN
286: ROLLBACK to Post_Commitment_Worksheet_Pvt;
285: WHEN OTHERS THEN
286: ROLLBACK to Post_Commitment_Worksheet_Pvt;
287: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
288:
289: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
290: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
291: l_api_name);
292: END IF;
293:
286: ROLLBACK to Post_Commitment_Worksheet_Pvt;
287: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
288:
289: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
290: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
291: l_api_name);
292: END IF;
293:
294: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
290: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
291: l_api_name);
292: END IF;
293:
294: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
295: p_data => p_msg_data);
296:
297: END Post_Commitment_Worksheet;
298:
349:
350: -- Initialize message list if p_init_msg_list is set to TRUE.
351:
352: IF FND_API.to_Boolean (p_init_msg_list) THEN
353: FND_MSG_PUB.initialize;
354: END IF;
355:
356: OPEN C_Root_Set_Of_Books;
357: FETCH C_Root_Set_Of_Books INTO l_set_of_books_id;
392: END IF;
393:
394: -- Standard call to get message count and if count is 1, get message info.
395:
396: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
397: p_data => p_msg_data);
398:
399:
400: EXCEPTION
402: WHEN FND_API.G_EXC_ERROR THEN
403: ROLLBACK to Create_Revisions_Pvt;
404: p_return_status := FND_API.G_RET_STS_ERROR;
405:
406: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
407: p_data => p_msg_data);
408:
409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
410: ROLLBACK to Create_Revisions_Pvt;
409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
410: ROLLBACK to Create_Revisions_Pvt;
411: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
412:
413: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
414: p_data => p_msg_data);
415:
416: WHEN OTHERS THEN
417: ROLLBACK to Create_Revisions_Pvt;
416: WHEN OTHERS THEN
417: ROLLBACK to Create_Revisions_Pvt;
418: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
419:
420: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
421:
422: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
423: l_api_name);
424: END IF;
418: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
419:
420: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
421:
422: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
423: l_api_name);
424: END IF;
425:
426: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
422: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
423: l_api_name);
424: END IF;
425:
426: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
427: p_data => p_msg_data);
428: END Create_Commitment_Revisions;
429:
430: /*==========================================================================+
480:
481: -- Initialize message list if p_init_msg_list is set to TRUE.
482:
483: IF FND_API.to_Boolean (p_init_msg_list) THEN
484: FND_MSG_PUB.initialize;
485: END IF;
486:
487: OPEN C_Root_Set_Of_Books;
488: FETCH C_Root_Set_Of_Books INTO l_set_of_books_id;
523: END IF;
524:
525: -- Standard call to get message count and if count is 1, get message info.
526:
527: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
528: p_data => p_msg_data);
529:
530:
531: EXCEPTION
533: WHEN FND_API.G_EXC_ERROR THEN
534: ROLLBACK to Post_Commitment_Revisions_Pvt;
535: p_return_status := FND_API.G_RET_STS_ERROR;
536:
537: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
538: p_data => p_msg_data);
539:
540: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
541: ROLLBACK to Post_Commitment_Revisions_Pvt;
540: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
541: ROLLBACK to Post_Commitment_Revisions_Pvt;
542: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
543:
544: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
545: p_data => p_msg_data);
546:
547: WHEN OTHERS THEN
548: ROLLBACK to Post_Commitment_Revisions_Pvt;
547: WHEN OTHERS THEN
548: ROLLBACK to Post_Commitment_Revisions_Pvt;
549: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
550:
551: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
552:
553: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
554: l_api_name);
555: END IF;
549: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
550:
551: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
552:
553: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
554: l_api_name);
555: END IF;
556:
557: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
553: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
554: l_api_name);
555: END IF;
556:
557: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
558: p_data => p_msg_data);
559:
560: END Post_Commitment_Revisions;
561:
612:
613: -- Initialize message list if p_init_msg_list is set to TRUE.
614:
615: IF FND_API.to_Boolean (p_init_msg_list) THEN
616: FND_MSG_PUB.initialize;
617: END IF;
618:
619: OPEN C_Root_Set_Of_Books;
620: FETCH C_Root_Set_Of_Books INTO l_set_of_books_id;
655: END IF;
656:
657: -- Standard call to get message count and if count is 1, get message info.
658:
659: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
660: p_data => p_msg_data);
661:
662:
663: EXCEPTION
665: WHEN FND_API.G_EXC_ERROR THEN
666: ROLLBACK to Commitment_Funds_Check_Pvt;
667: p_return_status := FND_API.G_RET_STS_ERROR;
668:
669: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
670: p_data => p_msg_data);
671:
672:
673: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
673: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
674: ROLLBACK to Commitment_Funds_Check_Pvt;
675: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
676:
677: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
678: p_data => p_msg_data);
679:
680: WHEN OTHERS THEN
681: ROLLBACK to Commitment_Funds_Check_Pvt;
680: WHEN OTHERS THEN
681: ROLLBACK to Commitment_Funds_Check_Pvt;
682: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
683:
684: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
685:
686: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
687: l_api_name);
688: END IF;
682: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
683:
684: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
685:
686: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
687: l_api_name);
688: END IF;
689:
690: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
686: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
687: l_api_name);
688: END IF;
689:
690: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
691: p_data => p_msg_data);
692:
693: END Commitment_Funds_Check;
694:
765: FND_MESSAGE.SET_TOKEN(msg_tok_names(i), msg_tok_val(i));
766: end loop;
767: end if;
768:
769: FND_MSG_PUB.Add;
770:
771: end if;
772:
773: -- Clear Message Token stack