84:
85: DBMS_LOB.writeappend (l_xml_doc, 8, '
86:
87: -- Initialize message stack
88: FND_MSG_PUB.initialize;
89:
90: -- Standard call to get message count and if count is 1, get message info.
91:
92: FND_MSG_PUB.Count_And_Get
88: FND_MSG_PUB.initialize;
89:
90: -- Standard call to get message count and if count is 1, get message info.
91:
92: FND_MSG_PUB.Count_And_Get
93: ( p_count => l_msg_count,
94: p_data => l_msg_data
95: );
96:
181:
182: EXCEPTION
183: WHEN FND_API.G_EXC_ERROR THEN
184: l_return_status := FND_API.G_RET_STS_ERROR ;
185: FND_MSG_PUB.Count_And_Get
186: ( p_count => l_msg_count,
187: p_data => l_msg_data
188: );
189:
187: p_data => l_msg_data
188: );
189:
190: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
191: FND_MSG_PUB.Count_And_Get
192: ( p_count => l_msg_count,
193: p_data => l_msg_data
194: );
195:
208: l_module || '.' || l_stmt_num,
209: SUBSTRB (SQLERRM , 1 , 240));
210: END IF;
211:
212: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
213: THEN
214: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,l_api_name);
215: END IF;
216:
210: END IF;
211:
212: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
213: THEN
214: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,l_api_name);
215: END IF;
216:
217: FND_MSG_PUB.Count_And_Get
218: ( p_count => l_msg_count,
213: THEN
214: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,l_api_name);
215: END IF;
216:
217: FND_MSG_PUB.Count_And_Get
218: ( p_count => l_msg_count,
219: p_data => l_msg_data
220: );
221:
289:
290: -- Initialize message list if p_init_msg_list is set to TRUE.
291:
292: IF FND_API.to_Boolean( p_init_msg_list ) THEN
293: FND_MSG_PUB.initialize;
294: END IF;
295:
296: -- Initialize API return status to success
297:
385: DBMS_LOB.FREETEMPORARY (l_xml_temp);
386:
387: -- Standard call to get message count and if count is 1, get message info.
388:
389: FND_MSG_PUB.Count_And_Get
390: ( p_count => x_msg_count,
391: p_data => x_msg_data);
392:
393: -- Write the module name to fnd log file
400:
401: EXCEPTION
402: WHEN FND_API.G_EXC_ERROR THEN
403: x_return_status := FND_API.G_RET_STS_ERROR ;
404: FND_MSG_PUB.Count_And_Get
405: ( p_count => x_msg_count,
406: p_data => x_msg_data
407: );
408:
407: );
408:
409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
410: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
411: FND_MSG_PUB.Count_And_Get
412: ( p_count => x_msg_count,
413: p_data => x_msg_data
414: );
415:
420: l_module || '.' || l_stmt_num,
421: SUBSTRB (SQLERRM , 1 , 240));
422: END IF;
423:
424: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
425: THEN
426: FND_MSG_PUB.Add_Exc_Msg
427: ( G_PKG_NAME,
428: l_api_name
422: END IF;
423:
424: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
425: THEN
426: FND_MSG_PUB.Add_Exc_Msg
427: ( G_PKG_NAME,
428: l_api_name
429: );
430: END IF;
428: l_api_name
429: );
430: END IF;
431:
432: FND_MSG_PUB.Count_And_Get
433: ( p_count => x_msg_count,
434: p_data => x_msg_data
435: );
436:
495:
496: -- Initialize message list if p_init_msg_list is set to TRUE.
497:
498: IF FND_API.to_Boolean( p_init_msg_list ) THEN
499: FND_MSG_PUB.initialize;
500: END IF;
501:
502: -- Initialize API return status to success
503:
716: DBMS_LOB.FREETEMPORARY (l_xml_temp);
717:
718: -- Standard call to get message count and if count is 1, get message info.
719:
720: FND_MSG_PUB.Count_And_Get
721: ( p_count => x_msg_count,
722: p_data => x_msg_data
723: );
724:
732:
733: EXCEPTION
734: WHEN FND_API.G_EXC_ERROR THEN
735: x_return_status := FND_API.G_RET_STS_ERROR ;
736: FND_MSG_PUB.Count_And_Get
737: ( p_count => x_msg_count,
738: p_data => x_msg_data
739: );
740:
739: );
740:
741: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
743: FND_MSG_PUB.Count_And_Get
744: ( p_count => x_msg_count,
745: p_data => x_msg_data);
746:
747: WHEN OTHERS THEN
751: l_module || '.' || l_stmt_num,
752: SUBSTRB (SQLERRM , 1 , 240));
753: END IF;
754:
755: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
756: THEN
757: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
758: END IF;
759:
753: END IF;
754:
755: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
756: THEN
757: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
758: END IF;
759:
760: FND_MSG_PUB.Count_And_Get
761: ( p_count => x_msg_count,
756: THEN
757: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
758: END IF;
759:
760: FND_MSG_PUB.Count_And_Get
761: ( p_count => x_msg_count,
762: p_data => x_msg_data
763: );
764: