63: END IF;
64:
65: -- Initialize message list if p_init_msg_list is set to TRUE.
66: IF FND_API.To_Boolean( p_init_msg_list ) THEN
67: FND_MSG_PUB.initialize;
68: END IF;
69:
70: -- Initialize API return status to success
71: x_return_status := FND_API.G_RET_STS_SUCCESS;
88: COMMIT WORK;
89: END IF;
90:
91: -- Standard call to get message count and if count is 1, get message info.
92: FND_MSG_PUB.Count_And_Get(
93: p_count => x_msg_count,
94: p_data => x_msg_data );
95:
96: EXCEPTION
159: p_attrib7,
160: p_attrib8,
161: p_attrib9);
162:
163: FND_MSG_PUB.Count_And_Get(
164: p_count => x_msg_count,
165: p_data => x_msg_data );
166:
167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
229: p_attrib7,
230: p_attrib8,
231: p_attrib9);
232:
233: FND_MSG_PUB.Count_And_Get(
234: p_count => x_msg_count,
235: p_data => x_msg_data );
236:
237: WHEN OTHERS THEN
299: p_attrib7,
300: p_attrib8,
301: p_attrib9);
302:
303: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
304: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
305: END IF;
306:
307: FND_MSG_PUB.Count_And_Get(
300: p_attrib8,
301: p_attrib9);
302:
303: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
304: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
305: END IF;
306:
307: FND_MSG_PUB.Count_And_Get(
308: p_count => x_msg_count,
303: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
304: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
305: END IF;
306:
307: FND_MSG_PUB.Count_And_Get(
308: p_count => x_msg_count,
309: p_data => x_msg_data );
310:
311: END INSERT_DEP_OBJECT;
390: END IF;
391:
392: -- Initialize message list if p_init_msg_list is set to TRUE.
393: IF FND_API.To_Boolean( p_init_msg_list ) THEN
394: FND_MSG_PUB.initialize;
395: END IF;
396:
397: -- Initialize API return status to success
398: x_return_status := FND_API.G_RET_STS_SUCCESS;
512: COMMIT WORK;
513: END IF;
514:
515: -- Standard call to get message count and if count is 1, get message info.
516: FND_MSG_PUB.Count_And_Get(
517: p_count => x_msg_count,
518: p_data => x_msg_data );
519:
520: EXCEPTION
521: WHEN FND_API.G_EXC_ERROR THEN
522: ROLLBACK TO INSERT_DEP_RELATION;
523: x_return_status := FND_API.G_RET_STS_ERROR ;
524:
525: FND_MSG_PUB.Count_And_Get(
526: p_count => x_msg_count,
527: p_data => x_msg_data );
528:
529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
530: ROLLBACK TO INSERT_DEP_RELATION;
531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
532:
533: FND_MSG_PUB.Count_And_Get(
534: p_count => x_msg_count,
535: p_data => x_msg_data );
536:
537: WHEN OTHERS THEN
537: WHEN OTHERS THEN
538: ROLLBACK TO INSERT_DEP_RELATION;
539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
540:
541: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
542: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
543: END IF;
544:
545: FND_MSG_PUB.Count_And_Get(
538: ROLLBACK TO INSERT_DEP_RELATION;
539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
540:
541: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
542: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
543: END IF;
544:
545: FND_MSG_PUB.Count_And_Get(
546: p_count => x_msg_count,
541: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
542: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
543: END IF;
544:
545: FND_MSG_PUB.Count_And_Get(
546: p_count => x_msg_count,
547: p_data => x_msg_data );
548:
549: END INSERT_DEP_RELATION;