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